Changeset 300 for XMLIO_V2/dev/common/src/fortran/idate.F90

Timestamp:

02/13/12 19:35:25 (12 years ago)

Author:

ymipsl

Message:

nouvelle version de developpement de xios

• nouvelle interface fortran
• recodage complet de la couche de communication
• et bien d'autres choses...

YM

File:

• XMLIO_V2/dev/common/src/fortran/idate.F90 (modified) (1 diff)

XMLIO_V2/dev/common/src/fortran/idate.F90

@@ -19 +19 @@
 
    TYPE txios(time)
-      REAL(kind = 8) :: year, month, day, hour, minute, second
+      REAL(kind = 8) :: year=0, month=0, day=0, hour=0, minute=0, second=0
    END TYPE txios(time)