/[MITgcm]/MITgcm_contrib/ESMF/global_ocean.128x64x15/code/eeboot_minimal.F
ViewVC logotype

Diff of /MITgcm_contrib/ESMF/global_ocean.128x64x15/code/eeboot_minimal.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by cnh, Tue Feb 24 02:29:00 2004 UTC revision 1.3 by cnh, Thu Feb 26 03:08:44 2004 UTC
# Line 71  C--    Initialise MPI multi-process para Line 71  C--    Initialise MPI multi-process para
71  C      On some systems program forks at this point. Others have already  C      On some systems program forks at this point. Others have already
72  C      forked within mpirun - now thats an open standard!  C      forked within mpirun - now thats an open standard!
73  C      CALL MPI_INIT( mpiRC )  C      CALL MPI_INIT( mpiRC )
74           mpiRC = MPI_SUCCESS
75         IF ( mpiRC .NE. MPI_SUCCESS ) THEN         IF ( mpiRC .NE. MPI_SUCCESS ) THEN
76          eeBootError = .TRUE.          eeBootError = .TRUE.
77          WRITE(msgBuffer,'(A,I5)')          WRITE(msgBuffer,'(A,I5)')
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22