624 …ErrorCode PetscDTAltVInteriorMatrix(PetscInt N, PetscInt k, const PetscReal *v, PetscReal *intvMat)  in PetscDTAltVInteriorMatrix()  argument
634       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()
647       intvMat[7] = v[0];  in PetscDTAltVInteriorMatrix()
648       intvMat[8] = v[1];  in PetscDTAltVInteriorMatrix()
654     for (i = 0; i < Nk * Nkm; i++) intvMat[i] = 0.;  in PetscDTAltVInteriorMatrix()
667         intvMat[idx * Nk + i] += flip ? -v[subset[j]] : v[subset[j]];  in PetscDTAltVInteriorMatrix()