Ignore:
Timestamp:
Mar 12, 2012, 6:01:42 PM (13 years ago)
Author:
aslmd
Message:

MESOSCALE: minor commit : def files; a small correction in runmeso; cosmetic in module_lmd_driver; nircorr=0 default for MESOSCALE in inifis.

Location:
trunk/LMDZ.MARS/libf/phymars
Files:
2 edited

Legend:

Unmodified
Added
Removed

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

    r566 r577  
    249249     $              "1-> new correction",
    250250     $              "(matters only if callnirco2=T)"
     251#ifdef MESOSCALE
     252         nircorr=0      !default value. this is OK below 60 km.
     253#else
    251254         nircorr=1      !default value
     255#endif
    252256         call getin("nircorr",nircorr)
    253257         write(*,*) " nircorr = ",nircorr

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

    r576 r577  
    624624                 sl_ra  = pi*(1.0-sl_lct/12.)
    625625                 sl_lat = 180.*lati(ig)/pi
    626                  sl_tau = tau(ig,1)
     626                 sl_tau = tau(ig,1) !il faudrait iaerdust(iaer)
    627627                 sl_alb = albedo(ig,l)
    628628                 sl_psi = psi_sl(ig)
Note: See TracChangeset for help on using the changeset viewer.