Symbol Description Uses
setDims 6



File Line number Procedure Code
./pkg/exch2/w2_set_cs6_facets.F 138 W2_SET_CS6_FACETS
      setDims = 3
./pkg/exch2/w2_set_cs6_facets.F 166 W2_SET_CS6_FACETS
        setDims = setDims + addDims
./pkg/exch2/w2_set_cs6_facets.F 169 W2_SET_CS6_FACETS
      IF ( setDims.NE.nFacets*2 ) THEN
./pkg/exch2/w2_set_cs6_facets.F 171 W2_SET_CS6_FACETS
     &     nFacets*2-setDims, ' facet-dims left Unset'
./pkg/exch2/w2_set_cs6_facets.F 42 W2_SET_CS6_FACETS
      INTEGER setDims, addDims