Changeset 1660 for trunk/LMDZ.MARS/libf/phymars/tracer_mod.F90

Timestamp:

Feb 8, 2017, 4:36:25 PM (8 years ago)

Author:

emillour

Message:

Mars GCM:

• Added possibility to run with an Helium "he" tracer (to be initialized at constant value of 3.6e-7 kg/kg_air, i.e. the 4ppm of Krasnopolsky 1996 EUVE satellite, using newstart).
• corrected case for CH4 in aeronomars/photochemistry.F (was using undefined indexes when there is no CH4).
• updated aki/cpi coefficients for Argon used to compute mean atmospheric Cp and thermal conductivity in aeronomars/concentrations.F

JYC+EM

File:

• trunk/LMDZ.MARS/libf/phymars/tracer_mod.F90 (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/tracer_mod.F90

@@ -73 +73 @@
       integer,save :: igcm_no2
       integer,save :: igcm_n2d
+      integer,save :: igcm_he
       integer,save :: igcm_ch4
       ! Ions