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

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

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

revision 1.28 by jmc, Tue Jul 25 22:23:36 2006 UTC revision 1.29 by heimbach, Wed Sep 6 02:44:11 2006 UTC
# Line 19  C     !USES: Line 19  C     !USES:
19        IMPLICIT NONE        IMPLICIT NONE
20  #include "SIZE.h"  #include "SIZE.h"
21  #include "EEPARAMS.h"  #include "EEPARAMS.h"
22  #include "EESUPPORT.h"  #ifndef ALLOW_AUTODIFF_TAMC
23    # include "EESUPPORT.h"
24    #endif
25  #include "PARAMS.h"  #include "PARAMS.h"
26  #include "GRID.h"  #include "GRID.h"
27  #ifdef ALLOW_MNC  #ifdef ALLOW_MNC
# Line 82  C     Set up horizontal grid and coordin Line 84  C     Set up horizontal grid and coordin
84          _END_MASTER(myThid)          _END_MASTER(myThid)
85        ENDIF        ENDIF
86    
87    #ifndef ALLOW_AUTODIFF_TAMC
88  #ifdef ALLOW_MONITOR  #ifdef ALLOW_MONITOR
89  #ifdef ALLOW_USE_MPI  #ifdef ALLOW_USE_MPI
90        IF ( .NOT.useSingleCPUIO .OR. mpiMyId.EQ.0 ) THEN        IF ( .NOT.useSingleCPUIO .OR. mpiMyId.EQ.0 ) THEN
# Line 146  C     debugging) Line 149  C     debugging)
149        ENDIF        ENDIF
150  #endif /* ALLOW_USE_MPI */  #endif /* ALLOW_USE_MPI */
151  #endif /* ALLOW_MONITOR */  #endif /* ALLOW_MONITOR */
152    #endif /* ALLOW_AUTODIFF_TAMC */
153    
154        RETURN        RETURN
155        END        END

Legend:
Removed from v.1.28  
changed lines
  Added in v.1.29

  ViewVC Help
Powered by ViewVC 1.1.22