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

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

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

revision 1.10 by heimbach, Fri Oct 14 19:26:22 2005 UTC revision 1.11 by heimbach, Thu Jun 14 18:55:36 2007 UTC
# Line 44  c     == routine arguments == Line 44  c     == routine arguments ==
44        integer nwetglobal(nr,nobcs)        integer nwetglobal(nr,nobcs)
45        integer mythid        integer mythid
46    
47    #ifndef EXCLUDE_CTRL_PACK
48  c     == local variables ==  c     == local variables ==
49    
50        integer bi,bj        integer bi,bj
# Line 304  c     -- end of irec loop -- Line 305  c     -- end of irec loop --
305    
306        _END_MASTER( mythid )        _END_MASTER( mythid )
307    
308    #endif
309    
310        return        return
311        end        end
312    

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

  ViewVC Help
Powered by ViewVC 1.1.22