/[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.1 by cnh, Sun Feb 15 22:28:19 2004 UTC revision 1.2 by cnh, Tue Feb 24 02:29:00 2004 UTC
# Line 70  C--   ================================== Line 70  C--   ==================================
70  C--    Initialise MPI multi-process parallel environment.  C--    Initialise MPI multi-process parallel environment.
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         CALL MPI_INIT( mpiRC )  C      CALL MPI_INIT( mpiRC )
74         IF ( mpiRC .NE. MPI_SUCCESS ) THEN         IF ( mpiRC .NE. MPI_SUCCESS ) THEN
75          eeBootError = .TRUE.          eeBootError = .TRUE.
76          WRITE(msgBuffer,'(A,I5)')          WRITE(msgBuffer,'(A,I5)')
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22