Parent Directory | Revision Log | Revision Graph | Patch
revision 1.4 by adcroft, Tue May 18 17:39:21 1999 UTC | revision 1.6 by heimbach, Wed Jun 21 20:44:06 2000 UTC | |
---|---|---|
# | Line 76 C but this causes KAP to insert a | Line 76 C but this causes KAP to insert a |
76 | GOTO 11 | GOTO 11 |
77 | ENDIF | ENDIF |
78 | IF ( numberThreadsRunning .NE. nThreads ) THEN | IF ( numberThreadsRunning .NE. nThreads ) THEN |
79 | #ifndef TARGET_T3E | |
80 | #ifndef TARGET_CRAY_VECTOR | |
81 | CALL SYSTEM('sleep 1') | CALL SYSTEM('sleep 1') |
82 | #endif | |
83 | #endif | |
84 | GOTO 10 | GOTO 10 |
85 | ENDIF | ENDIF |
86 | 11 CONTINUE | 11 CONTINUE |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |