Changeset 3712 for trunk/LMDZ.MARS/libf/phymars/conf_phys.F

Timestamp:

Apr 3, 2025, 10:45:25 AM (3 months ago)

Author:

emillour

Message:

Mars PCM:
Add extra checking in nirco2abs to ensure having nircorr==1 when o and
co2 tracers are available.
EM

File:

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

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

@@ -224 +224 @@
      $              "1-> new correction",
      $              "(matters only if callnirco2=T)"
-#ifdef MESOSCALE
+
          nircorr=0      !default value. this is OK below 60 km.
-#else
-         nircorr=0      !default value
-#endif
+         ! nircorr=1 should be prefered, but requires that co2
+         ! and o tracers be available
          call getin_p("nircorr",nircorr)
          write(*,*) " nircorr = ",nircorr