Home
last modified time | relevance | path

Searched refs:GRS (Results 1 – 8 of 8) sorted by relevance

/petsc/src/ksp/ksp/impls/gmres/lgmres/
H A Dlgmres.c128 *GRS(0) = res_norm; in KSPLGMRESCycle()
195 …hapbnd = PetscAbsScalar(tt / *GRS(loc_it)); /* GRS(loc_it) contains the res_norm from the last ite… in KSPLGMRESCycle()
244 PetscCall(KSPLGMRESBuildSoln(GRS(0), ksp->vec_sol, ksp->vec_sol, ksp, loc_it - 1)); in KSPLGMRESCycle()
285 for (jj = 0; jj <= ii + 1 && jj < it_total + 1; jj++) avec[jj] += *HES(jj, ii) * *GRS(ii); in KSPLGMRESCycle()
392 …) is identically zero; it = %" PetscInt_FMT " GRS(it) = %g", it, (double)PetscAbsScalar(*GRS(it))); in KSPLGMRESBuildSoln()
394 nrs[it] = *GRS(it) / *HH(it, it); in KSPLGMRESBuildSoln()
401 tt = *GRS(k); in KSPLGMRESBuildSoln()
484 *GRS(it + 1) = -(*ss * *GRS(it)); in KSPLGMRESUpdateHessenberg()
485 *GRS(it) = PetscConj(*cc) * *GRS(it); in KSPLGMRESUpdateHessenberg()
489 *res = PetscAbsScalar(*GRS(it + 1)); in KSPLGMRESUpdateHessenberg()
H A Dlgmresimpl.h43 #define GRS(a) (lgmres->rs_origin + (a)) /* GRS will be length (max_k+2) - rt side */ macro
/petsc/src/ksp/ksp/impls/gmres/
H A Dgmres.c108 *GRS(0) = gmres->rnorm0 = res; in KSPGMRESCycle()
148 hapbnd = PetscAbsScalar(tt / *GRS(it)); in KSPGMRESCycle()
184 PetscCall(KSPGMRESBuildSoln(GRS(0), ksp->vec_sol, ksp->vec_sol, ksp, it - 1)); in KSPGMRESCycle()
314 nrs[it] = *GRS(it) / *HH(it, it); in KSPGMRESBuildSoln()
319 …s identically zero; it = %" PetscInt_FMT " GRS(it) = %g\n", it, (double)PetscAbsScalar(*GRS(it)))); in KSPGMRESBuildSoln()
324 tt = *GRS(k); in KSPGMRESBuildSoln()
382 *GRS(it + 1) = -(*ss * *GRS(it)); in KSPGMRESUpdateHessenberg()
383 *GRS(it) = PetscConj(*cc) * *GRS(it); in KSPGMRESUpdateHessenberg()
385 *res = PetscAbsScalar(*GRS(it + 1)); in KSPGMRESUpdateHessenberg()
H A Dgmresimpl.h82 #define GRS(a) (gmres->rs_origin + (a)) macro
/petsc/src/ksp/ksp/impls/gmres/dgmres/
H A Ddgmres.c118 *GRS(0) = res_norm; in KSPDGMRESCycle()
169 hapbnd = PetscAbsScalar(tt / *GRS(it)); in KSPDGMRESCycle()
204 PetscCall(KSPDGMRESBuildSoln(GRS(0), ksp->vec_sol, ksp->vec_sol, ksp, it - 1)); in KSPDGMRESCycle()
333 …) is identically zero; it = %" PetscInt_FMT " GRS(it) = %g", it, (double)PetscAbsScalar(*GRS(it))); in KSPDGMRESBuildSoln()
334 if (*HH(it, it) != 0.0) nrs[it] = *GRS(it) / *HH(it, it); in KSPDGMRESBuildSoln()
339 tt = *GRS(k); in KSPDGMRESBuildSoln()
398 *GRS(it + 1) = -(*ss * *GRS(it)); in KSPDGMRESUpdateHessenberg()
399 *GRS(it) = PetscConj(*cc) * *GRS(it); in KSPDGMRESUpdateHessenberg()
401 *res = PetscAbsScalar(*GRS(it + 1)); in KSPDGMRESUpdateHessenberg()
H A Ddgmresimpl.h57 #define GRS(a) (dgmres->rs_origin + (a)) macro
/petsc/doc/community/meetings/2025/
H A Dindex.md236 Gesellschaft für Anlagen- und Reaktorsicherheit (GRS) gGmbH
238 …xt of the code family AC<sup>2</sup> which is developed and distributed by GRS. AC<sup>2</sup> con…
/petsc/doc/community/meetings/2023/
H A Dindex.md637 Gesellschaft für Anlagen- und Reaktorsicherheit (GRS), Germany
643 family AC2 which is developed and distributed by GRS. AC2 is used to