45     if (!mat->fwork) {  in MatSeqDenseInvertFactors_Private()
47       PetscCall(PetscMalloc1(mat->lfwork, &mat->fwork));  in MatSeqDenseInvertFactors_Private()
50 …PetscCallBLAS("LAPACKgetri", LAPACKgetri_(&n, mat->v, &mat->lda, mat->pivots, mat->fwork, &mat->lf…  in MatSeqDenseInvertFactors_Private()
62       PetscCheck(mat->fwork, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Fwork not present");  in MatSeqDenseInvertFactors_Private()
64 …PetscCallBLAS("LAPACKhetri", LAPACKhetri_("L", &n, mat->v, &mat->lda, mat->pivots, mat->fwork, &in…  in MatSeqDenseInvertFactors_Private()
70       PetscCheck(mat->fwork, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Fwork not present");  in MatSeqDenseInvertFactors_Private()
72 …PetscCallBLAS("LAPACKsytri", LAPACKsytri_("L", &n, mat->v, &mat->lda, mat->pivots, mat->fwork, &in…  in MatSeqDenseInvertFactors_Private()
463     PetscScalar  fwork;  in MatSolve_SeqDense_Internal_QR()  local
465 …"L", &trans, &m, &nrhs, &mat->rank, mat->v, &mat->lda, mat->tau, x, &ldx, &fwork, &lfwork, &info));  in MatSolve_SeqDense_Internal_QR()
466     nlfwork = (PetscBLASInt)PetscRealPart(fwork);  in MatSolve_SeqDense_Internal_QR()
469       PetscCall(PetscFree(mat->fwork));  in MatSolve_SeqDense_Internal_QR()
470       PetscCall(PetscMalloc1(mat->lfwork, &mat->fwork));  in MatSolve_SeqDense_Internal_QR()
473 …&trans, &m, &nrhs, &mat->rank, mat->v, &mat->lda, mat->tau, x, &ldx, mat->fwork, &mat->lfwork, &in…  in MatSolve_SeqDense_Internal_QR()
501       PetscScalar  fwork;  in MatSolveTranspose_SeqDense_Internal_QR()  local
503 …r_("L", "N", &m, &nrhs, &mat->rank, mat->v, &mat->lda, mat->tau, x, &ldx, &fwork, &lfwork, &info));  in MatSolveTranspose_SeqDense_Internal_QR()
504       nlfwork = (PetscBLASInt)PetscRealPart(fwork);  in MatSolveTranspose_SeqDense_Internal_QR()
507         PetscCall(PetscFree(mat->fwork));  in MatSolveTranspose_SeqDense_Internal_QR()
508         PetscCall(PetscMalloc1(mat->lfwork, &mat->fwork));  in MatSolveTranspose_SeqDense_Internal_QR()
512 …", "N", &m, &nrhs, &mat->rank, mat->v, &mat->lda, mat->tau, x, &ldx, mat->fwork, &mat->lfwork, &in…  in MatSolveTranspose_SeqDense_Internal_QR()
852     if (!mat->fwork) {  in MatCholeskyFactor_SeqDense()
860       PetscCall(PetscMalloc1(mat->lfwork, &mat->fwork));  in MatCholeskyFactor_SeqDense()
863 …PetscCallBLAS("LAPACKhetrf", LAPACKhetrf_("L", &n, mat->v, &mat->lda, mat->pivots, mat->fwork, &ma…  in MatCholeskyFactor_SeqDense()
868     if (!mat->fwork) {  in MatCholeskyFactor_SeqDense()
876       PetscCall(PetscMalloc1(mat->lfwork, &mat->fwork));  in MatCholeskyFactor_SeqDense()
879 …PetscCallBLAS("LAPACKsytrf", LAPACKsytrf_("L", &n, mat->v, &mat->lda, mat->pivots, mat->fwork, &ma…  in MatCholeskyFactor_SeqDense()
928   if (!mat->fwork) {  in MatQRFactor_SeqDense()
936     PetscCall(PetscMalloc1(mat->lfwork, &mat->fwork));  in MatQRFactor_SeqDense()
939 …PetscCallBLAS("LAPACKgeqrf", LAPACKgeqrf_(&m, &n, mat->v, &mat->lda, mat->tau, mat->fwork, &mat->l…  in MatQRFactor_SeqDense()
1717   PetscCall(PetscFree(l->fwork));  in MatDestroy_SeqDense()
1818       PetscCall(PetscFree(mat->fwork));  in MatTranspose_SeqDense()