Changeset 3539

Timestamp:

Jun 20, 2019, 12:22:08 PM (6 years ago)

Author:

jbmadeleine

Message:

petite verif dans rrtm

File:

• LMDZ6/trunk/libf/phylmd/rrtm/radlsw.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/rrtm/radlsw.F90

@@ -502 +502 @@
     ELSEIF (NRADLP == 3) THEN  
 ! one uses the cloud droplet radius from newmicro
-! IKL or JK ?? - I think IKL but needs to be verified
+! IKL or JK ?? - I think IKL but needs to be verified > ref_liq_i
+! (inverted) is used in the call of RECMWF_AERO in radlwsw_m.F90,
+! so everything is fine - JBM 6/2019
         ZRADLP(JL)=PREF_LIQ(JL,IKL)
     ENDIF