/[lmdze]/trunk/phylmd/newmicro.f90
ViewVC logotype

Diff of /trunk/phylmd/newmicro.f90

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 339 by guez, Thu Sep 26 17:08:42 2019 UTC revision 341 by guez, Mon Oct 21 06:11:44 2019 UTC
# Line 53  contains Line 53  contains
53    
54      REAL, PARAMETER:: cetahb = 0.45, cetamb = 0.8      REAL, PARAMETER:: cetahb = 0.45, cetamb = 0.8
55      INTEGER i, k      INTEGER i, k
56      REAL zflwp      REAL zflwp ! liquid water path, in micrometers
57      real fice ! fraction of ice in cloud      real fice ! fraction of ice in cloud
58      REAL rad_chaud      REAL rad_chaud ! effective radius of liquid cloud droplets, in micrometers
59      REAL, PARAMETER:: coef_chau = 0.13      REAL, PARAMETER:: coef_chau = 0.13
60      REAL, PARAMETER:: seuil_neb = 0.001, t_glace = 258.      REAL, PARAMETER:: seuil_neb = 0.001, t_glace = 258.
61      real tc, rei, zfiwp      real tc, rei, zfiwp
Legend:
Removed from v.339  
changed lines
  Added in v.341
  ViewVC Help
Powered by ViewVC 1.1.21