Ignore:
Timestamp:
Jul 26, 2024, 2:20:54 PM (6 months ago)
Author:
abarral
Message:

Fix 1D, rrtm & ecrad compilation

Location:
LMDZ6/branches/Amaury_dev/libf/phylmd/cospv2
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/branches/Amaury_dev/libf/phylmd/cospv2/lmdz_cosp_interface.F90

    r5099 r5133  
    6363
    6464!!! Modules specifiques a l'interface LMDZ-COSP
    65   use mod_phys_lmdz_para
    66   use mod_grid_phy_lmdz
     65  use lmdz_phys_para
     66  use lmdz_grid_phy
    6767  use ioipsl
    6868  use iophy
  • LMDZ6/branches/Amaury_dev/libf/phylmd/cospv2/lmdz_cosp_output_mod.F90

    r5099 r5133  
    325325  USE phys_cal_mod
    326326  USE time_phylmdz_mod, ONLY: day_ref, annee_ref, day_ini, start_time, itau_phy
    327   USE print_control_mod, ONLY: lunout
     327  USE lmdz_print_control, ONLY: lunout
    328328  ! ug Pour les sorties XIOS
    329329  USE wxios
  • LMDZ6/branches/Amaury_dev/libf/phylmd/cospv2/lmdz_cosp_output_write_mod.F90

    r5099 r5133  
    3535    USE ioipsl
    3636    USE time_phylmdz_mod, ONLY: itau_phy, start_time, day_step_phy
    37     USE print_control_mod, ONLY: lunout,prt_level
     37    USE lmdz_print_control, ONLY: lunout,prt_level
    3838    USE lmdz_cosp_read_outputkeys, only: cosp_config
    3939!COSPv2
     
    654654    USE dimphy
    655655    use iophy
    656     USE mod_phys_lmdz_para
    657     USE mod_grid_phy_lmdz, ONLY: nbp_lon
    658     USE print_control_mod, ONLY: lunout,prt_level
     656    USE lmdz_phys_para
     657    USE lmdz_grid_phy, ONLY: nbp_lon
     658    USE lmdz_print_control, ONLY: lunout,prt_level
    659659  USE wxios
    660660
     
    707707    USE dimphy
    708708    use iophy
    709     USE mod_phys_lmdz_para
    710     USE mod_grid_phy_lmdz, ONLY: nbp_lon
    711     USE print_control_mod, ONLY: lunout,prt_level
     709    USE lmdz_phys_para
     710    USE lmdz_grid_phy, ONLY: nbp_lon
     711    USE lmdz_print_control, ONLY: lunout,prt_level
    712712
    713713  USE wxios
     
    801801 SUBROUTINE histwrite2d_cosp(var,field)
    802802  USE dimphy
    803   USE mod_phys_lmdz_para
     803  USE lmdz_phys_para
    804804  USE ioipsl
    805805  use iophy
    806   USE mod_grid_phy_lmdz, ONLY: nbp_lon
    807   USE print_control_mod, ONLY: lunout,prt_level
     806  USE lmdz_grid_phy, ONLY: nbp_lon
     807  USE lmdz_print_control, ONLY: lunout,prt_level
    808808
    809809  USE lmdz_xios, only: xios_send_field
     810  USE lmdz_abort_physic, ONLY: abort_physic
    810811
    811812  IMPLICIT NONE
     
    883884  SUBROUTINE histwrite3d_cosp(var, field, nverts, ncols)
    884885  USE dimphy
    885   USE mod_phys_lmdz_para
     886  USE lmdz_phys_para
    886887  USE ioipsl
    887888  use iophy
    888   USE mod_grid_phy_lmdz, ONLY: nbp_lon
    889   USE print_control_mod, ONLY: lunout,prt_level
     889  USE lmdz_grid_phy, ONLY: nbp_lon
     890  USE lmdz_print_control, ONLY: lunout,prt_level
    890891
    891892  USE lmdz_xios, only: xios_send_field
     893  USE lmdz_abort_physic, ONLY: abort_physic
    892894
    893895
     
    974976  SUBROUTINE histwrite4d_cosp(var, field)
    975977  USE dimphy
    976   USE mod_phys_lmdz_para
     978  USE lmdz_phys_para
    977979  USE ioipsl
    978980  use iophy
    979   USE mod_grid_phy_lmdz, ONLY: nbp_lon
    980   USE print_control_mod, ONLY: lunout,prt_level
     981  USE lmdz_grid_phy, ONLY: nbp_lon
     982  USE lmdz_print_control, ONLY: lunout,prt_level
    981983
    982984  USE lmdz_xios, only: xios_send_field
     985  USE lmdz_abort_physic, ONLY: abort_physic
    983986
    984987
     
    10241027    !   en utilisant les routines getin de IOIPSL 
    10251028    use ioipsl
    1026     USE print_control_mod, ONLY: lunout,prt_level
     1029    USE lmdz_print_control, ONLY: lunout,prt_level
    10271030
    10281031    IMPLICIT NONE
  • LMDZ6/branches/Amaury_dev/libf/phylmd/cospv2/lmdz_cosp_read_outputkeys.F90

    r5095 r5133  
    1717module lmdz_cosp_read_outputkeys
    1818
    19   USE mod_phys_lmdz_para
     19  USE lmdz_phys_para
    2020
    2121  !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Note: See TracChangeset for help on using the changeset viewer.