Changeset 5274 for LMDZ6/trunk/libf/phylmdiso/reevap.F90
- Timestamp:
- Oct 25, 2024, 3:41:23 PM (21 hours ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmdiso/reevap.F90
r5149 r5274 15 15 #endif 16 16 #endif 17 IMPLICIT none 17 USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO & 18 , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA & 19 , R_ecc, R_peri, R_incl & 20 , RA, RG, R1SA & 21 , RSIGMA & 22 , R, RMD, RMV, RD, RV, RCPD & 23 , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12 & 24 , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w & 25 , RCW, RCS & 26 , RLVTT, RLSTT, RLMLT, RTT, RATM & 27 , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS & 28 , RALPD, RBETD, RGAMD 29 IMPLICIT none 18 30 !>====================================================================== 19 31 … … 25 37 26 38 REAL za,zb,zdelta,zlvdcp,zlsdcp 27 INTEGER i,k,ixt,ivapcur,iliqcur,isolcur 39 INTEGER i,k,ixt,ivapcur,iliqcur,isolcur 28 40 29 41 30 42 !--------Stochastic Boundary Layer Triggering: ALE_BL-------- 31 !---Propri\'et\'es du thermiques au LCL 32 include "YOMCST.h" 43 !---Propri\'et\'es du thermiques au LCL 44 33 45 include "YOETHF.h" 34 46 include "FCTTRE.h"
Note: See TracChangeset
for help on using the changeset viewer.