Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.29 by jmc, Sun Jun 14 21:45:12 2009 UTC | revision 1.30 by jmc, Sun Jun 28 01:03:24 2009 UTC | |
|---|---|---|
| # | Line 149 C with 2 polar faces + 4 equatorials: | Line 149 C with 2 polar faces + 4 equatorials: |
| 149 | iG = bi+(myXGlobalLo-1)/sNx | iG = bi+(myXGlobalLo-1)/sNx |
| 150 | myTile = iG | myTile = iG |
| 151 | #ifdef ALLOW_EXCH2 | #ifdef ALLOW_EXCH2 |
| 152 | myTile = W2_myTileList(bi) | myTile = W2_myTileList(bi,bj) |
| 153 | iG = exch2_myface(myTile) | iG = exch2_myface(myTile) |
| 154 | #endif | #endif |
| 155 | WRITE(fName,'(2A,I3.3,A)') 'fCoriG','.face',iG,'.bin' | WRITE(fName,'(2A,I3.3,A)') 'fCoriG','.face',iG,'.bin' |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |