Changeset 5659 for LMDZ6/trunk/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

Timestamp:

May 16, 2025, 2:23:47 PM (7 months ago)

Author:

lfalletti

Message:

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

File:

• LMDZ6/trunk/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90 (modified) (1 diff)

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

@@ -19 +19 @@
   USE infotrac_phy, ONLY: nbtr_bin, nbtr_sulgas, id_OCS_strat, &
                       id_SO2_strat, id_H2SO4_strat, id_BIN01_strat
-  USE lmdz_reprobus_wrappers, ONLY : init_chem_rep_phys, init_reprobus_para
+  USE lmdz_reprobus_wrappers, ONLY : init_chem_rep_phys
 #ifdef CPP_PARA
   USE parallel_lmdz, ONLY : mpi_size, mpi_rank