Searched refs:LWORK (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ts/impls/implicit/radau5/ |
| H A D | radau5.c | 79 PetscInt ND, *IWORK, LWORK, LIWORK, MUJAC, MLMAS, MUMAS, IDID, ITOL; in TSSolve_Radau5() local
88 LWORK = 4 * ND * ND + 12 * ND + 20; in TSSolve_Radau5()
91 PetscCall(PetscCalloc2(LWORK, &WORK, LIWORK, &IWORK)); in TSSolve_Radau5()
116 …IJAC, &MLJAC, &MUJAC, FVPOL, &IMAS, &MLMAS, &MUMAS, SOLOUT, &IOUT, WORK, &LWORK, IWORK, &LIWORK, &… in TSSolve_Radau5()
|
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | agg.c | 558 PetscBLASInt Mdata, LDA, LWORK; in formProl0() local
568 PetscCall(PetscBLASIntCast(N * bs, &LWORK)); in formProl0()
573 PetscCall(PetscMalloc5(Mdata * N, &qqc, M * N, &qqr, N, &TAU, LWORK, &WORK, M, &fids)); in formProl0()
609 PetscCallBLAS("LAPACKgeqrf", LAPACKgeqrf_(&Mdata, &N, qqc, &LDA, TAU, WORK, &LWORK, &INFO)); in formProl0()
626 … PetscCallBLAS("LAPACKorgqr", LAPACKorgqr_(&Mdata, &N, &N, qqc, &LDA, TAU, WORK, &LWORK, &INFO)); in formProl0()
|