/[MITgcm]/MITgcm/pkg/fizhi/AtoC.F
ViewVC logotype

Diff of /MITgcm/pkg/fizhi/AtoC.F

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

revision 1.5 by molod, Mon Jul 26 18:45:17 2004 UTC revision 1.6 by molod, Wed Nov 17 16:23:29 2004 UTC
# Line 40  c--------------------------------------- Line 40  c---------------------------------------
40         integer i, j, L, bi, bj         integer i, j, L, bi, bj
41    
42  c Call the exchange routine to fill in the halo regions  c Call the exchange routine to fill in the halo regions
43         call exch_uv_agrid_xyz_RL (fieldin1,fieldin2,myThid)         call exch_uv_agrid_xyz_RL (fieldin1,fieldin2,.true.,myThid)
44    
45  c Now take average  c Now take average
46         do bj = myByLo(myThid), myByHi(myThid)         do bj = myByLo(myThid), myByHi(myThid)
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22