Ignore:
Timestamp:
Oct 27, 2011, 3:20:19 AM (13 years ago)
Author:
aslmd
Message:

MESOSCALE: tests OK for changes in previous commit. corrected another instance of the infamous rad/deg bug! also fixed an issue with nesting, functions are not considered in physics duplication. results look good in a typical Hellas winter case [with old physics].

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/physiq.F

    r332 r333  
    863863
    864864#ifdef MESOSCALE
    865       !!!! get the actual co2 seasonal cap from Titus observations
    866       CALL geticecover( ngrid, zls, long, lati, co2ice )
    867       co2ice = co2ice * 10000.  !! a whole bunch of ice
     865      !!! get the actual co2 seasonal cap from Titus observations
     866      CALL geticecover( ngrid, 180.*zls/pi,
     867     .                  180.*long/pi, 180.*lati/pi, co2ice )
     868      co2ice = co2ice * 10000.
    868869#endif
    869870
Note: See TracChangeset for help on using the changeset viewer.