16using Teuchos::rcp_const_cast;
17using Teuchos::rcp_dynamic_cast;
18using Teuchos::ParameterList;
19using Teuchos::sublist;
30 stepper->setModel(model);
31 stepper->initialize();
32 TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
42 bool useFSAL = stepper->getUseFSAL();
43 std::string ICConsistency = stepper->getICConsistency();
44 bool ICConsistencyCheck = stepper->getICConsistencyCheck();
45 bool useEmbedded = stepper->getUseEmbedded();
46 bool zeroInitialGuess = stepper->getZeroInitialGuess();
50 Teuchos::SerialDenseMatrix<int,double> A(NumStages,NumStages);
51 Teuchos::SerialDenseVector<int,double> b(NumStages);
52 Teuchos::SerialDenseVector<int,double> c(NumStages);
53 Teuchos::SerialDenseVector<int,double> bstar(0);
56 A(0,0) = 0.2928932188134524; A(0,1) = 0.0;
57 A(1,0) = 0.7071067811865476; A(1,1) = 0.2928932188134524;
60 b(0) = 0.7071067811865476;
61 b(1) = 0.2928932188134524;
64 c(0) = 0.2928932188134524;
70 stepper->setAppAction(modifier); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
71 stepper->setAppAction(modifierX); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
72 stepper->setAppAction(observer); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
73 stepper->setSolver(solver); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
74 stepper->setUseFSAL(useFSAL); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
75 stepper->setICConsistency(ICConsistency); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
76 stepper->setICConsistencyCheck(ICConsistencyCheck); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
77 stepper->setUseEmbedded(useEmbedded); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
78 stepper->setZeroInitialGuess(zeroInitialGuess); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
80 stepper->setTableau(A, b, c, order, order, order); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
85 model, solver, useFSAL, ICConsistency, ICConsistencyCheck,
86 useEmbedded, zeroInitialGuess, modifier,
87 A, b, c, order, order, order,bstar));
88 TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
91 TEUCHOS_ASSERT(stepper->getOrder() == 2);
General Implicit Runge-Kutta Butcher Tableau.
Default modifier for StepperRK.
Default ModifierX for StepperRK.
Default observer for StepperRK.
Sine-Cosine model problem from Rythmos. This is a canonical Sine-Cosine differential equation.
void testRKAppAction(const Teuchos::RCP< Tempus::StepperRKBase< double > > &stepper, const Teuchos::RCP< const Thyra::ModelEvaluator< double > > &model, Teuchos::FancyOStream &out, bool &success)
Unit test utility for Stepper RK AppAction.
TEUCHOS_UNIT_TEST(BackwardEuler, Default_Construction)
void testFactoryConstruction(std::string stepperType, const Teuchos::RCP< const Thyra::ModelEvaluator< double > > &model)
Unit test utility for Stepper construction through StepperFactory.
Teuchos::RCP< Teuchos::ParameterList > defaultSolverParameters()
Returns the default solver ParameterList for implicit Steppers.