/[MITgcm]/MITgcm/pkg/mnc/mnc_dim.F
ViewVC logotype

Diff of /MITgcm/pkg/mnc/mnc_dim.F

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

revision 1.9 by edhill, Mon Mar 29 03:33:51 2004 UTC revision 1.10 by edhill, Fri Apr 2 16:12:48 2004 UTC
# Line 4  C $Name$ Line 4  C $Name$
4  #include "MNC_OPTIONS.h"  #include "MNC_OPTIONS.h"
5                
6  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
7  CBOP  CBOP 0
8  C     !ROUTINE: MNC_DIM_INIT  C     !ROUTINE: MNC_DIM_INIT
9    
10  C     !INTERFACE:  C     !INTERFACE:
# Line 29  CEOP Line 29  CEOP
29    
30    
31  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
32  CBOP  CBOP 1
33  C     !ROUTINE: MNC_DIM_INIT_ALL  C     !ROUTINE: MNC_DIM_INIT_ALL
34    
35  C     !INTERFACE:  C     !INTERFACE:
# Line 53  C     !INPUT PARAMETERS: Line 53  C     !INPUT PARAMETERS:
53        integer myThid, dlen        integer myThid, dlen
54        character*(*) fname, dname        character*(*) fname, dname
55        character*(1) doWrite        character*(1) doWrite
56    CEOP
57    
58  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
59        integer i,j, indf,indd, n,nf, dnf,dnl        integer i,j, indf,indd, n,nf, dnf,dnl
60        integer ntmp, idd, err, tlen        integer ntmp, idd, err, tlen
61        character*(MAX_LEN_MBUF) msgbuf        character*(MAX_LEN_MBUF) msgbuf
62  CEOP  
63  C     Functions  C     Functions
64        integer ILNBLNK, IFNBLNK        integer ILNBLNK, IFNBLNK
65    
# Line 129  C     Add to tables Line 130  C     Add to tables
130        END        END
131    
132  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
133  CBOP  CBOP 1
134  C     !ROUTINE: MNC_DIM_UNLIM_SIZE  C     !ROUTINE: MNC_DIM_UNLIM_SIZE
135    
136  C     !INTERFACE:  C     !INTERFACE:
# Line 150  C     !USES: Line 151  C     !USES:
151  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
152        integer myThid, unlim_sz        integer myThid, unlim_sz
153        character*(*) fname        character*(*) fname
154    CEOP
155    
156  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
157        integer i,j, nf, indf, fid, unlimid, err        integer i,j, nf, indf, fid, unlimid, err
158        character*(MAX_LEN_MBUF) msgbuf        character*(MAX_LEN_MBUF) msgbuf
159  CEOP  
160  C     Functions  C     Functions
161        integer ILNBLNK, IFNBLNK        integer ILNBLNK, IFNBLNK
162    
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22