Changeset 3908 for LMDZ6/trunk/libf/phylmd/physiq_mod.F90

Timestamp:

May 20, 2021, 9:11:13 AM (3 years ago)

Author:

idelkadi

Message:

Online implementation of the radiative transfer code ECRAD in the LMDZ model.

• Inclusion of the ecrad directory containing the sources of the ECRAD code
  • interface routine : radiation_scheme.F90
• Adaptation of compilation scripts :
  • compilation under CPP key CPP_ECRAD
  • compilation with option "-rad ecard" or "-ecard true"
  • The "-rad old/rtm/ecran" build option will need to replace the "-rrtm true" and "-ecrad true" options in the future.
• Runing LMDZ simulations with ecrad, you need :
  • logical key iflag_rrtm = 2 in physiq.def
  • namelist_ecrad (DefLists?)
  • the directory "data" containing the configuration files is temporarily placed in ../libfphylmd/ecrad/
• Compilation and execution are tested in the 1D case. The repository under svn would allow to continue the implementation work: tests, verification of the results, ...

File:

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

LMDZ6/trunk/libf/phylmd/physiq_mod.F90

@@ -3967 +3967 @@
 
        IF (ok_newmicro) then
-          IF (iflag_rrtm.NE.0) THEN 
+! AI          IF (iflag_rrtm.NE.0) THEN 
+          IF (iflag_rrtm.EQ.1) THEN
 #ifdef CPP_RRTM
              IF (ok_cdnc.AND.NRADLP.NE.3) THEN