Searched refs:apvaluestmp (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiptap.c | 702 PetscScalar *c_rmta, *c_otha, *poa, *pda, *apvalues, *apvaluestmp, *c_rmtaa; in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce() local
728 PetscCall(PetscCalloc4(cmaxr, &apindices, cmaxr, &apvalues, cmaxr, &apvaluestmp, pon, &c_rmtc)); in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
750 apvaluestmp[jj] = apvalues[jj] * poa[j]; in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
754 c_rmtaa[jj] = apvaluestmp[jj]; in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
759 c_rmtaa[loc] += apvaluestmp[jj]; in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
769 c_rmtaa[loc] = apvaluestmp[jj]; in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
778 PetscCall(PetscFree4(apindices, apvalues, apvaluestmp, c_rmtc)); in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
795 …PetscCall(PetscCalloc5(cmaxr, &apindices, cmaxr, &apvalues, cmaxr, &apvaluestmp, pn, &dcc, pn, &oc… in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
812 for (jj = 0; jj < voff; jj++) apvaluestmp[jj] = apvalues[jj] * pda[j]; in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
814 PetscCall(MatSetValues(C, 1, &row, voff, apindices, apvaluestmp, ADD_VALUES)); in MatPtAPNumeric_MPIAIJ_MPIXAIJ_allatonce()
[all …]
|