Changeset 576 for trunk/LMDZ.MARS/libf/aeronomars

Timestamp:

Mar 12, 2012, 3:06:51 PM (13 years ago)

Author:

emillour

Message:

Mars GCM:
update a coefficient in photochemistry.F and some cleanup in watercloud.F
and physiq.F
FL + EM

File:

• trunk/LMDZ.MARS/libf/aeronomars/photochemistry.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/aeronomars/photochemistry.F

@@ -1462 +1462 @@
 c        jpl 2003
 c
-         a001(l) = 2.5
+c        co2 efficiency as a third body (2.075)
+c        from sehested et al., j. geophys. res., 100, 1995.
+c
+         a001(l) = 2.075
      $             *6.0e-34*(t(l)/300.)**(-2.4)*dens(l)
 c