Changeset 5274 for LMDZ6/trunk/libf/phylmd/hbtm2l.f90
- Timestamp:
- Oct 25, 2024, 3:41:23 PM (31 hours ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/hbtm2l.f90
r5268 r5274 4 4 SUBROUTINE hbtm2l(knon, paprs, pplay, t2m, t10m, q2m, q10m, ustar, flux_t, flux_q, u, v, t, q, pblh, therm, plcl, cape, & 5 5 cin, eauliq, ctei, d_qt, d_thv, dlt_2, xhis, posint, omega, diagok) 6 USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO & 7 , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA & 8 , R_ecc, R_peri, R_incl & 9 , RA, RG, R1SA & 10 , RSIGMA & 11 , R, RMD, RMV, RD, RV, RCPD & 12 , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12 & 13 , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w & 14 , RCW, RCS & 15 , RLVTT, RLSTT, RLMLT, RTT, RATM & 16 , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS & 17 , RALPD, RBETD, RGAMD 6 18 USE dimphy 7 19 IMPLICIT NONE … … 29 41 ! * re-ecriture complete Alain Mars 2012 dans LMDZ5V5 * 30 42 ! *************************************************************** 31 include "YOMCST.h"32 43 REAL rlvcp, reps 33 44 ! Arguments:
Note: See TracChangeset
for help on using the changeset viewer.