| /petsc/src/mat/tests/ |
| H A D | ex101.c | 8 PetscScalar pa[] = {1., -1., 0., 0., 1., -1., 0., 0., 1.}; in main() local
32 PetscCall(MatSetValues(pA, 3, pij, 3, pij, pa, ADD_VALUES)); in main()
47 PetscCall(MatSetValues(A, 3, aij[0], 3, aij[0], pa, ADD_VALUES)); in main()
48 PetscCall(MatSetValues(A, 3, aij[1], 3, aij[1], pa, ADD_VALUES)); in main()
49 PetscCall(MatSetValues(A, 3, aij[2], 3, aij[2], pa, ADD_VALUES)); in main()
|
| /petsc/src/mat/impls/dense/mpi/ |
| H A D | mmdense.c | 55 PetscMPIInt rank, size, tag0, tag1, idex, end, i, proc, nrqs, *rtable, *pa, nrqr; in MatCreateSubMatrices_MPIDense_Local() local
133 PetscCall(PetscMalloc1(nrqs + 1, &pa)); /*(proc -array)*/ in MatCreateSubMatrices_MPIDense_Local()
136 pa[j] = i; in MatCreateSubMatrices_MPIDense_Local()
143 PetscMPIInt j = pa[i]; in MatCreateSubMatrices_MPIDense_Local()
167 PetscMPIInt j = pa[i]; in MatCreateSubMatrices_MPIDense_Local()
177 PetscInt j = pa[i]; in MatCreateSubMatrices_MPIDense_Local()
212 PetscMPIInt j = pa[i]; in MatCreateSubMatrices_MPIDense_Local()
220 PetscMPIInt j = pa[i]; in MatCreateSubMatrices_MPIDense_Local()
339 sbuf1_i = sbuf1[pa[i]]; in MatCreateSubMatrices_MPIDense_Local()
379 PetscCall(PetscFree(pa)); in MatCreateSubMatrices_MPIDense_Local()
|
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | baijov.c | 62 PetscMPIInt size, rank, tag1, tag2, *w2, *w1, nrqs, nrqr, *pa; in MatIncreaseOverlap_MPIBAIJ_Once() local
119 PetscCall(PetscMalloc1(nrqs, &pa)); in MatIncreaseOverlap_MPIBAIJ_Once()
122 pa[j] = i; in MatIncreaseOverlap_MPIBAIJ_Once()
129 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIBAIJ_Once()
148 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIBAIJ_Once()
158 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIBAIJ_Once()
213 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIBAIJ_Once()
311 PetscCall(PetscFree(pa)); in MatIncreaseOverlap_MPIBAIJ_Once()
620 PetscMPIInt *pa, **row2proc, *row2proc_i, proc = -1; local
714 pa = smat_i->pa;
[all …]
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiov.c | 504 PetscMPIInt size, rank, tag1, tag2, proc = 0, nrqs, *pa; in MatIncreaseOverlap_MPIAIJ_Once() local
562 PetscCall(PetscMalloc1(nrqs, &pa)); in MatIncreaseOverlap_MPIAIJ_Once()
565 pa[j] = i; in MatIncreaseOverlap_MPIAIJ_Once()
572 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIAIJ_Once()
592 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIAIJ_Once()
602 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIAIJ_Once()
677 PetscMPIInt j = pa[i]; in MatIncreaseOverlap_MPIAIJ_Once()
812 PetscCall(PetscFree(pa)); in MatIncreaseOverlap_MPIAIJ_Once()
1222 …ank, size, *req_source1, *req_source2, tag1, tag2, tag3, tag4, *w1, *w2, nrqr, nrqs = 0, proc, *pa; in MatCreateSubMatrices_MPIAIJ_SingleIS_Local() local
1298 PetscCall(PetscMalloc1(nrqs, &pa)); /*(proc -array)*/ in MatCreateSubMatrices_MPIAIJ_SingleIS_Local()
[all …]
|
| H A D | mpiptap.c | 637 PetscScalar ra, *aa, *pa; in MatPtAPNumericComputeOneRowOfAP_private() local
655 pa = pd->a + pd->i[row]; in MatPtAPNumericComputeOneRowOfAP_private()
656 …0; k < nzpi; k++) PetscCall(PetscHMapIVAddValue(hmap, pj[k] * dof + offset + pcstart, ra * pa[k])); in MatPtAPNumericComputeOneRowOfAP_private()
666 pa = PetscSafePointerPlusOffset(po->a, po->i[row]); in MatPtAPNumericComputeOneRowOfAP_private()
667 …; k < nzpi; k++) PetscCall(PetscHMapIVAddValue(hmap, p->garray[pj[k]] * dof + offset, ra * pa[k])); in MatPtAPNumericComputeOneRowOfAP_private()
685 pa = p_oth->a + pi[row]; in MatPtAPNumericComputeOneRowOfAP_private()
686 …ol < pnz; col++) PetscCall(PetscHMapIVAddValue(hmap, p_othcols[col] * dof + offset, ra * pa[col])); in MatPtAPNumericComputeOneRowOfAP_private()
|
| H A D | mpimatmatmult.c | 663 PetscScalar *pa_loc, *pa_oth, *pa, valtmp, *ca; in MatMatMultNumeric_MPIAIJ_MPIAIJ() local
731 pa = pa_loc + pi_loc[row]; in MatMatMultNumeric_MPIAIJ_MPIAIJ()
737 apa_sparse[k] += valtmp * pa[nextp++]; in MatMatMultNumeric_MPIAIJ_MPIAIJ()
751 pa = pa_oth + pi_oth[row]; in MatMatMultNumeric_MPIAIJ_MPIAIJ()
757 apa_sparse[k] += valtmp * pa[nextp++]; in MatMatMultNumeric_MPIAIJ_MPIAIJ()
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | matptap.c | 197 MatScalar *aa, *apa, *pa, *pA, *paj, *ca, *caj; in MatPtAPNumeric_SeqAIJ_SeqAIJ_SparseAxpy() local
215 pa = p->a; in MatPtAPNumeric_SeqAIJ_SeqAIJ_SparseAxpy()
230 paj = pa + pi[prow]; in MatPtAPNumeric_SeqAIJ_SeqAIJ_SparseAxpy()
|
| H A D | aij.h | 17 PetscMPIInt *pa; /* process array */ member
|
| H A D | aij.c | 2652 PetscCall(PetscFree(submatj->pa)); in MatDestroySubMatrix_Private()
|
| /petsc/src/binding/petsc4py/ |
| H A D | setup.py | 177 pa = os.environ.get('PETSC_ARCH', '')
180 depends += glob_join(pd, pa, 'include', '%sconf.h' % pkg)
|
| /petsc/src/mat/impls/aij/mpi/mumps/ |
| H A D | mumps.c | 275 …psMakeMumpsScalarArray(PetscBool convert, PetscCount n, const PetscScalar *pa, PetscPrecision prec… in MatMumpsMakeMumpsScalarArray() argument
292 b[i].r = PetscRealPart(pa[i]); in MatMumpsMakeMumpsScalarArray()
293 b[i].i = PetscImaginaryPart(pa[i]); in MatMumpsMakeMumpsScalarArray()
305 b[i].r = PetscRealPart(pa[i]); in MatMumpsMakeMumpsScalarArray()
306 b[i].i = PetscImaginaryPart(pa[i]); in MatMumpsMakeMumpsScalarArray()
321 for (PetscCount i = 0; i < n; i++) b[i] = pa[i]; in MatMumpsMakeMumpsScalarArray()
331 for (PetscCount i = 0; i < n; i++) b[i] = pa[i]; in MatMumpsMakeMumpsScalarArray()
340 *ma = (void *)pa; // same precision, make them alias in MatMumpsMakeMumpsScalarArray()
350 …CastMumpsScalarArray(PetscCount n, PetscPrecision mumps_precision, const void *ma, PetscScalar *pa) in MatMumpsCastMumpsScalarArray() argument
357 PetscReal *a = (PetscReal *)pa; in MatMumpsCastMumpsScalarArray()
[all …]
|
| /petsc/src/mat/impls/maij/ |
| H A D | maij.c | 595 const MatScalar *aa = a->a, *pa = p->a, *pA, *paj; in MatPtAPNumeric_SeqAIJ_SeqMAIJ() local
616 paj = pa + pi[prow]; in MatPtAPNumeric_SeqAIJ_SeqMAIJ()
640 pA = pa + poffset; in MatPtAPNumeric_SeqAIJ_SeqMAIJ()
|