Changeset 1509 for trunk/LMDZ.COMMON/libf/dyn3d_common/dynredem.F90

Timestamp:

Jan 15, 2016, 9:51:37 AM (9 years ago)

Author:

emillour

Message:

Venus & Titan GCMs: fix bug introduced in previous revision; time axis in start.nc file is labeled "temps", like for the Earth GCM.
EM

File:

• trunk/LMDZ.COMMON/libf/dyn3d_common/dynredem.F90 (modified) (1 diff)

trunk/LMDZ.COMMON/libf/dyn3d_common/dynredem.F90

@@ -239 +239 @@
   WRITE(unites,"('days since ',i4,'-',i2.2,'-',i2.2,' 00:00:00')"),&
                yyears0,mmois0,jjour0
-  IF (planet_type.eq."earth") THEN
+  IF (start_file_type.eq."earth") THEN
     CALL cre_var(nid,"temps","Temps de simulation",[timID],unites)
   ELSE