[1954] | 1 | {\footnotesize |
---|
| 2 | \begin{verbatim} |
---|
| 3 | c Informations on the physics grid |
---|
| 4 | tab_cntrl(1) = float(ngridmx) ! number of nodes on physics grid |
---|
| 5 | tab_cntrl(2) = float(nlayermx) ! number of atmospheric layers |
---|
| 6 | tab_cntrl(3) = day_ini + int(time) ! initial day |
---|
| 7 | tab_cntrl(4) = time -int(time) ! initiale time of day |
---|
| 8 | |
---|
| 9 | c Informations about Mars, used by dynamics and physics |
---|
| 10 | tab_cntrl(5) = rad ! radius of Mars (m) ~3397200 |
---|
| 11 | tab_cntrl(6) = omeg ! rotation rate (rad.s-1) |
---|
| 12 | tab_cntrl(7) = g ! gravity (m.s-2) ~3.72 |
---|
| 13 | tab_cntrl(8) = mugaz ! Molar mass of the atmosphere (g.mol-1) ~43.49 |
---|
| 14 | tab_cntrl(9) = rcp ! = r/cp ~0.256793 (=kappa dans dynamique) |
---|
| 15 | tab_cntrl(10) = daysec ! length of a sol (s) ~88775 |
---|
| 16 | |
---|
| 17 | tab_cntrl(11) = phystep ! time step in the physics |
---|
| 18 | tab_cntrl(12) = 0. |
---|
| 19 | tab_cntrl(13) = 0. |
---|
| 20 | |
---|
| 21 | c Informations about Mars, only for physics |
---|
| 22 | tab_cntrl(14) = year_day ! length of year (sols) ~668.6 |
---|
| 23 | tab_cntrl(15) = periheli ! min. Sun-Mars distance (Mkm) ~206.66 |
---|
| 24 | tab_cntrl(16) = aphelie ! max. SUn-Mars distance (Mkm) ~249.22 |
---|
| 25 | tab_cntrl(17) = peri_day ! date of perihelion (sols since N. spring) |
---|
| 26 | tab_cntrl(18) = obliquit ! Obliquity of the planet (deg) ~23.98 |
---|
| 27 | |
---|
| 28 | c Boundary layer and turbulence |
---|
| 29 | tab_cntrl(19) = z0 ! surface roughness (m) ~0.01 |
---|
| 30 | tab_cntrl(20) = lmixmin ! mixing length ~100 |
---|
| 31 | tab_cntrl(21) = emin_turb ! minimal energy ~1.e-8 |
---|
| 32 | |
---|
| 33 | c Optical properties of polar caps and ground emissivity |
---|
| 34 | tab_cntrl(22) = albedice(1) ! Albedo of northern cap ~0.5 |
---|
| 35 | tab_cntrl(23) = albedice(2) ! Albedo of southern cap ~0.5 |
---|
| 36 | tab_cntrl(24) = emisice(1) ! Emissivity of northern cap ~0.95 |
---|
| 37 | tab_cntrl(25) = emisice(2) ! Emissivity of southern cap ~0.95 |
---|
| 38 | tab_cntrl(26) = emissiv ! Emissivity of martian soil ~.95 |
---|
| 39 | tab_cntrl(31) = iceradius(1) ! mean scat radius of CO2 snow (north) |
---|
| 40 | tab_cntrl(32) = iceradius(2) ! mean scat radius of CO2 snow (south) |
---|
| 41 | tab_cntrl(33) = dtemisice(1) ! time scale for snow metamorphism (north) |
---|
| 42 | tab_cntrl(34) = dtemisice(2) ! time scale for snow metamorphism (south) |
---|
| 43 | |
---|
| 44 | c dust aerosol properties |
---|
| 45 | tab_cntrl(27) = tauvis ! mean visible optical depth |
---|
| 46 | |
---|
| 47 | tab_cntrl(28) = 0. |
---|
| 48 | tab_cntrl(29) = 0. |
---|
| 49 | tab_cntrl(30) = 0. |
---|
| 50 | |
---|
| 51 | ! Soil properties: |
---|
| 52 | tab_cntrl(35) = volcapa ! soil volumetric heat capacity |
---|
| 53 | \end{verbatim} |
---|
| 54 | } |
---|