Searched refs:sub_nnz2 (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_paratools.f | 82 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 D | ramg_data.f | 45 type(i1d) :: sub_nnz,sub_nnz2,sub_nshg variable
|