Changeset 5241

Timestamp:

Oct 17, 2024, 11:40:03 AM (4 hours ago)

Author:

Laurent Fairhead

Message:

switching back to the non-test version of condensation_lognormal
LF

File:

• LMDZ6/trunk/libf/phylmd/lmdz_lscp.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/lmdz_lscp.F90

@@ -106 +106 @@
 USE lmdz_lscp_tools, ONLY : icefrac_lscp, icefrac_lscp_turb
 USE lmdz_lscp_tools, ONLY : fallice_velocity, distance_to_cloud_top
-USE lmdz_lscp_condensation, ONLY : condensation_lognormal_test, condensation_ice_supersat
+!USE lmdz_lscp_condensation, ONLY : condensation_lognormal_test, condensation_ice_supersat
+USE lmdz_lscp_condensation, ONLY : condensation_lognormal, condensation_ice_supersat
 USE lmdz_lscp_poprecip, ONLY : poprecip_precld, poprecip_postcld
 
@@ -971 +972 @@
                   !--generalised lognormal condensation scheme (Bony and Emanuel 2001)
 
-                   CALL condensation_lognormal_test( &
-                       klon, klev, k, keepgoing, ratqs, gammasat, zq, zqs, &
-                       zqn, qvc, rneb)
+                   CALL condensation_lognormal( &
+                       klon, Tbef, zq, zqs, gammasat, ratqs(:,k), &
+                       keepgoing, rneb(:,k), zqn, qvc)
+!                   CALL condensation_lognormal_test( &
+!                       klon, klev, k, keepgoing, ratqs, gammasat, zq, zqs, &
+!                       zqn, qvc, rneb)