Changeset 1934 for trunk/LMDZ.MARS


Ignore:
Timestamp:
May 31, 2018, 11:28:49 PM (6 years ago)
Author:
aslmd
Message:

(previous commit was incorrect) riceco2 is double in CO2cloud so shall also be declared double in physiq_mod

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

Legend:

Unmodified
Added
Removed

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

    r1933 r1934  
    3030      USE newsedim_mod, ONLY: newsedim
    3131      USE datafile_mod, ONLY: datadir
     32      USE improvedCO2clouds_mod, ONLY: improvedCO2clouds
    3233
    3334      IMPLICIT NONE

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

    r1922 r1934  
    222222                                      ! (used only when tifeedback=.true.)
    223223c     Variables used by the CO2 clouds microphysical scheme:
    224       REAL riceco2(ngrid,nlayer)   ! co2 ice geometric mean radius (m)
     224      DOUBLE PRECISION riceco2(ngrid,nlayer)   ! co2 ice geometric mean radius (m)
    225225      real rsedcloudco2(ngrid,nlayer) !CO2 Cloud sedimentation radius
    226226      real rhocloudco2(ngrid,nlayer) !co2 Cloud density (kg.m-3)
Note: See TracChangeset for help on using the changeset viewer.