Changeset 5098 for LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd

Timestamp:

Jul 22, 2024, 6:53:44 PM (4 months ago)

Author:

abarral

Message:

Remove CRAY key (obsolete calls to functions that don't exist anymore, bugs in some implementations, irrelevant now)
Replace usage of CPP_XIOS key by using_xios logical
Remove always unused testcpu bits
Replace most uses of CPP_StratAer by the corresponding logical defined in lmdz_cppkeys_wrapper.F90 [this breaks iso compilation because phyiso doesn't define all aerosols - to be fixed later]
Replaces uses of include "yomcst.h" by the lmdz_yomcst.f90 module in .[fF]90 files

File:

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

LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

@@ -17 +17 @@
   USE vertical_layers_mod, ONLY : init_vertical_layers
   USE infotrac, ONLY: nbtr, type_trac
-#ifdef CPP_StratAer
-  USE infotrac_phy, ONLY: nbtr_bin, nbtr_sulgas, id_OCS_strat, &
-                      id_SO2_strat, id_H2SO4_strat, id_BIN01_strat
 
-#endif
 #ifdef REPROBUS
   USE CHEM_REP, ONLY : Init_chem_rep_phys