Changeset 4164 for trunk/LMDZ.GENERIC/libf/phygeneric/rad_correlatedk.F90

Timestamp:

Apr 2, 2026, 9:15:00 AM (11 days ago)

Author:

emillour

Message:

Genric PCM:
Some changes following the "thermodynamics update":

• bug fix on the size of pplev
• renaming the module to something more explicit (thermo_mod.F90 => pcm_thermodynamics_mod.F90) and the Exner&potential temperature update routine "thermodynamics" => "thermodynamics_update"
• some optimizations in "thermodynamics_update" : in the 'thermo_uni_ideal' case seting r(),cpp() and rcp() can be done at first call only.

EM

File:

• trunk/LMDZ.GENERIC/libf/phygeneric/rad_correlatedk.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phygeneric/rad_correlatedk.F90

@@ -38 +38 @@
       use tracer_h, only: constants_epsi_generic
       use comcstfi_mod, only: pi, mugaz_ref
-      use thermo_mod, only: cpp
+      use pcm_thermodynamics_mod, only: cpp
       use callkeys_mod, only: varactive,diurnal,tracer,water,varfixed,satval, &
                               diagdtau,kastprof,strictboundcorrk,specOLR, &