Changeset 2137 for trunk/LMDZ.MARS/libf/phymars/aeropacity_mod.F

Timestamp:

May 10, 2019, 8:26:33 AM (6 years ago)

Author:

emillour

Message:

Mars GCM:
Updates in code to be able to read in the MY34 dust scenario and the MY34 solar EUV input.
EM

File:

• trunk/LMDZ.MARS/libf/phymars/aeropacity_mod.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/aeropacity_mod.F

@@ -289 +289 @@
       ! clim, cold or warm synthetic scenarios
         call read_dust_scenario(ngrid,nlayer,zday,pplev,tauref)
-      ELSE IF ((iaervar.ge.24).and.(iaervar.le.33))
+      ELSE IF ((iaervar.ge.24).and.(iaervar.le.34))
      &     THEN  ! << MY... dust scenarios >>
         call read_dust_scenario(ngrid,nlayer,zday,pplev,tauref)