Searched refs:lgqr_work_t (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcprivate.c | 7055 PetscScalar *gqr_work = NULL, lgqr_work_t = 0.0; in PCBDDCConstraintsSetUp() local
7163 … LAPACKorgqr_(&Blas_M, &Blas_N, &Blas_K, qr_basis, &Blas_LDA, qr_tau, &lgqr_work_t, &lgqr_work, &l… in PCBDDCConstraintsSetUp()
7165 PetscCall(PetscBLASIntCast((PetscInt)PetscRealPart(lgqr_work_t), &lgqr_work)); in PCBDDCConstraintsSetUp()
|