File |
Line number |
Procedure |
Code |
./pkg/exch2/w2_readparms.F |
161 |
W2_READPARMS |
DO j=W2_maxNbFacets+1,namList_NbFacets |
./pkg/exch2/w2_readparms.F |
181 |
W2_READPARMS |
DO j=2*W2_maxNbFacets+1,2*namList_NbFacets |
./pkg/exch2/w2_readparms.F |
41 |
W2_READPARMS |
INTEGER namList_NbFacets |
./pkg/exch2/w2_readparms.F |
42 |
W2_READPARMS |
PARAMETER ( namList_NbFacets = W2_maxNbFacets*2 ) |
./pkg/exch2/w2_readparms.F |
43 |
W2_READPARMS |
INTEGER dimsFacets( 2*namList_NbFacets ) |
./pkg/exch2/w2_readparms.F |
44 |
W2_READPARMS |
Real*4 facetEdgeLink( 4, namList_NbFacets ) |