/[lmdze]/trunk/Sources/dyn3d/writehist.f
ViewVC logotype

Diff of /trunk/Sources/dyn3d/writehist.f

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

trunk/bibio/writehist.f revision 83 by guez, Thu Mar 6 15:12:00 2014 UTC trunk/Sources/bibio/writehist.f revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC
# Line 41  contains Line 41  contains
41      ! This routine needs IOIPSL to work      ! This routine needs IOIPSL to work
42      ! Variables locales      ! Variables locales
43    
     integer iq, ii, ll  
44      integer ndexu(ip1jmp1*llm), ndexv(ip1jm*llm), ndex2d(ip1jmp1)      integer ndexu(ip1jmp1*llm), ndexv(ip1jm*llm), ndex2d(ip1jmp1)
45      logical ok_sync      logical ok_sync
46      integer itau_w      integer itau_w

Legend:
Removed from v.83  
changed lines
  Added in v.134

  ViewVC Help
Powered by ViewVC 1.1.21