minimal edit of comment (StieglitzSnow.F90)

gmao-rreichle · web-flow · commit 8d9ff4097ae6 · 2024-05-16T08:40:53.000-04:00
diff --git a/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/Shared/StieglitzSnow.F90 b/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/Shared/StieglitzSnow.F90
@@ -1303,8 +1303,8 @@ subroutine StieglitzSnow_relayer(N_snow, N_constit, tileType, targetthick, &
        ! for each layer, check snow conditions (partially/fully frozen, temp at/below zero) 
        !   before and after relayer; in select cases, adjust snow heat content and temp
        !
-       ! NOTE: logicals before relayer action were computed with    "buffer" (use_threshold_fac=.true. )
-       !       reals    after  relayer action were computed without "buffer" (use_threshold_fac=.false.)
+       ! NOTE: logicals before relayer are computed with    "buffer" (use_threshold_fac=.true. )
+       !       reals    after  relayer are computed without "buffer" (use_threshold_fac=.false.)
 
        do i=1,N_snow                                                          
 

Original file line number	Diff line number	Diff line change
`@@ -1303,8 +1303,8 @@ subroutine StieglitzSnow_relayer(N_snow, N_constit, tileType, targetthick, &`
`1303`	`1303`	`! for each layer, check snow conditions (partially/fully frozen, temp at/below zero)`
`1304`	`1304`	`! before and after relayer; in select cases, adjust snow heat content and temp`
`1305`	`1305`	`!`
`1306`		`- ! NOTE: logicals before relayer action were computed with "buffer" (use_threshold_fac=.true. )`
`1307`		`- ! reals after relayer action were computed without "buffer" (use_threshold_fac=.false.)`
	`1306`	`+ ! NOTE: logicals before relayer are computed with "buffer" (use_threshold_fac=.true. )`
	`1307`	`+ ! reals after relayer are computed without "buffer" (use_threshold_fac=.false.)`
`1308`	`1308`
`1309`	`1309`	`do i=1,N_snow`
`1310`	`1310`