Searched refs:lqr_work (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcprivate.c | 7053 PetscBLASInt lqr_work; in PCBDDCConstraintsSetUp() local
7152 lqr_work = -1; in PCBDDCConstraintsSetUp()
7153 …qrf", LAPACKgeqrf_(&Blas_M, &Blas_N, qr_basis, &Blas_LDA, qr_tau, &lqr_work_t, &lqr_work, &lierr)); in PCBDDCConstraintsSetUp()
7155 PetscCall(PetscBLASIntCast((PetscInt)PetscRealPart(lqr_work_t), &lqr_work)); in PCBDDCConstraintsSetUp()
7156 PetscCall(PetscMalloc1(lqr_work, &qr_work)); in PCBDDCConstraintsSetUp()
7202 …CKgeqrf", LAPACKgeqrf_(&Blas_M, &Blas_N, qr_basis, &Blas_LDA, qr_tau, qr_work, &lqr_work, &lierr)); in PCBDDCConstraintsSetUp()
|