Changeset 2626 for LMDZ5/trunk/libf/phylmd/rrtm/srtm_srtm_224gp_mcica.F90

Timestamp:

Sep 15, 2016, 4:20:56 PM (8 years ago)

Author:

musat

Message:

Bug correction : rrtm uses LMDZ' GES from clesphys.h
MPL/IM

File:

• LMDZ5/trunk/libf/phylmd/rrtm/srtm_srtm_224gp_mcica.F90 (modified) (2 diffs)

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

@@ -16 +16 @@
 
 USE PARSRTM  , ONLY : JPLAY
-USE YOERDI   , ONLY : RCH4   , RN2O   
+!MPL/IM 20160915 on prend GES de phylmd USE YOERDI   , ONLY : RCH4   , RN2O   
 USE YOERAD   , ONLY : NAER
 USE YOESRTAER, ONLY : RSRTAUA, RSRPIZA, RSRASYA
@@ -133 +133 @@
 #include "srtm_setcoef.intfb.h"
 #include "srtm_spcvrt_mcica.intfb.h"
-
+!MPL/IM 20160915 on prend GES de phylmd
+#include "clesphys.h"
 
 !-----------------------------------------------------------------------