Ignore:
Timestamp:
Jul 24, 2024, 12:45:32 PM (6 months ago)
Author:
abarral
Message:

Rename modules in phy_common from *_mod > lmdz_*

Location:
LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer
Files:
7 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/micphy_tstep.F90

    r5101 r5112  
    44SUBROUTINE micphy_tstep(pdtphys,tr_seri,t_seri,pplay,paprs,rh,is_strato)
    55
    6   USE geometry_mod, ONLY: latitude_deg !NL- latitude corr. to local domain
     6  USE lmdz_geometry, ONLY: latitude_deg !NL- latitude corr. to local domain
    77  USE dimphy, ONLY: klon,klev
    88  USE aerophys
    … …  
    1414  USE sulfate_aer_mod, ONLY: STRAACT
    1515  USE lmdz_yomcst, ONLY: RPI, RD, RG
    16   USE print_control_mod, ONLY: lunout
     16  USE lmdz_print_control, ONLY: lunout
    1717  USE strataer_local_var_mod ! contains also RRSI and Vbin
    1818 

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/miecalc_aer.F90

    r5110 r5112  
    2424  USE lmdz_grid_phy, ONLY: klon_glo
    2525  USE lmdz_phys_mpi_data, ONLY:  is_mpi_root
    26   USE print_control_mod, ONLY: prt_level, lunout
     26  USE lmdz_print_control, ONLY: prt_level, lunout
    2727
    2828  IMPLICIT NONE

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/strataer_emiss_mod.F90

    r5111 r5112  
    77
    88    USE strataer_local_var_mod
    9     USE ioipsl_getin_p_mod, ONLY: getin_p
    10     USE print_control_mod, ONLY: lunout
     9    USE lmdz_ioipsl_getin_p, ONLY: getin_p
     10    USE lmdz_print_control, ONLY: lunout
    1111    USE lmdz_phys_para, ONLY: is_master
    1212    USE lmdz_abort_physic, ONLY: abort_physic
    … …  
    215215  SUBROUTINE strataer_ponde_init()
    216216
    217     USE regular_lonlat_mod, ONLY: lon_reg, lat_reg
     217    USE lmdz_regular_lonlat, ONLY: lon_reg, lat_reg
    218218    USE dimphy, ONLY: klon
    219219    USE lmdz_grid_phy, ONLY: nbp_lat, nbp_lon
    220     USE print_control_mod, ONLY: lunout
     220    USE lmdz_print_control, ONLY: lunout
    221221    USE strataer_local_var_mod
    222222    USE lmdz_yomcst, ONLY: RPI

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/strataer_local_var_mod.F90

    r5111 r5112  
    155155
    156156  SUBROUTINE strataer_init()
    157     USE ioipsl_getin_p_mod, ONLY: getin_p
    158     USE print_control_mod, ONLY: lunout
     157    USE lmdz_ioipsl_getin_p, ONLY: getin_p
     158    USE lmdz_print_control, ONLY: lunout
    159159    USE lmdz_phys_para, ONLY: is_master
    160160    USE infotrac_phy, ONLY: id_OCS_strat, id_SO2_strat, id_H2SO4_strat, nbtr_sulgas, nbtr_bin

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/strataer_nuc_mod.F90

    r5110 r5112  
    1010  SUBROUTINE strataer_nuc_init()
    1111   
    12     USE ioipsl_getin_p_mod, ONLY: getin_p
    13     USE print_control_mod, ONLY: lunout
     12    USE lmdz_ioipsl_getin_p, ONLY: getin_p
     13    USE lmdz_print_control, ONLY: lunout
    1414    USE lmdz_phys_para, ONLY: is_master
    1515    USE strataer_local_var_mod, ONLY: ALPH2SO4,flag_nuc_rate_box,nuclat_min,nuclat_max, &
    … …  
    5151    USE infotrac_phy, ONLY: nbtr, nbtr_sulgas, id_H2SO4_strat
    5252    USE ioipsl, ONLY: getin
    53     USE print_control_mod, ONLY: lunout
     53    USE lmdz_print_control, ONLY: lunout
    5454   
    5555    ! Output variables

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/stratemit.F90

    r5110 r5112  
    1111  USE phys_local_var_mod, ONLY: d_q_emiss
    1212  USE lmdz_yomcst, ONLY: RD, RPI, RG
    13   USE geometry_mod, ONLY: cell_area, boundslat
     13  USE lmdz_geometry, ONLY: cell_area, boundslat
    1414  USE aerophys
    1515  USE infotrac_phy

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/traccoag_mod.F90

    r5111 r5112  
    1717    USE infotrac_phy, ONLY: nbtr_bin, nbtr_sulgas, nbtr, id_SO2_strat
    1818    USE aerophys
    19     USE geometry_mod, ONLY: cell_area, boundslat
     19    USE lmdz_geometry, ONLY: cell_area, boundslat
    2020    USE lmdz_grid_phy
    2121    USE lmdz_phys_mpi_data, ONLY: is_mpi_root
    … …  
    2525    USE phys_local_var_mod, ONLY: stratomask
    2626    USE lmdz_yomcst
    27     USE print_control_mod, ONLY: lunout
     27    USE lmdz_print_control, ONLY: lunout
    2828    USE strataer_local_var_mod
    2929
Note: See TracChangeset for help on using the changeset viewer.