| 64 |
C the main.F master loop. This should not happen |
C the main.F master loop. This should not happen |
| 65 |
C if the multi-threading compilation tools works right. |
C if the multi-threading compilation tools works right. |
| 66 |
C But (see for example KAP) this is not always the case! |
C But (see for example KAP) this is not always the case! |
| 67 |
|
C printMapIncludesZeros - Flag that controls whether character constant map code ignores |
| 68 |
|
C exact zero values. |
| 69 |
COMMON /EESUPP_L/ thError, threadIsRunning, threadIsComplete, |
COMMON /EESUPP_L/ thError, threadIsRunning, threadIsComplete, |
| 70 |
& allMyEdgesAreSharedMemory, usingMPI, usingSyncMessages, |
& allMyEdgesAreSharedMemory, usingMPI, usingSyncMessages, |
| 71 |
& notUsingXPeriodicity, notUsingYPeriodicity |
& notUsingXPeriodicity, notUsingYPeriodicity, |
| 72 |
|
& printMapIncludesZeros |
| 73 |
LOGICAL thError(MAX_NO_THREADS) |
LOGICAL thError(MAX_NO_THREADS) |
| 74 |
LOGICAL threadIsRunning(MAX_NO_THREADS) |
LOGICAL threadIsRunning(MAX_NO_THREADS) |
| 75 |
LOGICAL threadIsComplete(MAX_NO_THREADS) |
LOGICAL threadIsComplete(MAX_NO_THREADS) |
| 78 |
LOGICAL usingSyncMessages |
LOGICAL usingSyncMessages |
| 79 |
LOGICAL notUsingXPeriodicity |
LOGICAL notUsingXPeriodicity |
| 80 |
LOGICAL notUsingYPeriodicity |
LOGICAL notUsingYPeriodicity |
| 81 |
|
LOGICAL printMapIncludesZeros |
| 82 |
|
|
| 83 |
|
|
| 84 |
C-- COMMON /EESUPP_I/ Parallel support integer globals |
C-- COMMON /EESUPP_I/ Parallel support integer globals |