Changeset 2478 for trunk

Timestamp:

Mar 15, 2021, 10:04:54 AM (4 years ago)

Author:

emillour

Message:

Common dynamics
Bug fix for the (rare) case when running without physics (iflag_phys=0),
where the dynamical time steps was not correctly initialized, as it
was overwritten by the value in controle() from start.nc instead of being
computed from daysec and day_step.
EM

Location:

trunk/LMDZ.COMMON/libf

Files:

• dyn3d/gcm.F90 (modified) (1 diff)
• dyn3dpar/gcm.F (modified) (1 diff)

trunk/LMDZ.COMMON/libf/dyn3d/gcm.F90

@@ -296 +296 @@
           'WARNING!!! changement de pas de temps',dtvr,'>',zdtvr
   ENDIF
+  dtvr=zdtvr
 
   !

trunk/LMDZ.COMMON/libf/dyn3dpar/gcm.F

@@ -319 +319 @@
      .    'WARNING!!! changement de pas de temps',dtvr,'>',zdtvr
         ENDIF
+      dtvr=zdtvr
 
 C