11 static PetscErrorCode TSTrajectorySet_Basic(TSTrajectory tj, TS ts, PetscInt stepnum, PetscReal tim…  in TSTrajectorySet_Basic()  argument
13   TSTrajectory_Basic *tjbasic = (TSTrajectory_Basic *)tj->data;  in TSTrajectorySet_Basic()
18   PetscCall(PetscSNPrintf(filename, sizeof(filename), tj->dirfiletemplate, stepnum));  in TSTrajectorySet_Basic()
23   if (stepnum && !tj->solution_only) {  in TSTrajectorySet_Basic()
49 static PetscErrorCode TSTrajectorySetFromOptions_Basic(TSTrajectory tj, PetscOptionItems PetscOptio…  in TSTrajectorySetFromOptions_Basic()  argument
57 static PetscErrorCode TSTrajectoryGet_Basic(TSTrajectory tj, TS ts, PetscInt stepnum, PetscReal *t)  in TSTrajectoryGet_Basic()  argument
65   PetscCall(PetscSNPrintf(filename, sizeof(filename), tj->dirfiletemplate, stepnum));  in TSTrajectoryGet_Basic()
66 …PetscCall(PetscViewerBinaryOpen(PetscObjectComm((PetscObject)tj), filename, FILE_MODE_READ, &viewe…  in TSTrajectoryGet_Basic()
71   if (stepnum && !tj->solution_only) {  in TSTrajectoryGet_Basic()
81     if (tj->adjoint_solve_mode) PetscCall(TSSetTimeStep(ts, -(*t) + timepre));  in TSTrajectoryGet_Basic()
100 PetscErrorCode TSTrajectorySetUp_Basic(TSTrajectory tj, TS ts)  in TSTrajectorySetUp_Basic()  argument
106   PetscCall(PetscObjectGetComm((PetscObject)tj, &comm));  in TSTrajectorySetUp_Basic()
109     char     *dir = tj->dirname;  in TSTrajectorySetUp_Basic()
115       PetscCall(PetscStrallocpy(dtempname, &tj->dirname));  in TSTrajectorySetUp_Basic()
118       PetscCheck(!flg, comm, PETSC_ERR_SUP, "Directory %s not empty", tj->dirname);  in TSTrajectorySetUp_Basic()
124   PetscCall(PetscBarrier((PetscObject)tj));  in TSTrajectorySetUp_Basic()
128 static PetscErrorCode TSTrajectoryDestroy_Basic(TSTrajectory tj)  in TSTrajectoryDestroy_Basic()  argument
130   TSTrajectory_Basic *tjbasic = (TSTrajectory_Basic *)tj->data;  in TSTrajectoryDestroy_Basic()
152 PETSC_EXTERN PetscErrorCode TSTrajectoryCreate_Basic(TSTrajectory tj, TS ts)  in TSTrajectoryCreate_Basic()  argument
159   PetscCall(PetscViewerCreate(PetscObjectComm((PetscObject)tj), &tjbasic->viewer));  in TSTrajectoryCreate_Basic()
163   tj->data = tjbasic;  in TSTrajectoryCreate_Basic()
165   tj->ops->set            = TSTrajectorySet_Basic;  in TSTrajectoryCreate_Basic()
166   tj->ops->get            = TSTrajectoryGet_Basic;  in TSTrajectoryCreate_Basic()
167   tj->ops->setup          = TSTrajectorySetUp_Basic;  in TSTrajectoryCreate_Basic()
168   tj->ops->destroy        = TSTrajectoryDestroy_Basic;  in TSTrajectoryCreate_Basic()
169   tj->ops->setfromoptions = TSTrajectorySetFromOptions_Basic;  in TSTrajectoryCreate_Basic()