Symbol Description Uses
nBl 8



File Line number Procedure Code
./pkg/exch2/w2_set_cs6_facets.F 101 W2_SET_CS6_FACETS
        nBl = nRd
./pkg/exch2/w2_set_cs6_facets.F 102 W2_SET_CS6_FACETS
      ELSEIF ( nRd+nGr+nBl.EQ.0 ) THEN
./pkg/exch2/w2_set_cs6_facets.F 110 W2_SET_CS6_FACETS
          nBl = nRd
./pkg/exch2/w2_set_cs6_facets.F 127 W2_SET_CS6_FACETS
      IF ( nRd*nGr*nBl.EQ.0 ) THEN
./pkg/exch2/w2_set_cs6_facets.F 136 W2_SET_CS6_FACETS
      facet_dims(3) = nBl
./pkg/exch2/w2_set_cs6_facets.F 41 W2_SET_CS6_FACETS
      INTEGER nRd, nGr, nBl
./pkg/exch2/w2_set_cs6_facets.F 87 W2_SET_CS6_FACETS
      nBl = facet_dims(3)
./pkg/exch2/w2_set_cs6_facets.F 98 W2_SET_CS6_FACETS
      IF ( nRd.GT.0 .AND. nGr+nBl.EQ.0 ) THEN