Code update for HR4_roughness

ufs-community · Oct 16, 2023 · c2b1301 · c2b1301
1 parent 3debf89
commit c2b1301
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/physics/sfc_diff.f b/physics/sfc_diff.f
@@ -366,8 +366,6 @@ subroutine sfc_diff_run (im,rvrdm1,eps,epsm1,grav,                &  !intent(in)
               z0max = max(zmin, min(z0,z1(i)))
             endif
 !
-!           ustar_wat(i) = sqrt(grav * z0 / charnock)
-!
 !**  test xubin's new z0
 
 !           ztmax  = z0max