/[lmdze]/trunk/dyn3d/limit.f
ViewVC logotype

Diff of /trunk/dyn3d/limit.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 25 by guez, Fri Mar 5 16:43:45 2010 UTC revision 34 by guez, Wed Jun 2 11:01:12 2010 UTC
# Line 152  contains Line 152  contains
152      jmdep = size(dlat_ini)      jmdep = size(dlat_ini)
153    
154      call nf95_inq_dimid(ncid, "time", dimid)      call nf95_inq_dimid(ncid, "time", dimid)
155      call NF95_INQuire_DIMension(ncid, dimid, len=lmdep)      call NF95_INQuire_DIMension(ncid, dimid, nclen=lmdep)
156      print *, 'lmdep = ', lmdep      print *, 'lmdep = ', lmdep
157      ! PM 28/02/2002 : nouvelle coordonnée temporelle, fichiers AMIP      ! PM 28/02/2002 : nouvelle coordonnée temporelle, fichiers AMIP
158      ! pas en jours      ! pas en jours
# Line 251  contains Line 251  contains
251      jmdep = size(dlat_ini)      jmdep = size(dlat_ini)
252    
253      call nf95_inq_dimid(ncid, "time", dimid)      call nf95_inq_dimid(ncid, "time", dimid)
254      call NF95_INQuire_DIMension(ncid, dimid, len=lmdep)      call NF95_INQuire_DIMension(ncid, dimid, nclen=lmdep)
255      print *, 'lmdep = ', lmdep      print *, 'lmdep = ', lmdep
256      !PM28/02/2002 : nouvelle coord temporelle fichiers AMIP pas en jours      !PM28/02/2002 : nouvelle coord temporelle fichiers AMIP pas en jours
257      !        Ici on suppose qu'on a 12 mois (de 30 jours).      !        Ici on suppose qu'on a 12 mois (de 30 jours).
Legend:
Removed from v.25  
changed lines
  Added in v.34
  ViewVC Help
Powered by ViewVC 1.1.21