Changeset 2137
- Timestamp:
- May 10, 2019, 8:26:33 AM (6 years ago)
- Location:
- trunk/LMDZ.MARS
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/README
r2124 r2137 2712 2712 == 24/04/09 == EM+FF 2713 2713 - 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 268 268 else if(solvaryear.eq.33) then 269 269 filename="e107_MY33.dat" 270 else if(solvaryear.eq.34) then 271 filename="e107_MY34.dat" 270 272 else 271 273 write(*,*)"param_read_e107: " -
trunk/LMDZ.MARS/libf/phymars/aeropacity_mod.F
r1974 r2137 289 289 ! clim, cold or warm synthetic scenarios 290 290 call read_dust_scenario(ngrid,nlayer,zday,pplev,tauref) 291 ELSE IF ((iaervar.ge.24).and.(iaervar.le.3 3))291 ELSE IF ((iaervar.ge.24).and.(iaervar.le.34)) 292 292 & THEN ! << MY... dust scenarios >> 293 293 call read_dust_scenario(ngrid,nlayer,zday,pplev,tauref) -
trunk/LMDZ.MARS/libf/phymars/read_dust_scenario.F90
r1918 r2137 83 83 else if (iaervar.eq.33) then 84 84 filename="dust_MY33.nc" 85 else if (iaervar.eq.34) then 86 filename="dust_MY34.nc" 85 87 ! 124,125,126: old TES assimilated dust scenarios (at 700Pa ref pressure!) 86 88 else if (iaervar.eq.124) then
Note: See TracChangeset
for help on using the changeset viewer.