/[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.25 by jmc, Sun Jul 31 22:07:47 2005 UTC revision 1.27 by cnh, Mon Nov 7 18:26:02 2005 UTC
# Line 35  CEOP Line 35  CEOP
35  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
36  C     msgBuf - Used for informational I/O.  C     msgBuf - Used for informational I/O.
37        CHARACTER*(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
38    #ifdef ALLOW_MNC
39        INTEGER i        INTEGER i
40    #endif
41    
42  C     load grid spacing (vector) from files  C     load grid spacing (vector) from files
43          _BARRIER
44        CALL LOAD_GRID_SPACING( myThid )        CALL LOAD_GRID_SPACING( myThid )
45          _BARRIER
46    
47  C     Set up vertical grid and coordinate system  C     Set up vertical grid and coordinate system
48        CALL INI_VERTICAL_GRID( myThid )        CALL INI_VERTICAL_GRID( myThid )
Legend:
Removed from v.1.25  
changed lines
  Added in v.1.27
  ViewVC Help
Powered by ViewVC 1.1.22