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

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

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

revision 1.16 by gforget, Sat Jul 15 00:27:37 2006 UTC revision 1.17 by heimbach, Thu Jun 14 18:55:36 2007 UTC
# Line 42  c     == routine arguments == Line 42  c     == routine arguments ==
42        logical lxxadxx        logical lxxadxx
43        integer mythid        integer mythid
44    
45    #ifndef EXCLUDE_CTRL_PACK
46  c     == local variables ==  c     == local variables ==
47    
48        integer bi,bj        integer bi,bj
# Line 253  c     -- end of irec loop -- Line 254  c     -- end of irec loop --
254    
255        _END_MASTER( mythid )        _END_MASTER( mythid )
256    
257    #endif
258    
259        return        return
260        end        end
261    

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

  ViewVC Help
Powered by ViewVC 1.1.22