Changeset 3605 for LMDZ6/branches/Ocean_skin/libf/phylmd/rrtm/radlsw.F90

Timestamp:

Nov 21, 2019, 4:43:45 PM (5 years ago)

Author:

lguez

Message:

Merge revisions 3427:3600 of trunk into branch Ocean_skin

Location:

LMDZ6/branches/Ocean_skin

Files:

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

LMDZ6/branches/Ocean_skin/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