Changeset 353 for LMDZ.3.3/branches/rel-LF/libf/dyn3d/offlinenc.F

Timestamp:

Mar 21, 2002, 4:09:32 PM (23 years ago)

Author:

lmdzadmin

Message:

2 changements pour les fichiers histoire:

• utilisation de l'entree "rectilineaire" de IOIPSL pour ne plus avoir

a

lancer ncregular a chaque fois

• le calendrier des fichiers histoire est maintenant base sur la date d'initialisation de la simulation plutot que sur la date de depart du

job

en cours

LF

File:

• LMDZ.3.3/branches/rel-LF/libf/dyn3d/offlinenc.F (modified) (4 diffs)

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

@@ -200 +200 @@
       else
          day_ini=0
-         anne_ini=0
+         annee_ref=0
       endif
 
@@ -347 +347 @@
       close(98)
 
-      CALL dynredem0("restart.nc",day_end,anne_ini,phis,nq)
+      CALL dynredem0("restart.nc",day_end,phis,nq)
 
 c-----------------------------------------------------------------------
@@ -398 +398 @@
          dynhistave_file = 'histmoy.nc'
          day_ini=0
-         anne_ini=0
+         annee_ref=0
          t_ops =(1./48.)*daysec
          t_wrt =(1./48.)*daysec
@@ -404 +404 @@
          mode=1
 
-c        CALL initdynav(dynhistave_file,day_ini,anne_ini,dtav,
+c        CALL initdynav(dynhistave_file,day_ini,annee_ref,dtav,
 c    .              t_ops, t_wrt, nq,mode, histaveid)