9#ifndef Tempus_StepperNewmarkImplicitAFormModifierXBase_hpp
10#define Tempus_StepperNewmarkImplicitAFormModifierXBase_hpp
12#include "Tempus_config.hpp"
13#include "Tempus_SolutionHistory.hpp"
56 Teuchos::RCP<SolutionHistory<Scalar> > sh,
57 Teuchos::RCP<StepperNewmarkImplicitAForm<Scalar> > stepper,
63 RCP<SolutionState<Scalar> > workingState = sh->getWorkingState();
64 const Scalar time = workingState->getTime();
65 const Scalar dt = workingState->getTimeStep();
66 RCP<Thyra::VectorBase<Scalar> > x;
72 x = workingState->getX();
78 x = workingState->getX();
84 x = workingState->getX();
90 x = workingState->getX();
94 TEUCHOS_TEST_FOR_EXCEPTION(
true, std::logic_error,
95 "Error - unknown action location.\n");
98 this->
modify(x, time, dt, modType);
114 const Scalar ,
const Scalar ,