Searched refs:bsymp (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/impls/symplectic/basicsymplectic/ |
| H A D | basicsymplectic.c | 205 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 …]
|