Changeset 64 for trunk/mars/libf/dyn3d/inidissip.F

Timestamp:

Feb 15, 2011, 3:11:00 PM (14 years ago)

Author:

emillour

Message:

Modifs mineures:

• ajout de 'regr_lat_time_climoz_m.txt' dans "chatier" pour rappel que cette routine merite une attention particuliere.
• mise a jour des coeff. de dissipation dans inidissip.F (mars)

EM

File:

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

trunk/mars/libf/dyn3d/inidissip.F

@@ -52 +52 @@
          if (pseudoalt(llm).lt.160.) then 
              fac_mid=2  ! coeff  pour dissipation aux basses/moyennes altitudes
-             fac_up=10 ! coeff multiplicateur pour dissipation hautes altitudes
-             startalt=90. ! altitude en Km de la transition mid / up
+             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