refixed definiton of b2 constant of charnok

srcF/sfx_z0m_all_surface.f90

@@ -29,7 +29,7 @@ module sfx_z0m_all_surface
 
     real, parameter :: h_charnock = 10.0
     real, parameter :: c1_charnock = log(h_charnock * (g / gamma_c))
-    real, parameter :: c2_charnock = Re_visc_min * nu_air * c1_charnock
+    real, parameter :: c2_charnock = Re_visc_min * nu_air * (g / gamma_c)
     real, parameter :: gamma_min = 0.01
     real, parameter :: gamma_max = 0.11
     real, parameter :: f_c = 100