Changeset 5659 for LMDZ6/trunk


Ignore:
Timestamp:
May 16, 2025, 2:23:47 PM (3 weeks ago)
Author:
lfalletti
Message:

REPROBUS: bug fix for the new usage of CPP key (wrapper)

Location:
LMDZ6/trunk/libf
Files:
6 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/dyn3dmem/leapfrog_loc.f90

    r5571 r5659  
    4141         using_xios
    4242   USE lmdz_cppkeys_wrapper, ONLY: CPPKEY_INCA, CPPKEY_REPROBUS
    43    USE lmdz_reprobus_wrappers, ONLY: finalize_reprobus
    4443   USE strings_mod, ONLY: int2str
    4544

  • LMDZ6/trunk/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

    r5323 r5659  
    1919  USE infotrac_phy, ONLY: nbtr_bin, nbtr_sulgas, id_OCS_strat, &
    2020                      id_SO2_strat, id_H2SO4_strat, id_BIN01_strat
    21   USE lmdz_reprobus_wrappers, ONLY : init_chem_rep_phys, init_reprobus_para
     21  USE lmdz_reprobus_wrappers, ONLY : init_chem_rep_phys
    2222#ifdef CPP_PARA
    2323  USE parallel_lmdz, ONLY : mpi_size, mpi_rank

  • LMDZ6/trunk/libf/phylmd/physiq_mod.F90

    r5655 r5659  
    113113    USE infotrac_phy,      ONLY: nqCO2
    114114    USE lmdz_reprobus_wrappers, ONLY: init_chem_rep_xjour, d_q_rep, d_ql_rep, d_qi_rep, &
    115                         ptrop, ttrop, ztrop, gravit, itroprep, Z1, Z2, fac, B, chemini_rep, chemtime_rep, coord_hyb_rep, &
    116             rtime
     115                        ptrop, ttrop, ztrop, gravit, itroprep, Z1, Z2, fac, B
    117116    USE time_phylmdz_mod,    ONLY: annee_ref, day_ini, day_ref, start_time
    118117    USE vertical_layers_mod, ONLY: aps, bps, ap, bp

  • LMDZ6/trunk/libf/phylmd/radlwsw_m.F90

    r5657 r5659  
    5454    USE write_field_phy
    5555
    56     USE lmdz_reprobus_wrappers, ONLY : solaireTIME, ok_SUNTIME, ndimozon, rad_interactif
     56    USE lmdz_reprobus_wrappers, ONLY : solaireTIME, ok_SUNTIME, ndimozon
    5757    USE lmdz_cppkeys_wrapper, ONLY: CPPKEY_REPROBUS
    5858

  • LMDZ6/trunk/libf/phylmd/tracreprobus_mod.f90

    r5323 r5659  
    1616         daynum, iter, &             ! jourjulien, iteration chimie
    1717         pdel,&
    18          d_q_rep,d_ql_rep,d_qi_rep, chemmain_rlong_1401
     18         d_q_rep,d_ql_rep,d_qi_rep
    1919    USE lmdz_cppkeys_wrapper, ONLY: CPPKEY_REPROBUS
    2020    IMPLICIT NONE

  • LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

    r5658 r5659  
    114114    USE infotrac_phy,      ONLY: nqCO2
    115115    USE lmdz_reprobus_wrappers, ONLY: init_chem_rep_xjour, d_q_rep, d_ql_rep, d_qi_rep, &
    116                         ptrop, ttrop, ztrop, gravit, itroprep, Z1, Z2, fac, B, chemini_rep, chemtime_rep, coord_hyb_rep, &
    117             rtime
     116                        ptrop, ttrop, ztrop, gravit, itroprep, Z1, Z2, fac, B
    118117    USE strataer_local_var_mod
    119118    USE strataer_emiss_mod, ONLY: strataer_emiss_init
Note: See TracChangeset for help on using the changeset viewer.