Searched refs:p_idx_cent (Results 1 – 1 of 1) sorted by relevance
945 integer, allocatable :: p_idx_cent(:) local992 allocate(p_idx_cent(1), stat=ierr)996 p_idx_cent = 01405 deallocate(p_idx_cent)1575 allocate(p_idx_cent(1), stat=ierr)1579 p_idx_cent = 01976 deallocate(p_idx_cent)2151 p_idx_cent = 02400 deallocate(p_idx_cent)2540 p_idx_cent = 0[all …]