24 auto model = rcp(
new Tempus_Test::SinCosModel<double>());
28 stepper->setModel(model);
29 stepper->initialize();
30 TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
36 bool useFSAL = stepper->getUseFSAL();
37 std::string ICConsistency = stepper->getICConsistency();
38 bool ICConsistencyCheck = stepper->getICConsistencyCheck();
39 bool useEmbedded = stepper->getUseEmbedded();
42 Teuchos::SerialDenseMatrix<int,double> A(NumStages,NumStages);
43 Teuchos::SerialDenseVector<int,double> b(NumStages);
44 Teuchos::SerialDenseVector<int,double> c(NumStages);
45 Teuchos::SerialDenseVector<int,double> bstar(0);
48 A(0,0) = 0.0; A(0,1) = 0.0; A(0,2) = 0.0; A(0,3) = 0.0;
49 A(1,0) = 0.5; A(1,1) = 0.0; A(1,2) = 0.0; A(1,3) = 0.0;
50 A(2,0) = 0.0; A(2,1) = 0.5; A(2,2) = 0.0; A(2,3) = 0.0;
51 A(3,0) = 0.0; A(3,1) = 0.0; A(3,2) = 1.0; A(3,3) = 0.0;
54 b(0) = 1.0/6.0; b(1) = 1.0/3.0; b(2) = 1.0/3.0; b(3) = 1.0/6.0;
57 c(0) = 0.0; c(1) = 0.5; c(2) = 0.5; c(3) = 1.0;
63 stepper->setAppAction(modifier); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
64 stepper->setAppAction(modifierX); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
65 stepper->setAppAction(observer); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
66 stepper->setUseFSAL(useFSAL); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
67 stepper->setICConsistency(ICConsistency); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
68 stepper->setICConsistencyCheck(ICConsistencyCheck); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
69 stepper->setUseEmbedded(useEmbedded); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
71 stepper->setTableau(A, b, c, order, order, order); stepper->initialize(); TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
76 model, useFSAL, ICConsistency, ICConsistencyCheck, useEmbedded,
77 A, b, c, order, order, order, bstar, modifier));
78 TEUCHOS_TEST_FOR_EXCEPT(!stepper->isInitialized());
81 TEUCHOS_ASSERT(stepper->getOrder() == 4);