57 Teuchos::RCP<SolutionHistory<Scalar> > sh,
58 Teuchos::RCP<StepperSubcycling<Scalar> > stepper,
64 RCP<SolutionState<Scalar> > workingState = sh->getWorkingState();
65 const Scalar time = workingState->getTime();
66 const Scalar dt = workingState->getTimeStep();
67 RCP<Thyra::VectorBase<Scalar> > x;
73 x = workingState->getX();
79 if (workingState->getXDot() != Teuchos::null)
80 x = workingState->getXDot();
82 x = stepper->getStepperXDot();
86 TEUCHOS_TEST_FOR_EXCEPTION(
true, std::logic_error,
87 "Error - unknown action location.\n");
90 this->
modify(x, time, dt, modType);