Changeset 4593 for LMDZ6/trunk/libf/phylmd/Dust
- Timestamp:
- Jun 29, 2023, 3:55:54 PM (19 months ago)
- Location:
- LMDZ6/trunk/libf/phylmd/Dust
- Files:
-
- 35 edited
-
aeropt_spl.F (modified) (1 diff)
-
bcscav_spl.F (modified) (1 diff)
-
bl_for_dms.F (modified) (1 diff)
-
blcloud_scav.F (modified) (1 diff)
-
blcloud_scav_lsc.F (modified) (1 diff)
-
checkmass.F90 (modified) (1 diff)
-
cltrac_spl.F (modified) (2 diffs)
-
cm3_to_kg.F (modified) (1 diff)
-
coarsemission.F (modified) (1 diff)
-
condsurfc.F (modified) (1 diff)
-
condsurfc_new.F (modified) (1 diff)
-
condsurfs.F (modified) (1 diff)
-
condsurfs_new.F (modified) (1 diff)
-
deposition.F (modified) (1 diff)
-
finemission.F (modified) (1 diff)
-
gastoparticle.F (modified) (1 diff)
-
incloud_scav.F (modified) (1 diff)
-
incloud_scav_lsc.F (modified) (1 diff)
-
inscav_spl.F (modified) (1 diff)
-
kg_to_cm3.F (modified) (1 diff)
-
minmaxqfi2.F (modified) (1 diff)
-
minmaxsource.F (modified) (1 diff)
-
neutral.F (modified) (1 diff)
-
nightingale.F (modified) (1 diff)
-
phys_output_write_spl_mod.F90 (modified) (1 diff)
-
phytracr_spl_mod.F90 (modified) (1 diff)
-
precuremission.F (modified) (1 diff)
-
read_dust.F (modified) (1 diff)
-
read_newemissions.F (modified) (1 diff)
-
read_surface.F90 (modified) (1 diff)
-
read_vent.F (modified) (1 diff)
-
seasalt.F (modified) (1 diff)
-
sediment_mod.F (modified) (1 diff)
-
tiedqneg.F (modified) (1 diff)
-
trconvect.F (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/Dust/aeropt_spl.F
r2630 r4593 12 12 IMPLICIT none 13 13 c 14 #include"chem.h"15 #include"dimensions.h"16 c #include"dimphy.h"17 #include"YOMCST.h"14 INCLUDE "chem.h" 15 INCLUDE "dimensions.h" 16 cINCLUDE "dimphy.h" 17 INCLUDE "YOMCST.h" 18 18 c 19 19 c Arguments: -
LMDZ6/trunk/libf/phylmd/Dust/bcscav_spl.F
r2630 r4593 9 9 c===================================================================== 10 10 c 11 #include"dimensions.h"12 #include"chem.h"13 #include"YOMCST.h"14 #include"YOECUMF.h"11 INCLUDE "dimensions.h" 12 INCLUDE "chem.h" 13 INCLUDE "YOMCST.h" 14 INCLUDE "YOECUMF.h" 15 15 c 16 16 REAL pdtime, alpha_r, alpha_s, R_r, R_s -
LMDZ6/trunk/libf/phylmd/Dust/bl_for_dms.F
r2630 r4593 17 17 c=================================================================== 18 18 c 19 #include"dimensions.h"20 #include"YOMCST.h"21 #include"YOETHF.h"22 #include"FCTTRE.h"19 INCLUDE "dimensions.h" 20 INCLUDE "YOMCST.h" 21 INCLUDE "YOETHF.h" 22 INCLUDE "FCTTRE.h" 23 23 c 24 24 c Arguments : -
LMDZ6/trunk/libf/phylmd/Dust/blcloud_scav.F
r2630 r4593 10 10 IMPLICIT NONE 11 11 12 #include"dimensions.h"13 #include"chem.h"14 #include"YOMCST.h"15 #include"paramet.h"12 INCLUDE "dimensions.h" 13 INCLUDE "chem.h" 14 INCLUDE "YOMCST.h" 15 INCLUDE "paramet.h" 16 16 17 17 c============================= INPUT =================================== -
LMDZ6/trunk/libf/phylmd/Dust/blcloud_scav_lsc.F
r2630 r4593 10 10 IMPLICIT NONE 11 11 12 #include"dimensions.h"13 #include"chem.h"14 #include"YOMCST.h"15 #include"paramet.h"12 INCLUDE "dimensions.h" 13 INCLUDE "chem.h" 14 INCLUDE "YOMCST.h" 15 INCLUDE "paramet.h" 16 16 17 17 c============================= INPUT =================================== -
LMDZ6/trunk/libf/phylmd/Dust/checkmass.F90
r2630 r4593 4 4 IMPLICIT NONE 5 5 6 #include"YOMCST.h"6 INCLUDE "YOMCST.h" 7 7 8 8 ! Entrees -
LMDZ6/trunk/libf/phylmd/Dust/cltrac_spl.F
r2630 r4593 26 26 c flux_tr--output-R- flux de tr 27 27 c====================================================================== 28 #include"dimensions.h"28 INCLUDE "dimensions.h" 29 29 REAL dtime 30 30 REAL coef(klon,klev) … … 36 36 c REAL flux_tr(klon,klev) 37 37 c====================================================================== 38 #include"YOMCST.h"38 INCLUDE "YOMCST.h" 39 39 c====================================================================== 40 40 INTEGER i, k -
LMDZ6/trunk/libf/phylmd/Dust/cm3_to_kg.F
r2630 r4593 7 7 IMPLICIT NONE 8 8 c 9 #include"dimensions.h"10 #include"YOMCST.h"9 INCLUDE "dimensions.h" 10 INCLUDE "YOMCST.h" 11 11 c 12 12 REAL t_seri(klon,klev), pplay(klon,klev) -
LMDZ6/trunk/libf/phylmd/Dust/coarsemission.F
r2630 r4593 33 33 IMPLICIT NONE 34 34 35 #include"dimensions.h"36 #include"chem.h"37 #include"chem_spla.h"38 #include"YOMCST.h"39 #include"paramet.h"35 INCLUDE "dimensions.h" 36 INCLUDE "chem.h" 37 INCLUDE "chem_spla.h" 38 INCLUDE "YOMCST.h" 39 INCLUDE "paramet.h" 40 40 41 41 c============================== INPUT ================================== -
LMDZ6/trunk/libf/phylmd/Dust/condsurfc.F
r2630 r4593 9 9 ! -------------------------------------------------------- 10 10 ! 11 #include "dimensions.h" 12 #include "netcdf.inc" 11 INCLUDE "dimensions.h" 12 INCLUDE "netcdf.inc" 13 13 14 REAL lmt_bcff(klon), lmt_bcbb(klon),lmt_bc_penner(klon) 14 15 REAL lmt_omff(klon), lmt_ombb(klon) -
LMDZ6/trunk/libf/phylmd/Dust/condsurfc_new.F
r2630 r4593 11 11 c -------------------------------------------------------- 12 12 c 13 #include "dimensions.h" 14 #include "netcdf.inc" 13 INCLUDE "dimensions.h" 14 INCLUDE "netcdf.inc" 15 15 16 REAL lmt_bcff(klon), lmt_bcnff(klon), lmt_bcba(klon) 16 17 REAL lmt_omff(klon), lmt_omnff(klon), lmt_ombb(klon) -
LMDZ6/trunk/libf/phylmd/Dust/condsurfs.F
r2630 r4593 9 9 c -------------------------------------------------------- 10 10 c 11 #include"dimensions.h"12 #include"netcdf.inc"11 INCLUDE "dimensions.h" 12 INCLUDE "netcdf.inc" 13 13 c 14 14 REAL lmt_so2h(klon), lmt_so2b(klon), lmt_so2bb(klon) -
LMDZ6/trunk/libf/phylmd/Dust/condsurfs_new.F
r2630 r4593 14 14 c -------------------------------------------------------- 15 15 c 16 #include"dimensions.h"17 #include"netcdf.inc"16 INCLUDE "dimensions.h" 17 INCLUDE "netcdf.inc" 18 18 c 19 19 REAL lmt_so2b(klon), lmt_so2h(klon), lmt_so2nff(klon) -
LMDZ6/trunk/libf/phylmd/Dust/deposition.F
r2630 r4593 12 12 IMPLICIT NONE 13 13 14 #include"dimensions.h"15 #include"chem.h"16 #include"YOMCST.h"17 #include"paramet.h"14 INCLUDE "dimensions.h" 15 INCLUDE "chem.h" 16 INCLUDE "YOMCST.h" 17 INCLUDE "paramet.h" 18 18 19 19 c----------------------------- INPUT ----------------------------------- -
LMDZ6/trunk/libf/phylmd/Dust/finemission.F
r2630 r4593 17 17 IMPLICIT NONE 18 18 19 #include"dimensions.h"20 #include"chem.h"21 #include"YOMCST.h"22 #include"paramet.h"19 INCLUDE "dimensions.h" 20 INCLUDE "chem.h" 21 INCLUDE "YOMCST.h" 22 INCLUDE "paramet.h" 23 23 24 24 INTEGER i, k, kminbc, kmaxbc -
LMDZ6/trunk/libf/phylmd/Dust/gastoparticle.F
r2630 r4593 10 10 IMPLICIT NONE 11 11 c 12 #include"dimensions.h"13 #include"chem.h"14 #include"chem_spla.h"15 #include"YOMCST.h"16 #include"YOECUMF.h"12 INCLUDE "dimensions.h" 13 INCLUDE "chem.h" 14 INCLUDE "chem_spla.h" 15 INCLUDE "YOMCST.h" 16 INCLUDE "YOECUMF.h" 17 17 c 18 18 REAL pdtphys -
LMDZ6/trunk/libf/phylmd/Dust/incloud_scav.F
r2630 r4593 11 11 IMPLICIT NONE 12 12 13 #include"dimensions.h"14 #include"chem.h"15 #include"YOMCST.h"16 #include"paramet.h"13 INCLUDE "dimensions.h" 14 INCLUDE "chem.h" 15 INCLUDE "YOMCST.h" 16 INCLUDE "paramet.h" 17 17 18 18 c============================= INPUT =================================== -
LMDZ6/trunk/libf/phylmd/Dust/incloud_scav_lsc.F
r2630 r4593 11 11 IMPLICIT NONE 12 12 13 #include"dimensions.h"14 #include"chem.h"15 #include"YOMCST.h"16 #include"paramet.h"13 INCLUDE "dimensions.h" 14 INCLUDE "chem.h" 15 INCLUDE "YOMCST.h" 16 INCLUDE "paramet.h" 17 17 18 18 c============================= INPUT =================================== -
LMDZ6/trunk/libf/phylmd/Dust/inscav_spl.F
r2630 r4593 10 10 c===================================================================== 11 11 c 12 #include"dimensions.h"13 #include"chem.h"14 #include"YOMCST.h"15 #include"YOECUMF.h"12 INCLUDE "dimensions.h" 13 INCLUDE "chem.h" 14 INCLUDE "YOMCST.h" 15 INCLUDE "YOECUMF.h" 16 16 c 17 17 INTEGER it -
LMDZ6/trunk/libf/phylmd/Dust/kg_to_cm3.F
r2630 r4593 5 5 IMPLICIT NONE 6 6 c 7 #include"dimensions.h"8 #include"YOMCST.h"7 INCLUDE "dimensions.h" 8 INCLUDE "YOMCST.h" 9 9 c 10 10 REAL t_seri(klon,klev), pplay(klon,klev) -
LMDZ6/trunk/libf/phylmd/Dust/minmaxqfi2.F
r2630 r4593 3 3 USE dimphy 4 4 USE infotrac 5 #include"dimensions.h"5 INCLUDE "dimensions.h" 6 6 7 7 ! character*20 comment -
LMDZ6/trunk/libf/phylmd/Dust/minmaxsource.F
r2630 r4593 4 4 USE infotrac 5 5 6 #include"dimensions.h"6 INCLUDE "dimensions.h" 7 7 8 8 ! character*20 comment -
LMDZ6/trunk/libf/phylmd/Dust/neutral.F
r2630 r4593 28 28 c 29 29 USE dimphy 30 #include"dimensions.h"30 INCLUDE "dimensions.h" 31 31 c 32 32 real u10_mps(klon),ustar_mps(klon),obklen_m(klon) -
LMDZ6/trunk/libf/phylmd/Dust/nightingale.F
r2630 r4593 7 7 IMPLICIT NONE 8 8 c 9 #include"dimensions.h"10 #include"YOMCST.h"9 INCLUDE "dimensions.h" 10 INCLUDE "YOMCST.h" 11 11 c 12 12 REAL u(klon,klev), v(klon,klev) -
LMDZ6/trunk/libf/phylmd/Dust/phys_output_write_spl_mod.F90
r4389 r4593 489 489 !!! Champs 2D !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 490 490 ! JE20141223 << 491 #include"spla_output_write.h"491 INCLUDE "spla_output_write.h" 492 492 ! JE20141223 >> 493 493 -
LMDZ6/trunk/libf/phylmd/Dust/phytracr_spl_mod.F90
r4160 r4593 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 !====================================================================== -
LMDZ6/trunk/libf/phylmd/Dust/precuremission.F
r2630 r4593 22 22 IMPLICIT NONE 23 23 24 #include"dimensions.h"25 #include"chem.h"26 #include"chem_spla.h"27 #include"YOMCST.h"28 #include"paramet.h"24 INCLUDE "dimensions.h" 25 INCLUDE "chem.h" 26 INCLUDE "chem_spla.h" 27 INCLUDE "YOMCST.h" 28 INCLUDE "paramet.h" 29 29 30 30 c============================= INPUT =================================== -
LMDZ6/trunk/libf/phylmd/Dust/read_dust.F
r3786 r4593 5 5 IMPLICIT NONE 6 6 c 7 #include"dimensions.h"8 #include"paramet.h"9 #include"netcdf.inc"7 INCLUDE "dimensions.h" 8 INCLUDE "paramet.h" 9 INCLUDE "netcdf.inc" 10 10 c 11 11 INTEGER step, nbjour -
LMDZ6/trunk/libf/phylmd/Dust/read_newemissions.F
r3786 r4593 26 26 27 27 28 #include"dimensions.h"28 INCLUDE "dimensions.h" 29 29 c INCLUDE 'dimphy.h' 30 30 INCLUDE 'paramet.h' -
LMDZ6/trunk/libf/phylmd/Dust/read_surface.F90
r2630 r4593 13 13 IMPLICIT NONE 14 14 15 include"netcdf.inc"16 #include"dimensions.h"17 #include"paramet.h"15 INCLUDE "netcdf.inc" 16 INCLUDE "dimensions.h" 17 INCLUDE "paramet.h" 18 18 19 19 character*10 name -
LMDZ6/trunk/libf/phylmd/Dust/read_vent.F
r3806 r4593 5 5 ! USE write_field_phy 6 6 IMPLICIT NONE 7 #include"dimensions.h"8 c #include"dimphy.h"9 #include"paramet.h"10 #include"netcdf.inc"7 INCLUDE "dimensions.h" 8 c INCLUDE "dimphy.h" 9 INCLUDE "paramet.h" 10 INCLUDE "netcdf.inc" 11 11 c 12 12 INTEGER step, nbjour -
LMDZ6/trunk/libf/phylmd/Dust/seasalt.F
r2630 r4593 7 7 IMPLICIT NONE 8 8 c 9 #include"dimensions.h"10 #include"chem.h"11 #include"chem_spla.h"12 #include"YOMCST.h"13 #include"YOECUMF.h"9 INCLUDE "dimensions.h" 10 INCLUDE "chem.h" 11 INCLUDE "chem_spla.h" 12 INCLUDE "YOMCST.h" 13 INCLUDE "YOECUMF.h" 14 14 c 15 15 INTEGER i, bin !local variables -
LMDZ6/trunk/libf/phylmd/Dust/sediment_mod.F
r2630 r4593 12 12 IMPLICIT NONE 13 13 c 14 #include"dimensions.h"15 #include"chem.h"16 c #include"dimphy.h"17 #include"YOMCST.h"18 #include"YOECUMF.h"14 INCLUDE "dimensions.h" 15 INCLUDE "chem.h" 16 c INCLUDE "dimphy.h" 17 INCLUDE "YOMCST.h" 18 INCLUDE "YOECUMF.h" 19 19 c 20 20 REAL RHcl(klon,klev) ! humidite relative ciel clair -
LMDZ6/trunk/libf/phylmd/Dust/tiedqneg.F
r2630 r4593 15 15 c====================================================================== 16 16 c 17 #include"dimensions.h"18 c #include"dimphy.h"17 INCLUDE "dimensions.h" 18 c INCLUDE "dimphy.h" 19 19 REAL pres_h(klon,klev+1) 20 20 REAL q(klon,klev) -
LMDZ6/trunk/libf/phylmd/Dust/trconvect.F
r2630 r4593 10 10 IMPLICIT NONE 11 11 12 #include"dimensions.h"13 #include"chem.h"14 #include"YOMCST.h"15 #include"paramet.h"12 INCLUDE "dimensions.h" 13 INCLUDE "chem.h" 14 INCLUDE "YOMCST.h" 15 INCLUDE "paramet.h" 16 16 17 17 c============================= INPUT ===================================
Note: See TracChangeset
for help on using the changeset viewer.
