Searched refs:swork (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ksp/ksp/guess/impls/pod/ |
| H A D | pod.c | 36 PetscScalar *swork; member
92 PetscCall(PetscMalloc1(pod->lwork + PetscMax(bN * bN, 6 * bN), &pod->swork)); in KSPGuessSetUp_POD()
129 PetscCall(PetscFree(pod->swork)); in KSPGuessDestroy_POD()
154 PetscCall(VecMDot(pod->bsnap[pod->curr], pod->n, pod->xsnap, pod->swork)); in KSPGuessFormGuess_POD()
156 …PetscCallMPI(MPIU_Allreduce(pod->swork, pod->swork + pod->n, pod->n, MPIU_SCALAR, MPIU_SUM, PetscO… in KSPGuessFormGuess_POD()
159 …N, &bNen, &one, pod->eigv + pod->st * pod->n, &bN, pod->swork + pod->n, &ione, &zero, pod->swork, … in KSPGuessFormGuess_POD()
164 …ect)guess), "%g + %g i", (double)PetscRealPart(pod->swork[i]), (double)PetscImaginaryPart(pod->swo… in KSPGuessFormGuess_POD()
166 PetscCall(PetscPrintf(PetscObjectComm((PetscObject)guess), "%g ", (double)pod->swork[i])); in KSPGuessFormGuess_POD()
192 …Kgetrs_(tsolve ? "T" : "N", &bNen, &ione, pod->low, &bNen, pod->iwork, pod->swork, &bNen, &lierr)); in KSPGuessFormGuess_POD()
196 …", &bN, &bNen, &one, pod->eigv + pod->st * pod->n, &bN, pod->swork, &ione, &zero, pod->swork + pod… in KSPGuessFormGuess_POD()
[all …]
|
| /petsc/src/ts/impls/glee/ |
| H A D | glee.c | 57 PetscScalar *swork; /* Scalar work (size of the number of stages)*/ member
440 PetscScalar *ws = glee->swork, *wr = glee->rwork; in TSEvaluateStep_GLEE()
503 PetscScalar *ws = glee->swork, *wr = glee->rwork; in TSStep_GLEE()
640 PetscCall(PetscFree2(glee->swork, glee->rwork)); in TSReset_GLEE()
756 PetscCall(PetscMalloc2(s, &glee->swork, r, &glee->rwork)); in TSSetUp_GLEE()
|