| File |
Line number |
Procedure |
Code |
|
./pkg/exch2/w2_set_map_tiles.F |
227 |
W2_SET_MAP_TILES |
INTEGER FUNCTION FIND_GCD_N( fldList, nFld ) |
|
./pkg/exch2/w2_set_map_tiles.F |
242 |
W2_SET_MAP_TILES |
INTEGER fldList(nFld) |
|
./pkg/exch2/w2_set_map_tiles.F |
253 |
W2_SET_MAP_TILES |
mnFld = fldList(1) |
|
./pkg/exch2/w2_set_map_tiles.F |
255 |
W2_SET_MAP_TILES |
mnFld = MIN( mnFld, fldList(j) ) |
|
./pkg/exch2/w2_set_map_tiles.F |
266 |
W2_SET_MAP_TILES |
flag = flag.AND.(MOD(fldList(j),ii).EQ.0 ) |
|
./pkg/exch2/w2_set_map_tiles.F |
271 |
W2_SET_MAP_TILES |
fldList(j) = fldList(j)/ii |
|
./pkg/exch2/w2_set_map_tiles.F |
282 |
W2_SET_MAP_TILES |
IF (localDBg) WRITE(0,'(10I8)') (fldList(j),j=1,nFld) |
|
./pkg/exch2/w2_set_map_tiles.F |
284 |
W2_SET_MAP_TILES |
fldList(j) = fldList(j)*divide |
|
./pkg/mdsio/mdsio_read_meta.F |
114 |
MDS_READ_META |
fldList(i)= ' ' |
|
./pkg/mdsio/mdsio_read_meta.F |
15 |
MDS_READ_META |
O dimList, fldList, timList, |
|
./pkg/mdsio/mdsio_read_meta.F |
372 |
MDS_READ_META |
& (fldList(i),i=j,MIN(nFldFil,j+19)) |
|
./pkg/mdsio/mdsio_read_meta.F |
67 |
MDS_READ_META |
CHARACTER*(8) fldList(*) |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
141 |
MDS_WR_METAFILES |
I filePrec, nDims,dimList,map2gl, nFlds, fldList, |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
17 |
MDS_WR_METAFILES |
I nFlds, fldList, |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
210 |
MDS_WR_METAFILES |
I filePrec, nDims,dimList,map2gl, nFlds, fldList, |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
81 |
MDS_WR_METAFILES |
CHARACTER*(8) fldList(*) |
|
./pkg/mdsio/mdsio_write_meta.F |
16 |
MDS_WRITE_META |
I nFlds, fldList, |
|
./pkg/mdsio/mdsio_write_meta.F |
192 |
MDS_WRITE_META |
& (" '",fldList(i),"'",i=1,nFlds) |
|
./pkg/mdsio/mdsio_write_meta.F |
63 |
MDS_WRITE_META |
CHARACTER*(8) fldList(*) |
|
./pkg/rw/RW_MFLDS.h |
40 |
NO PROCEDURE |
& mFldsFile, fldList, fldMiss |
|
./pkg/rw/RW_MFLDS.h |
42 |
NO PROCEDURE |
CHARACTER*(8) fldList(sizFldList) |
|
./pkg/rw/read_mflds.F |
145 |
READ_MFLDS_SET |
fldList(i) = ' ' |
|
./pkg/rw/read_mflds.F |
160 |
READ_MFLDS_SET |
O dimList, fldList, timList, |
|
./pkg/rw/read_mflds.F |
216 |
READ_MFLDS_SET |
& (' >', fldList(i), '<', i=j,MIN(j+19,nFlds) ) |
|
./pkg/rw/read_mflds.F |
309 |
READ_MFLDS_3D_RL |
IF ( fldName.EQ.fldList(j) .AND. nj.EQ.0 ) nj = j |
|
./pkg/rw/read_mflds.F |
438 |
READ_MFLDS_LEV_RL |
IF ( fldName.EQ.fldList(j) .AND. nj.EQ.0 ) nj = j |
|
./pkg/rw/read_mflds.F |
51 |
READ_MFLDS_INIT |
fldList(i) = ' ' |
|
./pkg/rw/read_mflds.F |
567 |
READ_MFLDS_LEV_RS |
IF ( fldName.EQ.fldList(j) .AND. nj.EQ.0 ) nj = j |
|
./pkg/rw/read_mflds.F |
701 |
READ_MFLDS_CHECK |
& (' >', fldList(i), '<', i=j,MIN(j+19,nFlds) ) |
|
./pkg/rw/read_mflds.F |
797 |
READ_MFLDS_RENAME |
IF ( fldList(i) .EQ. fldName ) THEN |
|
./pkg/rw/read_mflds.F |
811 |
READ_MFLDS_RENAME |
IF ( fldList(i).EQ.newName ) errCode = 2 |
|
./pkg/rw/read_mflds.F |
818 |
READ_MFLDS_RENAME |
fldList(j) = newName |