Searched refs:awedgeMat (Results 1 – 1 of 1) sorted by relevance
227 …etscDTAltVWedgeMatrix(PetscInt N, PetscInt j, PetscInt k, const PetscReal *a, PetscReal *awedgeMat) in PetscDTAltVWedgeMatrix() argument240 for (i = 0; i < Njk * Njk; i++) awedgeMat[i] = 0.; in PetscDTAltVWedgeMatrix()241 for (i = 0; i < Njk; i++) awedgeMat[i * (Njk + 1)] = a[0]; in PetscDTAltVWedgeMatrix()243 for (i = 0; i < Njk; i++) awedgeMat[i] = a[i]; in PetscDTAltVWedgeMatrix()246 awedgeMat[0] = -a[1]; in PetscDTAltVWedgeMatrix()247 awedgeMat[1] = a[0]; in PetscDTAltVWedgeMatrix()250 awedgeMat[0] = -a[1]; in PetscDTAltVWedgeMatrix()251 awedgeMat[1] = a[0]; in PetscDTAltVWedgeMatrix()252 awedgeMat[2] = 0.; in PetscDTAltVWedgeMatrix()253 awedgeMat[3] = -a[2]; in PetscDTAltVWedgeMatrix()[all …]