Changeset 3985 for trunk/LMDZ.COMMON/libf/evolution/stopping_crit_mod.F90

Timestamp:

Dec 8, 2025, 2:19:07 PM (3 weeks ago)

Author:

jbclement

Message:

PEM:
Addition of a module "phys_constants" to read and store physical parameter of the planet properly, i.e. without going through the module "comcstfi_h" and/or "comconst_mod".
JBC

File:

• trunk/LMDZ.COMMON/libf/evolution/stopping_crit_mod.F90 (modified) (1 diff)

trunk/LMDZ.COMMON/libf/evolution/stopping_crit_mod.F90

@@ -220 +220 @@
 SUBROUTINE stopping_crit_h2o(ngrid,nslope,cell_area,delta_h2o_adsorbed,delta_h2o_icetablesublim,h2o_ice,d_h2oice,S_atm_2_h2o,S_h2o_2_atm,S_atm_2_h2oice,S_h2oice_2_atm,stopCrit)
 
-use time_evol_mod, only: dt
-use comslope_mod,  only: subslope_dist, def_slope_mean
-use comcstfi_h,    only: pi
+use time_evol_mod,  only: dt
+use comslope_mod,   only: subslope_dist, def_slope_mean
+use phys_constants, only: pi
 
 implicit none