Searched refs:toten (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/ksp/guess/impls/pod/ |
| H A D | pod.c | 219 PetscReal toten, parten, reps = 0; /* dlamch? */ in KSPGuessUpdate_POD() local
322 for (i = 0, toten = 0; i < pod->n; i++) { in KSPGuessUpdate_POD()
324 toten += pod->eigs[i]; in KSPGuessUpdate_POD()
328 for (i = pod->n - 1, parten = 0; i > pod->st && toten > 0; i--) { in KSPGuessUpdate_POD()
331 if (parten + toten * pod->tol >= toten) break; in KSPGuessUpdate_POD()
372 …tscObjectComm((PetscObject)guess), "%1.6e (%d) ", (double)(pod->eigs[i] / toten), i >= pod->st ? 1… in KSPGuessUpdate_POD()
389 …g (expected lower than %g)\n", i, (double)PetscRealPart(pod->swork[1]), (double)(toten - parten))); in KSPGuessUpdate_POD()
|