103     PetscInt  Nk, Nf;  in PetscDTAltVApply()  local
109     PetscCall(PetscDTBinomialInt(N, k, &Nk));  in PetscDTAltVApply()
111     for (i = 0; i < Nk; i++) {  in PetscDTAltVApply()
268     PetscInt  Nk;  in PetscDTAltVWedgeMatrix()  local
272     PetscCall(PetscDTBinomialInt(N, k, &Nk));  in PetscDTAltVWedgeMatrix()
276     for (i = 0; i < Njk * Nk; i++) awedgeMat[i] = 0.;  in PetscDTAltVWedgeMatrix()
290         awedgeMat[i * Nk + kInd] += jkOdd ? -a[jInd] : a[jInd];  in PetscDTAltVWedgeMatrix()
325   PetscInt i, j, Nk, Mk;  in PetscDTAltVPullback()  local
332     PetscCall(PetscDTBinomialInt(N, PetscAbsInt(k), &Nk));  in PetscDTAltVPullback()
336       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullback()
339         for (j = 0; j < Mk; j++) sum += L[j * Nk + i] * w[j];  in PetscDTAltVPullback()
345       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullback()
348         for (j = 0; j < Mk; j++) sum += L[(Mk - 1 - j) * Nk + (Nk - 1 - i)] * w[j] * mult[j];  in PetscDTAltVPullback()
358       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullback()
372       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullback()
381       for (i = 0; i < Nk; i++) Lstarw[i] = detL * w[i];  in PetscDTAltVPullback()
393     PetscCall(PetscDTBinomialInt(N, PetscAbsInt(k), &Nk));  in PetscDTAltVPullback()
405     for (i = 0; i < Nk; i++) Lstarw[i] = 0.;  in PetscDTAltVPullback()
408       for (j = 0; j < Nk; j++) {  in PetscDTAltVPullback()
424       PetscCall(PetscMalloc1(Nk, &sLsw));  in PetscDTAltVPullback()
426       for (i = 0; i < Nk; i++) Lstarw[i] = sLsw[i];  in PetscDTAltVPullback()
454   PetscInt   Nk, Mk, Nf, i, j, l, p;  in PetscDTAltVPullbackMatrix()  local
467     PetscCall(PetscDTBinomialInt(N, PetscAbsInt(k), &Nk));  in PetscDTAltVPullbackMatrix()
471       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullbackMatrix()
472         for (j = 0; j < Mk; j++) Lstar[i * Mk + j] = L[j * Nk + i];  in PetscDTAltVPullbackMatrix()
475       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullbackMatrix()
476 …for (j = 0; j < Mk; j++) Lstar[i * Mk + j] = L[(Mk - 1 - j) * Nk + (Nk - 1 - i)] * mult[i] * mult[…  in PetscDTAltVPullbackMatrix()
485       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullbackMatrix()
497       for (i = 0; i < Nk; i++) {  in PetscDTAltVPullbackMatrix()
503       for (i = 0; i < Nk; i++) Lstar[i] = detL;  in PetscDTAltVPullbackMatrix()
511     PetscCall(PetscDTBinomialInt(N, PetscAbsInt(k), &Nk));  in PetscDTAltVPullbackMatrix()
514     for (i = 0; i < Nk * Mk; i++) Lstar[i] = 0.;  in PetscDTAltVPullbackMatrix()
522       for (j = 0; j < Nk; j++) {  in PetscDTAltVPullbackMatrix()
526         jidx = negative ? Nk - 1 - j : j;  in PetscDTAltVPullbackMatrix()
563   PetscInt i, Nk, Nkm;  in PetscDTAltVInterior()  local
567   PetscCall(PetscDTBinomialInt(N, k, &Nk));  in PetscDTAltVInterior()
589     for (i = 0; i < Nk; i++) {  in PetscDTAltVInterior()
626   PetscInt i, Nk, Nkm;  in PetscDTAltVInteriorMatrix()  local
630   PetscCall(PetscDTBinomialInt(N, k, &Nk));  in PetscDTAltVInteriorMatrix()
654     for (i = 0; i < Nk * Nkm; i++) intvMat[i] = 0.;  in PetscDTAltVInteriorMatrix()
655     for (i = 0; i < Nk; i++) {  in PetscDTAltVInteriorMatrix()
667         intvMat[idx * Nk + i] += flip ? -v[subset[j]] : v[subset[j]];  in PetscDTAltVInteriorMatrix()
696   PetscInt i, Nk, Nkm;  in PetscDTAltVInteriorPattern()  local
700   PetscCall(PetscDTBinomialInt(N, k, &Nk));  in PetscDTAltVInteriorPattern()
741     for (i = 0; i < Nk; i++) {  in PetscDTAltVInteriorPattern()
788   PetscInt Nk, i;  in PetscDTAltVStar()  local
792   PetscCall(PetscDTBinomialInt(N, k, &Nk));  in PetscDTAltVStar()
800       for (i = 0; i < Nk; i++) starw[Nk - 1 - i] = w[i] * mult[i];  in PetscDTAltVStar()
802       for (i = 0; i < Nk; i++) starw[i] = w[i];  in PetscDTAltVStar()
805       for (i = 0; i < Nk; i++) starw[i] = -starw[i];  in PetscDTAltVStar()
813       for (i = 0; i < Nk; i++) {  in PetscDTAltVStar()
823       for (i = 0; i < Nk; i++) starw[i] = w[i];  in PetscDTAltVStar()
827       for (i = 0; i < Nk; i++) starw[i] = -starw[i];  in PetscDTAltVStar()