26 auto model = rcp(
new Tempus_Test::SinCosModel<double>());
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);