Symbol Description Uses
fIsSet 14


File Line number Procedure Code
./pkg/exch2/w2_set_map_cumsum.F 108 W2_SET_MAP_CUMSUM 
          IF ( fIsSet(j) ) THEN
./pkg/exch2/w2_set_map_cumsum.F 114 W2_SET_MAP_CUMSUM 
            IF ( .NOT.fIsSet(jj) .AND. nType.EQ.1 ) THEN
./pkg/exch2/w2_set_map_cumsum.F 123 W2_SET_MAP_CUMSUM 
              fIsSet(jj) = .TRUE.
./pkg/exch2/w2_set_map_cumsum.F 136 W2_SET_MAP_CUMSUM 
              fIsSet(jj) = .TRUE.
./pkg/exch2/w2_set_map_cumsum.F 143 W2_SET_MAP_CUMSUM 
            IF ( .NOT.fIsSet(jj) .AND. nType.EQ.2 ) THEN
./pkg/exch2/w2_set_map_cumsum.F 152 W2_SET_MAP_CUMSUM 
              fIsSet(jj) = .TRUE.
./pkg/exch2/w2_set_map_cumsum.F 165 W2_SET_MAP_CUMSUM 
              fIsSet(jj) = .TRUE.
./pkg/exch2/w2_set_map_cumsum.F 173 W2_SET_MAP_CUMSUM 
            IF ( .NOT.fIsSet(jj) .AND. nType.EQ.3
./pkg/exch2/w2_set_map_cumsum.F 185 W2_SET_MAP_CUMSUM 
              fIsSet(jj) = .TRUE.
./pkg/exch2/w2_set_map_cumsum.F 200 W2_SET_MAP_CUMSUM 
              fIsSet(jj) = .TRUE.
./pkg/exch2/w2_set_map_cumsum.F 41 W2_SET_MAP_CUMSUM 
      LOGICAL fIsSet(0:W2_maxNbFacets)
./pkg/exch2/w2_set_map_cumsum.F 78 W2_SET_MAP_CUMSUM 
      fIsSet(0) = .TRUE.
./pkg/exch2/w2_set_map_cumsum.F 80 W2_SET_MAP_CUMSUM 
        fIsSet(j) = .FALSE.
./pkg/exch2/w2_set_map_cumsum.F 89 W2_SET_MAP_CUMSUM 
            fIsSet(j) = .TRUE.