Changeset 5601 for LMDZ6/branches/contrails/libf/misc

Timestamp:

Apr 2, 2025, 4:04:40 PM (4 months ago)

Author:

aborella

Message:

Multiple changes:

• tracers which were ratios are now absolute quantities. This is needed because when the ratio

is not defined, some aberrations may occur

• added a new tracer for total specific humidity in contrails
• rework of the mixing process for cirrus clouds (and contrails)
• changed the numerical integration of ice crystals' sublimation
• subroutines do not take real inputs anymore (at least klon tables)
• added more radiative diagnostics for contrails

File:

• LMDZ6/branches/contrails/libf/misc/readTracFiles_mod.f90 (modified) (1 diff)

LMDZ6/branches/contrails/libf/misc/readTracFiles_mod.f90

@@ -122 +122 @@
   !--- SOME PARAMETERS THAT ARE NOT LIKELY TO CHANGE OFTEN
   CHARACTER(LEN=maxlen), SAVE      :: tran0        = 'air'      !--- Default transporting fluid
-  CHARACTER(LEN=maxlen), PARAMETER :: old_phases   = 'vlibfca'    !--- Old phases for water (no separator)
-  CHARACTER(LEN=maxlen), PARAMETER :: known_phases = 'glsbfca'    !--- Known phases initials
+  CHARACTER(LEN=maxlen), PARAMETER :: old_phases   = 'vlibfcaq'    !--- Old phases for water (no separator)
+  CHARACTER(LEN=maxlen), PARAMETER :: known_phases = 'glsbfcaq'    !--- Known phases initials
   INTEGER, PARAMETER :: nphases = LEN_TRIM(known_phases)        !--- Number of phases
   CHARACTER(LEN=maxlen), SAVE      :: phases_names(nphases) &   !--- Known phases names
-                                = ['gaseous  ', 'liquid   ', 'solid    ','blownSnow', 'fracCloud', 'cldVapRat', 'aviContRa']
+                                = ['gaseous  ', 'liquid   ', 'solid    ','blownSnow', 'fracCloud', 'cldVapor ', 'aviContra', 'qtContra ']
   CHARACTER(LEN=1),      SAVE :: phases_sep  =  '_'             !--- Phase separator
   CHARACTER(LEN=maxlen), SAVE :: isoFile = 'isotopes_params.def'!--- Name of the isotopes parameters file