Changeset 3015 for trunk/LMDZ.MARS/libf/phymars

Timestamp:

Jul 25, 2023, 9:56:32 AM (2 years ago)

Author:

emillour

Message:

Mars PCM:
Code cleanup in diffusion, turn variables from diffusion.h into module
variables in moldiff_red.F90 (turn it into a module in the process).
Also turn moldiffcoeff_red.F and thermosphere.F into modules.
EM

File:

• trunk/LMDZ.MARS/libf/phymars/physiq_mod.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

@@ -26 +26 @@
       use nltecool_mod, only: nltecool
       use nlte_tcool_mod, only: nlte_tcool
+      use thermosphere_mod, only: thermosphere
       use tracer_mod, only: noms, mmol, igcm_co2, igcm_n2, igcm_co2_ice,
      &                      igcm_co, igcm_o, igcm_h2o_vap, igcm_h2o_ice,