Changeset 758 for trunk/LMDZ.MARS/libf/dyn3d

Timestamp:

Aug 8, 2012, 9:00:35 AM (12 years ago)

Author:

emillour

Message:

Mars GCM:

Some minor changes and adaptations for the MCDv5 runs:

• removed the 'nice' instruction from run0 script
• update dissipation factors in inidissip.F (fac_mid=3,fac_up=30,startalt=70)
• add some outputs in physiq.F
• put example def files used for MCDv5 simulations in deftank: callphys.def.MCD5 run.def.64x48x49.MCD5 traceur.def.MCD5

EM

File:

• trunk/LMDZ.MARS/libf/dyn3d/inidissip.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/dyn3d/inidissip.F

@@ -51 +51 @@
 c         FF 2004       
          if (pseudoalt(llm).lt.160.) then 
-             fac_mid=2  ! coeff  pour dissipation aux basses/moyennes altitudes
+             fac_mid=3  ! coeff  pour dissipation aux basses/moyennes altitudes
              fac_up=30 ! coeff multiplicateur pour dissipation hautes altitudes
              startalt=70. ! altitude en Km de la transition mid / up
              delta=20.! Intervalle (km) pour le changement mid / up
          else ! thermosphere model
-             fac_mid=2 ! coeff pour dissipation aux basses/moyennes altitudes
-             fac_up=25 ! coeff multiplicateur pour dissipation hautes altitudes
+             fac_mid=3 ! coeff pour dissipation aux basses/moyennes altitudes
+             fac_up=30 ! coeff multiplicateur pour dissipation hautes altitudes
 c            startalt: 95 OK for MY24
-             startalt=95. ! altitude en Km de la transition mid / up
+             startalt=70. ! altitude en Km de la transition mid / up
              delta=30.! Intervalle (km) pour le changement mid /up
          end if