Changeset 77 for branches/iLoveclim/SOURCES/out_cptr_mod.f90

Timestamp:

07/05/16 11:20:52 (8 years ago)

Author:

dumas

Message:

Merge branche iLOVECLIM sur rev 76

Location:

branches/iLoveclim

Files:

• . (modified) (1 prop)
• SOURCES/out_cptr_mod.f90 (modified) (1 diff)

branches/iLoveclim/SOURCES/out_cptr_mod.f90

@@ -387 +387 @@
   character(len=20),dimension(4)    :: dimnames3d      !< pour 3d troisieme dim est nz
   character(len=20),dimension(4)    :: dimnames3dT     !< pour 3d troisieme dim est nz+nzm
-  integer                           :: nrecs=1         !< compteur pour les enregistrements temps des variables  
-  integer                           :: idef=0          !< pour savoir si la variable a ete definie ou non
+!  integer                           :: nrecs=1         !< compteur pour les enregistrements temps des variables  
+!  integer                           :: idef=0          !< pour savoir si la variable a ete definie ou non
   integer                           :: isortie         !< pour le choix de type de fichier en sortie