- Timestamp:
- Oct 19, 2023, 4:02:57 PM (8 months 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/Dust/phytracr_spl_mod.F90
r4160 r4727 804 804 805 805 USE mod_phys_lmdz_transfert_para 806 807 USE phys_cal_mod, only: jD_1jan,year_len, mth_len, days_elapsed, jh_1jan, year_cur, &808 mth_cur, phys_cal_update806 USE lmdz_thermcell_dq, ONLY : thermcell_dq 807 USE phys_cal_mod, only: jD_1jan,year_len, mth_len, days_elapsed, jh_1jan, year_cur, & 808 mth_cur, phys_cal_update 809 809 810 810 ! … … 823 823 !! et c'est encore different avec le parser de DC ? 824 824 !====================================================================== 825 #include"dimensions.h"826 #include"chem.h"827 #include"chem_spla.h"828 #include"YOMCST.h"829 #include"YOETHF.h"830 #include"paramet.h"831 #include"alpale.h"825 INCLUDE "dimensions.h" 826 INCLUDE "chem.h" 827 INCLUDE "chem_spla.h" 828 INCLUDE "YOMCST.h" 829 INCLUDE "YOETHF.h" 830 INCLUDE "paramet.h" 831 INCLUDE "alpale.h" 832 832 833 833 !====================================================================== … … 1070 1070 !---------- 1071 1071 REAL,DIMENSION(klon,klev+1),INTENT(IN) :: fm_therm 1072 REAL,DIMENSION(klon,klev),INTENT(IN ) :: entr_therm1072 REAL,DIMENSION(klon,klev),INTENT(INOUT) :: entr_therm 1073 1073 1074 1074
Note: See TracChangeset
for help on using the changeset viewer.