Ignore:
Timestamp:
Oct 12, 2016, 4:56:14 PM (8 years ago)
Author:
emillour
Message:

Mars GCM:
Revert some defaults to values which should not have been changed with revision 1617.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/updaterad.F90

    r1617 r1619  
    3434
    3535real, parameter :: nccn_threshold  =  1.
    36 real, parameter :: qccn_threshold  =  1.e-30
    37 
    38 real, parameter :: r3ccnmin = 1.e-24    ! ie rccnmin = 10n m
    39 real, parameter :: rccnmin  = 1.e-8
    40 
    41 real, parameter :: r3ccnmax = 125.e-18  ! ie rccnmax  = 5 microns
    42 real, parameter :: rccnmax  = 5.e-6
     36real, parameter :: qccn_threshold  =  1.e-20
     37
     38real, parameter :: r3ccnmin = 1.e-21    ! ie rccnmin = 0.1 microns
     39real, parameter :: rccnmin  = 0.1e-6
     40
     41real, parameter :: r3ccnmax = 125.e-12  ! ie rccnmax  = 500 microns
     42real, parameter :: rccnmax  = 500.e-6
    4343
    4444
Note: See TracChangeset for help on using the changeset viewer.