/[MITgcm]/MITgcm/pkg/exch2/exch2_get_rx1.template
ViewVC logotype

Diff of /MITgcm/pkg/exch2/exch2_get_rx1.template

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

revision 1.1 by jmc, Sat May 30 21:18:59 2009 UTC revision 1.2 by jmc, Sun Jun 28 01:00:23 2009 UTC
# Line 117  C      this source tile Id "soT" Line 117  C      this source tile Id "soT"
117         sNb = oNb         sNb = oNb
118         DO j=1,sizeBj         DO j=1,sizeBj
119          DO i=1,sizeBi          DO i=1,sizeBi
120           IF ( W2_myTileList(i).EQ.soT ) THEN           IF ( W2_myTileList(i,j).EQ.soT ) THEN
121             sBi = i             sBi = i
122             sBj = j             sBj = j
123           ENDIF           ENDIF
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22