fixed indentation in previous commit (StieglitzSnow.F90)

GEOS-ESM · Oct 18, 2023 · 47b49cb · 47b49cb
1 parent f202a2d
commit 47b49cb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/Shared/StieglitzSnow.F90 b/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/Shared/StieglitzSnow.F90
@@ -1544,7 +1544,7 @@ SUBROUTINE StieglitzSnow_trid(X,DD,D,RD,B,N)
          J=N+1-I
          if(D(J+1).ne.0.) RSF=RD(J)/D(J+1)
          D(J)=D(J)-DD(J+1)*RSF
-      B(J)=B(J)- B(J+1)*RSF
+         B(J)=B(J)- B(J+1)*RSF
       enddo
       if(D(1).ne.0.) X(1)=B(1)/D(1)
       do J=2,N