Changeset 2295 for trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/share
- Timestamp:
- Apr 24, 2020, 4:13:09 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
TabularUnified trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/share/module_model_constants.F ΒΆ
r2011 r2295 260 260 TT00=460. 261 261 nu=0.35 262 ELSE if ( planet == "titan") then 263 g = 1.35 264 r_d = 290.6 265 !cpp = 1000. 266 cp = 1051. 267 cliq = 4190. 268 psat = 610.78 269 t0 = 94. ! earth : 300 270 p0 = 1.45e5 271 p1000mb = 1.45e5 272 reradius = 1./2575500.0 ! Rayon de mars (m) ~6051800 m 273 rad = 2575500.0 274 wmugaz = 28.6 275 womeg = 0.2992549E-06 !!!!!!!!!!!!!!!!!!! 276 wdaysec = 1377665.28 277 TT00=0. 278 nu=0. 262 279 ELSE if (( planet == "prescribed").or.(planet == "generic")) then 263 280 open(17,file='planet_constant',form='formatted',status='old')
Note: See TracChangeset
for help on using the changeset viewer.