Changeset 5110 for LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer
- Timestamp:
- Jul 24, 2024, 11:19:08 AM (7 months ago)
- Location:
- LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer
- Files:
-
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/interp_sulf_input.F90
r5105 r5110 8 8 USE netcdf, ONLY: nf90_get_var, nf90_noerr, nf90_nowrite 9 9 10 USE mod_grid_phy_lmdz11 USE mod_phys_lmdz_mpi_data, ONLY: is_mpi_root12 USE mod_phys_lmdz_omp_data, ONLY: is_omp_root10 USE lmdz_grid_phy 11 USE lmdz_phys_mpi_data, ONLY: is_mpi_root 12 USE lmdz_phys_omp_data, ONLY: is_omp_root 13 13 USE phys_local_var_mod, ONLY: budg_3D_backgr_ocs, budg_3D_backgr_so2 14 14 USE phys_local_var_mod, ONLY: OCS_lifetime, SO2_lifetime, H2SO4_lifetime, O3_clim 15 USE mod_phys_lmdz_para15 USE lmdz_phys_para 16 16 USE dimphy 17 17 USE phys_cal_mod -
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/miecalc_aer.F90
r5101 r5110 21 21 USE dimphy 22 22 USE lmdz_yomcst , ONLY: RG, RPI 23 USE mod_phys_lmdz_para, only: gather, scatter, bcast24 USE mod_grid_phy_lmdz, ONLY: klon_glo25 USE mod_phys_lmdz_mpi_data, ONLY: is_mpi_root23 USE lmdz_phys_para, only: gather, scatter, bcast 24 USE lmdz_grid_phy, ONLY: klon_glo 25 USE lmdz_phys_mpi_data, ONLY: is_mpi_root 26 26 USE print_control_mod, ONLY: prt_level, lunout 27 27 -
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/stratH2O_methox.F90
r5105 r5110 10 10 USE netcdf, ONLY: nf90_get_var, nf90_noerr, nf90_nowrite 11 11 12 USE mod_grid_phy_lmdz13 USE mod_phys_lmdz_mpi_data, ONLY: is_mpi_root14 USE mod_phys_lmdz_omp_data, ONLY: is_omp_root12 USE lmdz_grid_phy 13 USE lmdz_phys_mpi_data, ONLY: is_mpi_root 14 USE lmdz_phys_omp_data, ONLY: is_omp_root 15 15 16 USE mod_phys_lmdz_para16 USE lmdz_phys_para 17 17 USE dimphy 18 18 USE phys_cal_mod, ONLY: mth_cur -
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/strataer_emiss_mod.F90
r5101 r5110 9 9 USE ioipsl_getin_p_mod, ONLY: getin_p 10 10 USE print_control_mod, ONLY: lunout 11 USE mod_phys_lmdz_para, ONLY: is_master11 USE lmdz_phys_para, ONLY: is_master 12 12 13 13 ! Local variables … … 216 216 USE regular_lonlat_mod, ONLY: lon_reg, lat_reg 217 217 USE dimphy, ONLY: klon 218 USE mod_grid_phy_lmdz, ONLY: nbp_lat, nbp_lon218 USE lmdz_grid_phy, ONLY: nbp_lat, nbp_lon 219 219 USE print_control_mod, ONLY: lunout 220 220 USE strataer_local_var_mod -
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/strataer_local_var_mod.F90
r5098 r5110 157 157 USE ioipsl_getin_p_mod, ONLY: getin_p 158 158 USE print_control_mod, ONLY: lunout 159 USE mod_phys_lmdz_para, ONLY: is_master159 USE lmdz_phys_para, ONLY: is_master 160 160 USE infotrac_phy, ONLY: id_OCS_strat, id_SO2_strat, id_H2SO4_strat, nbtr_sulgas, nbtr_bin 161 161 USE phys_local_var_mod, ONLY: mdw -
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/strataer_nuc_mod.F90
r5101 r5110 12 12 USE ioipsl_getin_p_mod, ONLY: getin_p 13 13 USE print_control_mod, ONLY: lunout 14 USE mod_phys_lmdz_para, ONLY: is_master14 USE lmdz_phys_para, ONLY: is_master 15 15 USE strataer_local_var_mod, ONLY: ALPH2SO4,flag_nuc_rate_box,nuclat_min,nuclat_max, & 16 16 nucpres_min,nucpres_max -
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/stratemit.F90
r5101 r5110 14 14 USE aerophys 15 15 USE infotrac_phy 16 USE mod_phys_lmdz_mpi_data, ONLY: is_mpi_root17 USE mod_grid_phy_lmdz, ONLY: nbp_lon16 USE lmdz_phys_mpi_data, ONLY: is_mpi_root 17 USE lmdz_grid_phy, ONLY: nbp_lon 18 18 19 19 IMPLICIT NONE -
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/traccoag_mod.F90
r5101 r5110 18 18 USE aerophys 19 19 USE geometry_mod, ONLY: cell_area, boundslat 20 USE mod_grid_phy_lmdz21 USE mod_phys_lmdz_mpi_data, ONLY: is_mpi_root22 USE mod_phys_lmdz_para, only: gather, scatter20 USE lmdz_grid_phy 21 USE lmdz_phys_mpi_data, ONLY: is_mpi_root 22 USE lmdz_phys_para, only: gather, scatter 23 23 USE phys_cal_mod, ONLY: year_len, year_cur, mth_cur, day_cur, hour 24 24 USE sulfate_aer_mod
Note: See TracChangeset
for help on using the changeset viewer.