494 |
|
|
495 |
C Create meta-file for the global-file |
C Create meta-file for the global-file |
496 |
if (globalFile) then |
if (globalFile) then |
497 |
C We can't do this operation using threads (yet) because of the |
C We can not do this operation using threads (yet) because of the |
498 |
C "barrier" at the next step. The barrier could be removed but |
C "barrier" at the next step. The barrier could be removed but |
499 |
C at the cost of "safe" distributed I/O. |
C at the cost of "safe" distributed I/O. |
500 |
if (nThreads.NE.1) then |
if (nThreads.NE.1) then |