Ignore:
Timestamp:
Jul 24, 2024, 11:19:08 AM (4 months ago)
Author:
abarral
Message:

Rename modules properly (mod_* -> lmdz_*) in phy_common

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/phytracr_spl_mod.F90

    r5106 r5110  
    783783    !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    784784
    785     USE mod_grid_phy_lmdz
    786     USE mod_phys_lmdz_para
     785    USE lmdz_grid_phy
     786    USE lmdz_phys_para
    787787    USE IOIPSL
    788788    USE dimphy
    … …  
    791791    USE write_field_phy
    792792
    793     USE mod_phys_lmdz_transfert_para
     793    USE lmdz_phys_transfert_para
    794794    USE lmdz_thermcell_dq, ONLY: thermcell_dq
    795795    USE phys_cal_mod, ONLY: jD_1jan, year_len, mth_len, days_elapsed, jh_1jan, year_cur, &
    … …  
    42124212  SUBROUTINE readregionsdims2_spl(nbreg, fileregions)
    42134213
    4214     USE mod_grid_phy_lmdz
    4215     USE mod_phys_lmdz_para
     4214    USE lmdz_grid_phy
     4215    USE lmdz_phys_para
    42164216
    42174217    IMPLICIT NONE
    … …  
    42344234          nbreg_dust, fileregionsdimsdust, &
    42354235          nbreg_bb, fileregionsdimsbb)
    4236     USE mod_grid_phy_lmdz
    4237     USE mod_phys_lmdz_para
     4236    USE lmdz_grid_phy
     4237    USE lmdz_phys_para
    42384238
    42394239    IMPLICIT NONE
    … …  
    42704270  SUBROUTINE readregions_spl(iregion, filenameregion)
    42714271    USE dimphy
    4272     USE mod_grid_phy_lmdz
    4273     USE mod_phys_lmdz_para
     4272    USE lmdz_grid_phy
     4273    USE lmdz_phys_para
    42744274
    42754275    IMPLICIT NONE
    … …  
    42954295  SUBROUTINE readscaleparams_spl(scale_param, nbreg, &
    42964296          filescaleparams)
    4297     USE mod_grid_phy_lmdz
    4298     USE mod_phys_lmdz_para
     4297    USE lmdz_grid_phy
     4298    USE lmdz_phys_para
    42994299    IMPLICIT NONE
    43004300
    … …  
    43324332    !                                        filescaleparams,paramname,&
    43334333    !                                        julien,jH_phys, pdtphys,debutphy)
    4334     USE mod_grid_phy_lmdz
    4335     USE mod_phys_lmdz_para
     4334    USE lmdz_grid_phy
     4335    USE lmdz_phys_para
    43364336    IMPLICIT NONE
    43374337
    … …  
    44334433          scale_param)
    44344434
    4435     USE mod_grid_phy_lmdz
    4436     USE mod_phys_lmdz_para
     4435    USE lmdz_grid_phy
     4436    USE lmdz_phys_para
    44374437    USE netcdf, ONLY: nf90_open, nf90_close, nf90_inq_varid, nf90_nowrite, nf90_noerr, nf90_get_var
    44384438    IMPLICIT NONE
Note: See TracChangeset for help on using the changeset viewer.