Parent Directory | Revision Log | Revision Graph | Patch
revision 1.3 by dimitri, Wed Nov 12 00:02:44 2003 UTC | revision 1.4 by jmc, Thu Sep 2 14:02:50 2004 UTC | |
---|---|---|
# | Line 153 C i.e. we only lock waiting for d | Line 153 C i.e. we only lock waiting for d |
153 | westCommMode = _tileCommModeW(bi,bj) | westCommMode = _tileCommModeW(bi,bj) |
154 | eastCommMode = _tileCommModeE(bi,bj) | eastCommMode = _tileCommModeE(bi,bj) |
155 | 10 CONTINUE | 10 CONTINUE |
156 | CALL FOOL_THE_COMPILER | CALL FOOL_THE_COMPILER( spinCount ) |
157 | spinCount = spinCount+1 | spinCount = spinCount+1 |
158 | C IF ( myThid .EQ. 1 .AND. spinCount .GT. _EXCH_SPIN_LIMIT ) THEN | C IF ( myThid .EQ. 1 .AND. spinCount .GT. _EXCH_SPIN_LIMIT ) THEN |
159 | C WRITE(*,*) ' eBl = ', ebl | C WRITE(*,*) ' eBl = ', ebl |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |