72int main(
int argc,
char *argv[]) {
79 Teuchos::GlobalMPISession mpiSession(&argc, &argv);
82 int iprint = argc - 1;
83 ROL::Ptr<std::ostream> outStream;
86 outStream = ROL::makePtrFromRef(std::cout);
88 outStream = ROL::makePtrFromRef(bhs);
96 RealT tol = std::sqrt(ROL::ROL_EPSILON<RealT>());
98 ROL::Ptr<V> v = ROL::makePtr<SV>( ROL::makePtr<std::vector<RealT>>(
dim) );
99 ROL::Ptr<V> Hv = v->clone();
100 ROL::Ptr<V> HHv = v->clone();
102 ROL::Ptr<V> e0 = v->basis(0);
113 H.
apply(*Hv, *v, tol);
117 H.
apply(*HHv, *Hv, tol);
123 catch (std::logic_error& err) {
124 *outStream << err.what() <<
"\n";
129 std::cout <<
"End Result: TEST FAILED\n";
131 std::cout <<
"End Result: TEST PASSED\n";