Changeset 3148 for palm/trunk/SOURCE/surface_layer_fluxes_mod.f90

Timestamp:

Jul 19, 2018 5:45:25 AM (6 years ago)

Author:

maronga

Message:

last commit documented

File:

• palm/trunk/SOURCE/surface_layer_fluxes_mod.f90 (modified) (1 diff)

palm/trunk/SOURCE/surface_layer_fluxes_mod.f90

@@ -984 +984 @@
                                            ) * ibit                            &
                                          )                                     &
-                              )**2                                             &
+                              )**2 +                                           &
+                              ( g / surf%pt1(m) * surf%z_mo(m) * surf%shf(m)   &
+                              )**(2.0_wp/3.0_wp)                               &
                                 )
+
+                                
 
        ENDDO