Home
last modified time | relevance | path

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

/petsc/src/ts/impls/symplectic/basicsymplectic/
H A Dbasicsymplectic.c205 TS_BasicSymplectic *bsymp = (TS_BasicSymplectic *)ts->data; in TSStep_BasicSymplectic() local
206 BasicSymplecticScheme scheme = bsymp->scheme; in TSStep_BasicSymplectic()
207 Vec solution = ts->vec_sol, update = bsymp->update, q, p, q_update, p_update; in TSStep_BasicSymplectic()
208 IS is_q = bsymp->is_q, is_p = bsymp->is_p; in TSStep_BasicSymplectic()
209 TS subts_q = bsymp->subts_q, subts_p = bsymp->subts_p; in TSStep_BasicSymplectic()
281 TS_BasicSymplectic *bsymp = (TS_BasicSymplectic *)ts->data; in TSSetUp_BasicSymplectic() local
285 PetscCall(TSRHSSplitGetIS(ts, "position", &bsymp->is_q)); in TSSetUp_BasicSymplectic()
286 PetscCall(TSRHSSplitGetIS(ts, "momentum", &bsymp->is_p)); in TSSetUp_BasicSymplectic()
287 …PetscCheck(bsymp->is_q && bsymp->is_p, PetscObjectComm((PetscObject)ts), PETSC_ERR_USER, "Must set… in TSSetUp_BasicSymplectic()
288 PetscCall(TSRHSSplitGetSubTS(ts, "position", &bsymp->subts_q)); in TSSetUp_BasicSymplectic()
[all …]