/[MITgcm]/MITgcm/pkg/mdsio/mdsio_gl_slice.F
ViewVC logotype

Diff of /MITgcm/pkg/mdsio/mdsio_gl_slice.F

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

revision 1.3 by heimbach, Tue Jul 8 15:00:26 2003 UTC revision 1.4 by edhill, Thu Oct 9 04:19:19 2003 UTC
# Line 1  Line 1 
1  #include "CPP_OPTIONS.h"  C $Header$
2    C $Name$
3    
4    #include "MDSIO_OPTIONS.h"
5    
6  C The five "public" routines supplied here are:  C The five "public" routines supplied here are:
7  C  C
# Line 24  C           inserted calls to *print_mes Line 27  C           inserted calls to *print_mes
27  C  C
28  C To be modified to work with MITgcmuv message routines.  C To be modified to work with MITgcmuv message routines.
29    
 #undef  SAFE_IO  
   
 #ifdef SAFE_IO  
 #define _NEW_STATUS 'new'  
 #else  
 #define _NEW_STATUS 'unknown'  
 #endif  
   
 #ifdef ALLOW_AUTODIFF_TAMC  
 #define _OLD_STATUS 'unknown'  
 #else  
 #define _OLD_STATUS 'old'  
 #endif  
   
30  C=======================================================================  C=======================================================================
31        SUBROUTINE MDSREADFIELD_XZ_GL(        SUBROUTINE MDSREADFIELD_XZ_GL(
32       I   fName,       I   fName,

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

  ViewVC Help
Powered by ViewVC 1.1.22