Searched refs:intvMat (Results 1 – 1 of 1) sorted by relevance
624 …ErrorCode PetscDTAltVInteriorMatrix(PetscInt N, PetscInt k, const PetscReal *v, PetscReal *intvMat) in PetscDTAltVInteriorMatrix() argument634 for (i = 0; i < N; i++) intvMat[i] = v[i]; in PetscDTAltVInteriorMatrix()638 for (i = 0; i < N; i++) intvMat[N - 1 - i] = v[i] * mult[i]; in PetscDTAltVInteriorMatrix()640 intvMat[0] = -v[1]; in PetscDTAltVInteriorMatrix()641 intvMat[1] = -v[2]; in PetscDTAltVInteriorMatrix()642 intvMat[2] = 0.; in PetscDTAltVInteriorMatrix()643 intvMat[3] = v[0]; in PetscDTAltVInteriorMatrix()644 intvMat[4] = 0.; in PetscDTAltVInteriorMatrix()645 intvMat[5] = -v[2]; in PetscDTAltVInteriorMatrix()646 intvMat[6] = 0.; in PetscDTAltVInteriorMatrix()[all …]