Changeset 5264 for LMDZ6/trunk
- Timestamp:
- Oct 23, 2024, 12:51:49 PM (2 months ago)
- Location:
- LMDZ6/trunk/libf/phylmd
- Files:
-
- 15 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/Dust/splaerosol_optic_rrtm.F90
r4071 r5264 14 14 USE aero_mod 15 15 USE infotrac_phy, ONLY: nbtr, nqtot, tracers 16 USE YOMCST, ONLY: RD, RG16 USE yomcst_mod_h, ONLY: RD, RG 17 17 18 18 IMPLICIT NONE -
LMDZ6/trunk/libf/phylmd/StratAer/aer_sedimnt.F90
r4950 r5264 22 22 USE infotrac_phy 23 23 USE aerophys 24 USE YOMCST24 USE yomcst_mod_h 25 25 26 26 IMPLICIT NONE -
LMDZ6/trunk/libf/phylmd/StratAer/calcaerosolstrato_rrtm.F90
r4293 r5264 9 9 USE dimphy 10 10 USE temps_mod 11 USE YOMCST11 USE yomcst_mod_h 12 12 13 13 IMPLICIT NONE -
LMDZ6/trunk/libf/phylmd/StratAer/cond_evap_tstep_mod.F90
r4950 r5264 28 28 USE aerophys 29 29 USE infotrac_phy 30 USE YOMCST, ONLY : RPI30 USE yomcst_mod_h, ONLY : RPI 31 31 USE sulfate_aer_mod, ONLY : wph2so4, surftension, solh2so4, rpmvh2so4 32 32 USE strataer_local_var_mod, ONLY : ALPH2SO4, RRSI … … 177 177 USE aerophys 178 178 USE infotrac_phy 179 USE YOMCST, ONLY : RPI179 USE yomcst_mod_h, ONLY : RPI 180 180 USE strataer_local_var_mod, ONLY : ALPH2SO4, RRSI 181 181 … … 290 290 USE aerophys 291 291 USE infotrac_phy 292 USE YOMCST, ONLY : RPI292 USE yomcst_mod_h, ONLY : RPI 293 293 USE strataer_local_var_mod, ONLY : RRSI,Vbin 294 294 -
LMDZ6/trunk/libf/phylmd/StratAer/interp_sulf_input.F90
r5084 r5264 18 18 USE infotrac_phy 19 19 USE aerophys 20 USE YOMCST20 USE yomcst_mod_h 21 21 USE strataer_local_var_mod, ONLY : flag_newclim_file,flag_verbose_strataer 22 22 -
LMDZ6/trunk/libf/phylmd/StratAer/micphy_tstep.F90
r4950 r5264 13 13 USE cond_evap_tstep_mod 14 14 USE sulfate_aer_mod, ONLY : STRAACT 15 USE YOMCST, ONLY : RPI, RD, RG15 USE yomcst_mod_h, ONLY : RPI, RD, RG 16 16 USE print_control_mod, ONLY: lunout 17 17 USE strataer_local_var_mod ! contains also RRSI and Vbin -
LMDZ6/trunk/libf/phylmd/StratAer/miecalc_aer.F90
r4950 r5264 20 20 USE infotrac_phy, ONLY : nbtr, nbtr_bin, nbtr_sulgas, id_SO2_strat 21 21 USE dimphy 22 USE YOMCST, ONLY : RG, RPI22 USE yomcst_mod_h , ONLY : RG, RPI 23 23 USE mod_phys_lmdz_para, only: gather, scatter, bcast 24 24 USE mod_grid_phy_lmdz, ONLY : klon_glo -
LMDZ6/trunk/libf/phylmd/StratAer/ocs_to_so2.F90
r4601 r5264 7 7 USE aerophys 8 8 USE infotrac_phy 9 USE YOMCST, ONLY : RG9 USE yomcst_mod_h, ONLY : RG 10 10 USE phys_local_var_mod, ONLY : OCS_lifetime, budg_3D_ocs_to_so2, budg_ocs_to_so2 11 11 USE strataer_local_var_mod, ONLY : flag_min_rreduce -
LMDZ6/trunk/libf/phylmd/StratAer/so2_to_h2so4.F90
r4601 r5264 7 7 USE aerophys 8 8 USE infotrac_phy 9 USE YOMCST, ONLY : RG, RD9 USE yomcst_mod_h, ONLY : RG, RD 10 10 ! lifetime (sec) et O3_clim (VMR) 11 11 USE phys_local_var_mod, ONLY : SO2_lifetime, H2SO4_lifetime, O3_clim, budg_3D_so2_to_h2so4, budg_so2_to_h2so4 -
LMDZ6/trunk/libf/phylmd/StratAer/stratH2O_methox.F90
r5084 r5264 19 19 USE infotrac_phy 20 20 USE aerophys 21 USE YOMCST21 USE yomcst_mod_h 22 22 USE strataer_local_var_mod, ONLY : flag_newclim_file 23 23 -
LMDZ6/trunk/libf/phylmd/StratAer/strataer_local_var_mod.F90
r5243 r5264 161 161 USE phys_local_var_mod, ONLY : mdw 162 162 USE aerophys, ONLY: mdwmin, V_rat 163 USE YOMCST, ONLY : RPI163 USE yomcst_mod_h , ONLY : RPI 164 164 165 165 INTEGER :: it -
LMDZ6/trunk/libf/phylmd/StratAer/stratdistrib.F90
r4601 r5264 6 6 USE dimphy, ONLY : klon,klev 7 7 USE strataer_local_var_mod 8 USE YOMCST, only : RPI8 USE yomcst_mod_h, only : RPI 9 9 10 10 IMPLICIT NONE -
LMDZ6/trunk/libf/phylmd/StratAer/stratemit.F90
r4601 r5264 10 10 USE phys_cal_mod 11 11 USE phys_local_var_mod, ONLY: d_q_emiss 12 USE YOMCST, only : RD, RPI, RG12 USE yomcst_mod_h, only : RD, RPI, RG 13 13 USE geometry_mod, ONLY : cell_area, boundslat 14 14 USE aerophys -
LMDZ6/trunk/libf/phylmd/StratAer/traccoag_mod.F90
r5239 r5264 24 24 USE sulfate_aer_mod 25 25 USE phys_local_var_mod, ONLY: stratomask 26 USE YOMCST26 USE yomcst_mod_h 27 27 USE print_control_mod, ONLY: lunout 28 28 USE strataer_local_var_mod -
LMDZ6/trunk/libf/phylmd/yomcst_mod_h.f90
r5254 r5264 1 1 ! Replaces yomcst.h 2 2 3 module yomcst 3 module yomcst_mod_h 4 4 IMPLICIT NONE; PRIVATE 5 5 … … 53 53 !$OMP , RALPD, RBETD, RGAMD) 54 54 55 END MODULE yomcst 55 END MODULE yomcst_mod_h
Note: See TracChangeset
for help on using the changeset viewer.