Parent Directory | Revision Log
Define macros of the preprocessor CPP_IIM, CPP_JJM, CPP_LLM so we can control the resolution from the compilation command, and automate compilation for several resolutions. In module yoethf_m, transform variables into named constants. So we do not need procedure yoethf any longer. Bug fix in program test_inter_barxy, missing calls to fyhyp and fxhyp, and definition of rlatu. Remove variable iecri of module conf_gcm_m. The files dyn_hist*.nc are written every time step. We are simplifying the output system, pending replacement by a whole new system. Modify possible value of vert_sampling from "param" to "strato_custom", following LMDZ. Default values of corresponding namelist variables are now the values used for LMDZ CMIP6.
1 | guez | 38 | module yoethf_m |
2 | guez | 3 | |
3 | guez | 88 | ! From phylmd/yoethf.inc, version 1.1.1.1 2004/05/19 12:53:09 |
4 | guez | 38 | ! Derived constants specific to ECMWF thermodynamics |
5 | guez | 3 | |
6 | guez | 266 | use SUPHEC_M, only: ratm, rcpd, rcpv, rd, restt, rtt, rv |
7 | |||
8 | guez | 3 | implicit none |
9 | |||
10 | guez | 38 | ! Constants used for computation of saturation mixing ratio over |
11 | guez | 88 | ! liquid water (r.les) or ice (r.ies): |
12 | guez | 38 | real, parameter:: R3LES = 17.269, R3IES = 21.875, R4LES = 35.86, R4IES = 7.66 |
13 | guez | 266 | real, parameter:: R5LES=R3LES*(RTT-R4LES) |
14 | real, parameter:: R5IES=R3IES*(RTT-R4IES) | ||
15 | guez | 3 | |
16 | guez | 266 | real, parameter:: RVTMP2=RCPV/RCPD-1. |
17 | real, parameter:: RHOH2O=RATM/100. ! density of liquid water | ||
18 | real, parameter:: R2ES = RESTT * RD / RV | ||
19 | guez | 3 | |
20 | guez | 266 | private ratm, rcpd, rcpv, rd, restt, rtt, rv |
21 | guez | 3 | |
22 | guez | 38 | end module yoethf_m |
ViewVC Help | |
Powered by ViewVC 1.1.21 |