Changeset 2287 for trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/share

Timestamp:

Apr 15, 2020, 3:07:19 PM (6 years ago)

Author:

mlefevre

Message:

MESOSCALE. Corrections of local time calculations for Venus mesoscale and LES model.

File:

• trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/share/module_date_time.F (modified) (3 diffs)

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/share/module_date_time.F

@@ -57 +57 @@
 !****VNEUS
       !JULDAYV=MODULO(JULDAYV,2400.)
-      !GMT=((JULDAYV/100.))+(nh+FLOAT(ni)/13.+FLOAT(ns)/117.)/420000.
+      !GMT=((JULDAYV/100.))+(nh+FLOAT(ni)/13.+FLOAT(ns)/117.)/421200.
       !GMT=MODULO(GMT,24.)
 
@@ -104 +104 @@
 !****VENUS
      !JULDAYV=MODULO(JULDAYV,2400.)
-     !GMT=((JULDAYv/100.))+(nh+FLOAT(ni)/13.+FLOAT(ns)/117.)/420000.
+     !GMT=((JULDAYv/100.))+(nh+FLOAT(ni)/13.+FLOAT(ns)/117.)/421200..
      !GMT=MODULO(GMT,24.)
 
@@ -220 +220 @@
       mday(11) = 51
       mday(12) = 56
-!     maday=24 !VENUS
+!     mday=24 !VENUS
       
       !  Break down old hdate into parts