| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_init_fixed.F |
72 |
FLT_INIT_FIXED |
IF (nFacets .GT. 1) THEN |
|
./pkg/exch2/W2_EXCH2_PARAMS.h |
42 |
NO PROCEDURE |
INTEGER nFacets |
|
./pkg/exch2/W2_EXCH2_PARAMS.h |
51 |
NO PROCEDURE |
& nFacets, facet_dims, |
|
./pkg/exch2/w2_e2setup.F |
134 |
W2_E2SETUP |
& 'W2_E2SETUP: Total number of Facets =', nFacets |
|
./pkg/exch2/w2_readparms.F |
88 |
W2_READPARMS |
nFacets = 0 |
|
./pkg/exch2/w2_set_cs6_facets.F |
142 |
W2_SET_CS6_FACETS |
DO j=2,nFacets |
|
./pkg/exch2/w2_set_cs6_facets.F |
147 |
W2_SET_CS6_FACETS |
IF ( jj.GE.1 .AND. jj.LE.nFacets |
|
./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 |
174 |
W2_SET_CS6_FACETS |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_cs6_facets.F |
55 |
W2_SET_CS6_FACETS |
nFacets = 6 |
|
./pkg/exch2/w2_set_cs6_facets.F |
62 |
W2_SET_CS6_FACETS |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_f2f_index.F |
102 |
W2_SET_F2F_INDEX |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_f2f_index.F |
219 |
W2_SET_F2F_INDEX |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_f2f_index.F |
52 |
W2_SET_F2F_INDEX |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_f2f_index.F |
63 |
W2_SET_F2F_INDEX |
ELSEIF ( jj.LT.1 .OR. jj.GT.nFacets |
|
./pkg/exch2/w2_set_gen_facets.F |
115 |
W2_SET_GEN_FACETS |
DO j=nFacets+1,W2_maxNbFacets |
|
./pkg/exch2/w2_set_gen_facets.F |
124 |
W2_SET_GEN_FACETS |
& ' is beyond range (> nFacets=',nFacets,')' |
|
./pkg/exch2/w2_set_gen_facets.F |
50 |
W2_SET_GEN_FACETS |
nFacets = 0 |
|
./pkg/exch2/w2_set_gen_facets.F |
57 |
W2_SET_GEN_FACETS |
nFacets = j |
|
./pkg/exch2/w2_set_gen_facets.F |
66 |
W2_SET_GEN_FACETS |
IF ( nFacets.EQ.0 ) THEN |
|
./pkg/exch2/w2_set_gen_facets.F |
81 |
W2_SET_GEN_FACETS |
& 'W2_SET_GEN_FACETS: Number of facets =', nFacets, |
|
./pkg/exch2/w2_set_gen_facets.F |
87 |
W2_SET_GEN_FACETS |
DO jj=2*nFacets+1,2*W2_maxNbFacets |
|
./pkg/exch2/w2_set_gen_facets.F |
96 |
W2_SET_GEN_FACETS |
DO jj=1,2*nFacets |
|
./pkg/exch2/w2_set_map_tiles.F |
108 |
W2_SET_MAP_TILES |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_map_tiles.F |
111 |
W2_SET_MAP_TILES |
divide = FIND_GCD_N( nnx, nFacets) |
|
./pkg/exch2/w2_set_map_tiles.F |
122 |
W2_SET_MAP_TILES |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_map_tiles.F |
129 |
W2_SET_MAP_TILES |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_map_tiles.F |
155 |
W2_SET_MAP_TILES |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_map_tiles.F |
66 |
W2_SET_MAP_TILES |
DO j=1,nFacets |
|
./pkg/exch2/w2_set_single_facet.F |
44 |
W2_SET_SINGLE_FACET |
nFacets = 1 |