Changeset 709

Timestamp:

Jun 22, 2012, 3:45:44 PM (13 years ago)

Author:

aslmd

Message:

MESOSCALE: set default r_aspect_thermals to 1 also in mesoscale. updated DEF files for reference THARSIS case (latest settings by TN).

Location:

trunk

Files:

• LMDZ.MARS/libf/phymars/calltherm_interface.F90 (modified) (2 diffs)
• MESOSCALE/LMD_MM_MARS/SIMU/DEF/newphys_THARSIS_WATER/callphys.def.mars0.thermals (added)
• MESOSCALE/LMD_MM_MARS/SIMU/DEF/newphys_THARSIS_WATER/callphys.def.mars11_radact_therm (modified) (6 diffs)
• MESOSCALE/LMD_MM_MARS/SIMU/DEF/newphys_THARSIS_WATER/callphys.def.mars12_radact_therm_scavenging (added)
• MESOSCALE/LMD_MM_MARS/SIMU/DEF/newphys_THARSIS_WATER/namelist.input (modified) (3 diffs)

trunk/LMDZ.MARS/libf/phymars/calltherm_interface.F90

@@ -209 +209 @@
                                 ! very well with a sub-timestep of 10.
          IF (firstcall) THEN
+            r_aspect_thermals=1.  ! same value is OK for GCM and mesoscale
 #ifdef MESOSCALE
             !! valid for timesteps < 200s
             nsplit_thermals=4
-            r_aspect_thermals=0.7
 #else
             IF ((ptimestep .le. 3699.*24./96.) .and. (iradia .eq. 1)) THEN
@@ -219 +219 @@
                nsplit_thermals=35
             ENDIF
-            r_aspect_thermals=1.
 #endif
             call getin("nsplit_thermals",nsplit_thermals)

trunk/MESOSCALE/LMD_MM_MARS/SIMU/DEF/newphys_THARSIS_WATER/callphys.def.mars11_radact_therm

@@ -1 @@
-## Thermals Options
-##~~~~~~~~~~~~~~~~~
-# Activate thermals :
-calltherm = .true.
-callrichsl = .true.
-#nsplit_thermals = 10
-
-nircorr = 0
-
 ##General options
 ##~~~~~~~~~~~~~~~
 #Directory where external input files are
-datadir = /san/home/spiga/DATAFILE/ 
+datadir = /san/home/spiga/DATAFILE/
 datadir = /d5/aslmd/datafile/
+datadir=/users/forget/WWW/datagcm/datafile/
 
 #Run with or without tracer transport ?
@@ -41 +33 @@
 iaervar = 26 
 # Dust opacity at 700 Pa (when constant, i.e. for the iaervar=1 case)
-tauvis=0.2
+tauvis=0.1
 # Dust vertical distribution: 
 # (=0: old distrib. (Pollack90), =1: top set by "topdustref",
@@ -56 +48 @@
 callnlte = .false.
 # call CO2 NIR absorption ?   matters only if callrad=T
-callnirco2 = .false. 
+callnirco2 = .true.
 # call turbulent vertical diffusion ?
 calldifv  = .true.
@@ -86 +78 @@
 active  = .true.
 # DUST: use mass and number mixing ratios to predict dust size ?
-doubleq   = .true. 
+doubleq   = .true.
 # DUST: lifted by GCM surface winds ?
-lifting = .true. 
+lifting = .true.
 # DUST: lifted by dust devils ?
 callddevil = .false.
@@ -99 +91 @@
 # WATER: Compute water cycle
 water = .true.
+# WATER: Microphysical scheme for water-ice clouds?
+microphys = .false.
+# WATER: parameter contact
+mteta = 0.95
 # WATER: current permanent caps at both poles. True IS RECOMMENDED
 #        (with .true., North cap is a source of water and South pole
 #         is a cold trap)
 caps  = .true.
+# WATER: Water ice albedo ?
+albedo_h2o_ice = 0.35
+# WATER: Water ice thermal inertia
+inert_h2o_ice = 800
+# WATER: Frost thickness threshold for albedo
+frost_albedo_threshold = 0.005
+nuice_sed=0.1
+icedryness=1
+nircorr=0
+imicro = 2
 # PHOTOCHEMISTRY: include chemical species 
 photochem  = .false.
@@ -127 +133 @@
        
 
-
+## Thermals
+## ~~~~~~~~
+calltherm = .true.
+callrichsl = .true.

trunk/MESOSCALE/LMD_MM_MARS/SIMU/DEF/newphys_THARSIS_WATER/namelist.input

@@ -3 +3 @@
  start_month      = 05,      !! (p1) Start Martian Month
  start_day        = 01,      !! (p1) Start Martian Day
- start_hour       = 01,      !! (p1) Start Martian Hour (at longitude 0)
+ start_hour       = 06,      !! (p1) Start Martian Hour (at longitude 0)
  end_year         = 2024,    !! (p1) End Martian Year (20XX for MY XX)
  end_month        = 05,      !! (p1) End Martian Month
- end_day          = 09,      !! (p1) End Martian Day
- end_hour         = 01,      !! (p1) End Martian Hour (at longitude 0)
+ end_day          = 03,      !! (p1) End Martian Day
+ end_hour         = 06,      !! (p1) End Martian Hour (at longitude 0)
  history_interval    = 37,   !! Frequency of outputs (37 --> 3700s = 1 Martian hour)  
  frames_per_outfile  = 24,   !! Size of time dimension in files 
@@ -34 +34 @@
 
  &physics
- mars = 11  
+ mars = 12 !0 !11  
  num_soil_layers = 18 !!! NOUVELLE PHYSIQUE
  /
@@ -40 +40 @@
  &dynamics
  tiso = 100.
- diff_6th_opt = 0
+ diff_6th_opt = 0  !!also works without
  /