Changeset 474 for LMDZ.3.3/branches/rel-LF/libf

Timestamp:

Oct 15, 2003, 11:35:42 AM (21 years ago)

Author:

lmdzadmin

Message:

Pour la remise a zero de l'origine du calendrier de la simulation
LF

File:

• LMDZ.3.3/branches/rel-LF/libf/dyn3d/gcm.F (modified) (1 diff)

LMDZ.3.3/branches/rel-LF/libf/dyn3d/gcm.F

@@ -287 +287 @@
           itau_dyn = 0
           itau_phy = 0
+          time_0 = 0.
           write(*,*)' On reinitialise a la date lue dans gcm.def'
         endif
+      ELSE
+        raz_date = 0
       endif