Changeset 4117 for trunk/LMDZ.COMMON/libf/evolution/atmosphere.F90

Timestamp:

Mar 10, 2026, 4:52:43 PM (8 days ago)

Author:

jbclement

Message:

PEM:

• Remove 'd_h2oice' and 'd_co2ice' arguments from adsorption and soil thermal inertia routines (not needed and possible bugs).
• Move 'read_callphys' call from 'read_start1D' to 'read_rundef' so that 'CO2cond_ps' is initialized no matter what.
• Explicit initialization of 'delta_h2o_ads'/'delta_co2_ads' before 'read_startpem'.
• Add time index argument to 'put_var_nc' calls to write "restart.nc".
• Increase temporary string buffer size for 'real2str_qp'.
• Fixed some typos.

JBC

File:

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

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

@@ -181 +181 @@
 ! ----
 CO2cond_ps_PCM = CO2cond_ps_PCM_in
-call print_msg('set_CO2cond_ps_PCM = '//real2str(CO2cond_ps_PCM),LVL_NFO)
+call print_msg('CO2cond_ps_PCM = '//real2str(CO2cond_ps_PCM),LVL_NFO)
 if (CO2cond_ps_PCM < 0._dp .or. CO2cond_ps_PCM > 1._dp) call stop_clean(__FILE__,__LINE__,'Value for ''CO2cond_ps'' is not between 0 and 1!',1)