Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.7 by adcroft, Mon Mar 27 22:25:40 2000 UTC | revision 1.8 by heimbach, Wed Jun 21 20:44:06 2000 UTC | |
|---|---|---|
| # | Line 415 C \================================= | Line 415 C \================================= |
| 415 | CEndOfInterface | CEndOfInterface |
| 416 | Real*4 ETIME, ACTUAL, TARRAY(2) | Real*4 ETIME, ACTUAL, TARRAY(2) |
| 417 | #ifndef TARGET_T3E | #ifndef TARGET_T3E |
| 418 | #ifndef TARGET_CRAY_VECTOR | |
| 419 | EXTERNAL ETIME | EXTERNAL ETIME |
| 420 | #endif | #endif |
| 421 | #endif | |
| 422 | Real*8 wtime | Real*8 wtime |
| 423 | C Real*8 MPI_Wtime | C Real*8 MPI_Wtime |
| 424 | C EXTERNAL MPI_Wtime | C EXTERNAL MPI_Wtime |
| 425 | ||
| 426 | #ifdef TARGET_T3E | #if (defined (TARGET_T3E) || defined (TARGET_CRAY_VECTOR)) |
| 427 | userTime = 0. | userTime = 0. |
| 428 | systemTime = 0. | systemTime = 0. |
| 429 | #else | #else |
| # | Line 430 C EXTERNAL MPI_Wtime | Line 432 C EXTERNAL MPI_Wtime |
| 432 | systemTime = TARRAY(2) | systemTime = TARRAY(2) |
| 433 | #endif | #endif |
| 434 | ||
| 435 | #ifdef TARGET_T3E | #if (defined (TARGET_T3E) || defined (TARGET_CRAY_VECTOR)) |
| 436 | wallClockTime = 0. | wallClockTime = 0. |
| 437 | #else | #else |
| 438 | CALL CLOC(wTime) | CALL CLOC(wTime) |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |