/[MITgcm]/MITgcm/model/src/the_model_main.F
ViewVC logotype

Diff of /MITgcm/model/src/the_model_main.F

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

revision 1.74 by dimitri, Tue Mar 2 08:45:46 2004 UTC revision 1.75 by edhill, Fri Mar 19 03:28:36 2004 UTC
# Line 637  C--   Final checkpoint (in case the in-l Line 637  C--   Final checkpoint (in case the in-l
637  #ifdef ALLOW_MNC  #ifdef ALLOW_MNC
638  C     Close all open NetCDF files  C     Close all open NetCDF files
639        _BEGIN_MASTER( mythid )        _BEGIN_MASTER( mythid )
640        CALL MNC_FILE_CLOSE_ALL()        CALL MNC_FILE_CLOSE_ALL( myThid )
641        _END_MASTER( mythid )        _END_MASTER( mythid )
642  #endif  #endif
643    
Legend:
Removed from v.1.74  
changed lines
  Added in v.1.75
  ViewVC Help
Powered by ViewVC 1.1.22