Home
last modified time | relevance | path

Searched refs:corr (Results 1 – 3 of 3) sorted by relevance

/petsc/src/ksp/ksp/guess/impls/fischer/
H A Dfischer.c14 PetscScalar *corr; /* correlation matrix in column-major format, method 3 */ member
40 if (itg->corr) PetscCall(PetscMemzero(itg->corr, sizeof(*itg->corr) * itg->maxl * itg->maxl)); in KSPGuessReset_Fischer()
57 if (!itg->corr && itg->method == 3) PetscCall(PetscCalloc1(itg->maxl * itg->maxl, &itg->corr)); in KSPGuessSetUp_Fischer()
72 PetscCall(PetscFree(itg->corr)); in KSPGuessDestroy_Fischer()
201 PetscScalar *corr, *work, *scratch_vec, zero = 0.0, one = 1.0; in KSPGuessFormGuess_Fischer_3() local
217 …PetscCall(PetscCalloc5(m * m, &corr, m, &s_values, blas_lwork, &work, 3 * m - 2, &rwork, m, &scrat… in KSPGuessFormGuess_Fischer_3()
219 PetscCall(PetscCalloc4(m * m, &corr, m, &s_values, blas_lwork, &work, m, &scratch_vec)); in KSPGuessFormGuess_Fischer_3()
223 for (i = 0; i < m; ++i) corr[m * j + i] = itg->corr[(itg->maxl) * j + i]; in KSPGuessFormGuess_Fischer_3()
228 …PetscCallBLAS("LAPACKheev", LAPACKheev_("V", "L", &blas_m, corr, &blas_m, s_values, work, &blas_lw… in KSPGuessFormGuess_Fischer_3()
230 …PetscCallBLAS("LAPACKsyev", LAPACKsyev_("V", "L", &blas_m, corr, &blas_m, s_values, work, &blas_lw… in KSPGuessFormGuess_Fischer_3()
[all …]
/petsc/src/ksp/ksp/guess/impls/pod/
H A Dpod.c24 PetscScalar *corr; /* correlation matrix */ member
71 if (!pod->corr) { in KSPGuessSetUp_POD()
76 …PetscCall(PetscCalloc6(pod->maxn * pod->maxn, &pod->corr, pod->maxn, &pod->eigs, pod->maxn * pod->… in KSPGuessSetUp_POD()
86 …PetscCallBLAS("LAPACKsyevx", LAPACKsyevx_("V", "A", "L", &bN, pod->corr, &bN, &rdummy, &rdummy, &i… in KSPGuessSetUp_POD()
88 …PetscCallBLAS("LAPACKsyevx", LAPACKsyevx_("V", "A", "L", &bN, pod->corr, &bN, &rdummy, &rdummy, &i… in KSPGuessSetUp_POD()
122 PetscCall(PetscFree6(pod->corr, pod->eigs, pod->eigv, pod->iwork, pod->yhay, pod->low)); in KSPGuessDestroy_POD()
299 pod->corr[pod->curr * pod->maxn + i] = pod->swork[3 * pod->n + i]; in KSPGuessUpdate_POD()
300 pod->corr[i * pod->maxn + pod->curr] = PetscConj(pod->swork[3 * pod->n + i]); in KSPGuessUpdate_POD()
309 for (j = i; j < pod->n; j++) pod->swork[i * pod->n + j] = pod->corr[i * pod->maxn + j]; in KSPGuessUpdate_POD()
361 PetscCall(MatCreateSeqDense(PETSC_COMM_SELF, pod->n, pod->n, pod->corr, &C)); in KSPGuessUpdate_POD()
[all …]
/petsc/share/petsc/datafiles/meshes/
H A Dtestcase3D.cas4333 (mp/mfluid-face-vof-corr? #t)
4374 (vof/surf-tens/csf/den-corr-option 0)
4655 (dqmom-iem/corr-limit 1.)