Lines Matching refs:Lstarw
323 …back(PetscInt N, PetscInt M, const PetscReal *L, PetscInt k, const PetscReal *w, PetscReal *Lstarw) in PetscDTAltVPullback() argument
334 Lstarw[0] = w[0]; in PetscDTAltVPullback()
340 Lstarw[i] = sum; in PetscDTAltVPullback()
349 Lstarw[i] = mult[i] * sum; in PetscDTAltVPullback()
361 Lstarw[i] = sum; in PetscDTAltVPullback()
376 Lstarw[i] = sum; in PetscDTAltVPullback()
381 for (i = 0; i < Nk; i++) Lstarw[i] = detL * w[i]; in PetscDTAltVPullback()
405 for (i = 0; i < Nk; i++) Lstarw[i] = 0.; in PetscDTAltVPullback()
417 Lstarw[j] += prod; in PetscDTAltVPullback()
425 PetscCall(PetscDTAltVStar(N, N - k, -1, Lstarw, sLsw)); in PetscDTAltVPullback()
426 for (i = 0; i < Nk; i++) Lstarw[i] = sLsw[i]; in PetscDTAltVPullback()