72 |
C threadIsRunning used during startup to enable check that all |
C threadIsRunning used during startup to enable check that all |
73 |
C the threads are running. |
C the threads are running. |
74 |
fatalError = .FALSE. |
fatalError = .FALSE. |
|
errorMessageUnit = 0 |
|
|
standardMessageUnit = 6 |
|
75 |
eeBootError = .FALSE. |
eeBootError = .FALSE. |
76 |
eeEndError = .FALSE. |
eeEndError = .FALSE. |
77 |
DO I=1, MAX_NO_THREADS |
DO I=1, MAX_NO_THREADS |
81 |
threadIsComplete(I) = .FALSE. |
threadIsComplete(I) = .FALSE. |
82 |
ioErrorCount(I) = 0 |
ioErrorCount(I) = 0 |
83 |
ENDDO |
ENDDO |
84 |
scrUnit1 = 11 |
standardMessageUnit = 6 |
85 |
scrUnit2 = 12 |
scrUnit1 = 11 |
86 |
eeDataUnit = 13 |
scrUnit2 = 12 |
87 |
modelDataUnit = 14 |
eeDataUnit = 13 |
88 |
|
modelDataUnit = 14 |
89 |
|
errorMessageUnit = 15 |
90 |
|
cph errorMessageUnit = 0 is not allowed on some platforms, e.g. SP3 |
91 |
|
C |
92 |
C Annoyingly there is no universal way to have the usingMPI |
C Annoyingly there is no universal way to have the usingMPI |
93 |
C parameter work as one might expect. This is because, on some |
C parameter work as one might expect. This is because, on some |
94 |
C systems I/O does not work until MPI_Init has been called. The |
C systems I/O does not work until MPI_Init has been called. The |