Changeset 4171 for LMDZ6/branches/LMDZ-ECRAD/libf/phylmd/thermcell_alim.F90
- Timestamp:
- Jun 17, 2022, 4:24:49 PM (2 years ago)
- Location:
- LMDZ6/branches/LMDZ-ECRAD
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/LMDZ-ECRAD
- Property svn:mergeinfo changed
-
LMDZ6/branches/LMDZ-ECRAD/libf/phylmd/thermcell_alim.F90
r2406 r4171 11 11 !-------------------------------------------------------------------------- 12 12 13 #include "YOMCST.h"14 #include "YOETHF.h"15 #include "FCTTRE.h"16 #include "thermcell.h"17 18 ! fort(10) ptimestep,ztv,zthl,po,zl,rhobarz,zlev,pplev,pphi,zpspsk,f019 13 INTEGER, INTENT(IN) :: ngrid,klev 20 14 REAL, INTENT(IN) :: ztv(ngrid,klev) … … 41 35 42 36 !------------------------------------------------------------------------- 43 ! Definition de l'alimentation a l'origine dans thermcell_init37 ! Definition de l'alimentation 44 38 !------------------------------------------------------------------------- 45 39 IF (flag==0) THEN ! CMIP5 version
Note: See TracChangeset
for help on using the changeset viewer.