Home
last modified time | relevance | path

Searched refs:alg_is (Results 1 – 2 of 2) sorted by relevance

/petsc/src/ts/impls/arkimex/
H A Darkimex.c1382 if (!ark->alg_is) { in TSStep_ARKIMEX()
1383 PetscCall(TSARKIMEXComputeAlgebraicIS(ts, ts->ptime, Z, &ark->alg_is)); in TSStep_ARKIMEX()
1384 PetscCall(ISViewFromOptions(ark->alg_is, (PetscObject)ts, "-ts_arkimex_algebraic_is_view")); in TSStep_ARKIMEX()
1389 if (ark->alg_is) PetscCall(VecISSet(Ydot0, ark->alg_is, 0.0)); in TSStep_ARKIMEX()
1772 PetscCall(ISDestroy(&ark->alg_is)); in TSReset_ARKIMEX()
1823 static PetscErrorCode TSARKIMEXComputeAlgebraicIS(TS ts, PetscReal time, Vec X, IS *alg_is) in TSARKIMEXComputeAlgebraicIS() argument
1852 PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)dm), nz, nzr, PETSC_OWN_POINTER, alg_is)); in TSARKIMEXComputeAlgebraicIS()
1861 static PetscErrorCode TSARKIMEXGetAlgebraicIS(TS ts, DM dm, IS *alg_is) in TSARKIMEXGetAlgebraicIS() argument
1866 …!= ts->dm) PetscCall(PetscObjectQuery((PetscObject)dm, "TSARKIMEX_ALG_IS", (PetscObject *)alg_is)); in TSARKIMEXGetAlgebraicIS()
1867 else *alg_is = ax->alg_is; in TSARKIMEXGetAlgebraicIS()
[all …]
H A Darkimex.h34 …IS alg_is; /* Index set for algebraic variables, needed when restarting with DIRK … member