/[lmdze]/trunk/phylmd/yoethf.f
ViewVC logotype

Diff of /trunk/phylmd/yoethf.f

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

revision 266 by guez, Thu Apr 19 17:54:55 2018 UTC revision 291 by guez, Wed Jul 25 14:15:44 2018 UTC
# Line 10  module yoethf_m Line 10  module yoethf_m
10    ! Constants used for computation of saturation mixing ratio over    ! Constants used for computation of saturation mixing ratio over
11    ! liquid water (r.les) or ice (r.ies):    ! liquid water (r.les) or ice (r.ies):
12    real, parameter:: R3LES = 17.269, R3IES = 21.875, R4LES = 35.86, R4IES = 7.66    real, parameter:: R3LES = 17.269, R3IES = 21.875, R4LES = 35.86, R4IES = 7.66
13    real, parameter:: R5LES=R3LES*(RTT-R4LES)    real, parameter:: R5LES = R3LES * (RTT - R4LES)
14    real, parameter:: R5IES=R3IES*(RTT-R4IES)    real, parameter:: R5IES = R3IES * (RTT - R4IES)
15    
16    real, parameter:: RVTMP2=RCPV/RCPD-1.    real, parameter:: RVTMP2 = RCPV / RCPD - 1.
17    real, parameter:: RHOH2O=RATM/100. ! density of liquid water    real, parameter:: RHOH2O = RATM / 100. ! density of liquid water
18    real, parameter:: R2ES = RESTT * RD / RV    real, parameter:: R2ES = RESTT * RD / RV
19    
20    private ratm, rcpd, rcpv, rd, restt, rtt, rv    private ratm, rcpd, rcpv, rd, restt, rtt, rv
Legend:
Removed from v.266  
changed lines
  Added in v.291
  ViewVC Help
Powered by ViewVC 1.1.21