/[MITgcm]/MITgcm/pkg/ctrl/ctrl_set_unpack_xyz.F
ViewVC logotype

Diff of /MITgcm/pkg/ctrl/ctrl_set_unpack_xyz.F

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

revision 1.6 by heimbach, Thu Nov 6 22:05:08 2003 UTC revision 1.7 by heimbach, Fri May 28 16:04:42 2004 UTC
# Line 73  c     == local variables == Line 73  c     == local variables ==
73        character*(128)   cfile        character*(128)   cfile
74        character*(80) weightname        character*(80) weightname
75    
       integer        filenvartype  
       integer        filenvarlength  
       character*(10) fileExpId  
       integer        fileOptimCycle  
       integer        filencbuffindex  
       _RL            fileDummy  
       integer        fileIg  
       integer        fileJg  
       integer        fileI  
       integer        fileJ  
       integer        filensx  
       integer        filensy  
       integer        filek  
       integer        filencvarindex(maxcvars)  
       integer        filencvarrecs(maxcvars)  
       integer        filencvarxmax(maxcvars)  
       integer        filencvarymax(maxcvars)  
       integer        filencvarnrmax(maxcvars)  
       character*( 1) filencvargrd(maxcvars)  
   
76  c     == external ==  c     == external ==
77    
78        integer  ilnblnk        integer  ilnblnk
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22