Changeset 2137


Ignore:
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

Location:
trunk/LMDZ.MARS
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.MARS/README

    r2124 r2137  
    27122712== 24/04/09 == EM+FF
    27132713- Updated co2condens to correctly conserve tracer mass
     2714
     2715== 10/05/2019 == EM
     2716- updates in code to be able to read in the MY34 dust scenario and the MY34
     2717  solar EUV input
     2718 
  • trunk/LMDZ.MARS/libf/aeronomars/param_read_e107.F

    r1918 r2137  
    268268      else if(solvaryear.eq.33) then
    269269         filename="e107_MY33.dat"
     270      else if(solvaryear.eq.34) then
     271         filename="e107_MY34.dat"
    270272      else
    271273         write(*,*)"param_read_e107: "
  • trunk/LMDZ.MARS/libf/phymars/aeropacity_mod.F

    r1974 r2137  
    289289      ! clim, cold or warm synthetic scenarios
    290290        call read_dust_scenario(ngrid,nlayer,zday,pplev,tauref)
    291       ELSE IF ((iaervar.ge.24).and.(iaervar.le.33))
     291      ELSE IF ((iaervar.ge.24).and.(iaervar.le.34))
    292292     &     THEN  ! << MY... dust scenarios >>
    293293        call read_dust_scenario(ngrid,nlayer,zday,pplev,tauref)
  • trunk/LMDZ.MARS/libf/phymars/read_dust_scenario.F90

    r1918 r2137  
    8383   else if (iaervar.eq.33) then
    8484     filename="dust_MY33.nc"
     85   else if (iaervar.eq.34) then
     86     filename="dust_MY34.nc"
    8587   ! 124,125,126: old TES assimilated dust scenarios (at 700Pa ref pressure!)
    8688   else if  (iaervar.eq.124) then
Note: See TracChangeset for help on using the changeset viewer.