Changeset 5274 for LMDZ6/trunk/libf/phylmdiso/lmdz_lscp_old.F90
- Timestamp:
- Oct 25, 2024, 3:41:23 PM (25 hours ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmdiso/lmdz_lscp_old.F90
r5209 r5274 68 68 #endif 69 69 70 USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO & 71 , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA & 72 , R_ecc, R_peri, R_incl & 73 , RA, RG, R1SA & 74 , RSIGMA & 75 , R, RMD, RMV, RD, RV, RCPD & 76 , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12 & 77 , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w & 78 , RCW, RCS & 79 , RLVTT, RLSTT, RLMLT, RTT, RATM & 80 , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS & 81 , RALPD, RBETD, RGAMD 70 82 IMPLICIT none 71 83 !====================================================================== … … 79 91 ! P0> Thermalisation des precipitations venant de la couche du dessus 80 92 ! P1> Evaporation de la precipitation (qui vient du niveau k+1) 81 ! P2> Formation du nuage (en k) 93 ! P2> Formation du nuage (en k) 82 94 ! P2.A.0> Calcul des grandeurs nuageuses une pdf en creneau 83 ! P2.A.1> Avec les nouvelles PDFs, calcul des grandeurs nuageuses pour 95 ! P2.A.1> Avec les nouvelles PDFs, calcul des grandeurs nuageuses pour 84 96 ! les valeurs de T et Q initiales 85 97 ! P2.A.2> Prise en compte du couplage entre eau condensee et T. … … 89 101 ! P3> Formation de la precipitation (en k) 90 102 !====================================================================== 91 ! JLD: 103 ! JLD: 92 104 ! * Routine probablement fausse (au moins incoherente) si thermcep = .false. 93 ! * fl_cor_ebil doit etre > 0 ; 105 ! * fl_cor_ebil doit etre > 0 ; 94 106 ! fl_cor_ebil= 0 pour reproduire anciens bugs 95 107 !====================================================================== 96 include "YOMCST.h"97 108 ! 98 109 ! Principaux inputs:
Note: See TracChangeset
for help on using the changeset viewer.