Home
last modified time | relevance | path

Searched refs:sub_nnz2 (Results 1 – 2 of 2) sorted by relevance

/phasta/phSolver/AMG/
H A Dramg_paratools.f82 allocate(sub_nnz2%p(numtask))
164 sub_nnz2%p(i) = sub_colm2%pp(i)%p(sub_nshg%p(i)+1)-1
182 allocate(sub_rowp2%pp(i)%p(sub_nnz2%p(i)))
185 allocate(sub_mtx2%pp(i)%p(redun,sub_nnz2%p(i)))
207 call MPI_IRECV(sub_rowp2%pp(i)%p(1),sub_nnz2%p(i),MPI_INTEGER,
211 call MPI_IRECV(sub_rowp2%pp(i)%p(1),sub_nnz2%p(i),MPI_INTEGER,
221 call MPI_IRECV(sub_mtx2%pp(i)%p(1,1),redun*sub_nnz2%p(i),
226 call MPI_IRECV(sub_mtx2%pp(i)%p(1,1),redun*sub_nnz2%p(i),
470 deallocate(sub_nnz2%p)
H A Dramg_data.f45 type(i1d) :: sub_nnz,sub_nnz2,sub_nshg variable