Changeset 3880 for LMDZ6/branches/LMDZ-ECRAD/makelmdz_fcm

Timestamp:

Apr 28, 2021, 4:55:57 PM (4 years ago)

Author:

idelkadi

Message:

Online implementation of the radiative transfer code ECRAD in LMDZ.

• Inclusion of the ecrad directory containing the sources of the ECRAD code
• Adaptation of compilation scripts (CPP_ECRAD keys)
• Call of ecrad in radlwsw_m.F90 under the logical key iflag_rrtm = 2

File:

• LMDZ6/branches/LMDZ-ECRAD/makelmdz_fcm (modified) (6 diffs)

LMDZ6/branches/LMDZ-ECRAD/makelmdz_fcm

@@ -26 +26 @@
 inlandsis=false
 rrtm=false
+ecrad=false
 dust=false
 strataer=false
@@ -55 +56 @@
 PHY_COMMON_PATH=$LMDGCM/.void_dir
 RRTM_PATH=$LMDGCM/.void_dir
+ECRAD_PATH=$LMDGCM/.void_dir
 DUST_PATH=$LMDGCM/.void_dir
 STRATAER_PATH=$LMDGCM/.void_dir
@@ -102 +104 @@
 [-inlandsis true/false]  : compile with/without inlandsis package (default: false)
 [-rrtm true/false]    : compile with/without rrtm package (default: false)
+[-ecrad true/false]    : compile with/without ecrad package (default: false)
 [-dust true/false]    : compile with/without the dust package by Boucher and co (default: false)
 [-strataer true/false]    : compile with/without the strat aer package by Boucher and co (default: false)
@@ -159 +162 @@
       "-rrtm")
           rrtm="$2" ; shift ; shift ;;
+
+      "-ecrad")
+          ecrad="$2" ; shift ; shift ;;
 
       "-dust")
@@ -433 +439 @@
 fi
 
+if [[ "$ecrad" == "true" ]]
+then
+   CPP_KEY="$CPP_KEY CPP_ECRAD"
+   ECRAD_PATH="$LIBFGCM/%PHYS/ecrad"
+fi
+
+
 if [[ "$dust" == "true" ]]
 then
@@ -695 +708 @@
 echo "%DYN_PHYS_SUB  $DYN_PHYS_SUB_PATH" >> $config_fcm
 echo "%RRTM          $RRTM_PATH"     >> $config_fcm
+echo "%ECRAD         $ECRAD_PATH"    >> $config_fcm
 echo "%DUST          $DUST_PATH"     >> $config_fcm
 echo "%STRATAER      $STRATAER_PATH" >> $config_fcm