Searched refs:VecIndexStore (Results 1 – 1 of 1) sorted by relevance
101 INTEGER, ALLOCATABLE, TARGET, PRIVATE :: IndexStore(:), VecIndexStore(:) variable169 IF ( .NOT. ALLOCATED(VecIndexStore) ) THEN170 ALLOCATE( VecIndexStore(ISTORE_MAX_SIZE), STAT=istat )171 VecIndexStore = 0175 ind => VecIndexStore