/[MITgcm]/MITgcm/eesupp/src/eedie.F
ViewVC logotype

Diff of /MITgcm/eesupp/src/eedie.F

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

revision 1.12 by jmc, Sat Sep 1 22:43:55 2012 UTC revision 1.13 by jmc, Thu Oct 11 19:15:18 2012 UTC
# Line 74  C--   end if/else eebootError Line 74  C--   end if/else eebootError
74        CALL F_HPMTERMINATE(myProcId)        CALL F_HPMTERMINATE(myProcId)
75  #endif  #endif
76    
77    C--   Flush IO-unit before MPI termination
78          CALL MDS_FLUSH( errorMessageUnit, 1 )
79    c#ifdef ALLOW_USE_MPI
80          CALL MDS_FLUSH( standardMessageUnit, 1 )
81    c#endif /* ALLOW_USE_MPI */
82    
83  #ifdef ALLOW_USE_MPI  #ifdef ALLOW_USE_MPI
84  C- Note: since MPI_INIT is always called, better to also always terminate MPI  C- Note: since MPI_INIT is always called, better to also always terminate MPI
85  C        (even if usingMPI=F) --> comment out test on usingMPI  C        (even if usingMPI=F) --> comment out test on usingMPI
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22