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: |
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: |
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 |
|
|
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: |
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 |
|
|