Changeset 2864 for LMDZ5/trunk/libf

Timestamp:

Apr 24, 2017, 4:36:36 PM (8 years ago)

Author:

Ehouarn Millour

Message:

Suite et fin du commit 2846.
MPL

File:

• LMDZ5/trunk/libf/phylmd/rrtm/rrtm_init_140gp.F90 (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/rrtm/rrtm_init_140gp.F90

@@ -82 +82 @@
 
 CORR1(0) = 1.0_JPRB
-CORR1(200) = 1.0_JPRB
+CORR1(400) = 1.0_JPRB
 CORR2(0) = 1.0_JPRB
-CORR2(200) = 1.0_JPRB
+CORR2(400) = 1.0_JPRB
 DO I = 1,199
   Z_FP = 0.005_JPRB*REAL(I)