124int main(
int argc,
char* argv[]) {
126 Teuchos::GlobalMPISession mpiSession(&argc, &argv);
129 int iprint = argc - 1;
130 ROL::Ptr<std::ostream> outStream;
133 outStream = ROL::makePtrFromRef(std::cout);
135 outStream = ROL::makePtrFromRef(bhs);
145 ROL::Ptr<std::vector<RealT> > x_ptr = ROL::makePtr<std::vector<RealT>>(
dim,0.0);
146 ROL::Ptr<ROL::Vector<RealT> > x = ROL::makePtr<ROL::StdVector<RealT>>(x_ptr);
148 ROL::Ptr<std::vector<RealT> > d_ptr = ROL::makePtr<std::vector<RealT>>(
dim,0.0);
149 ROL::Ptr<ROL::Vector<RealT> > d = ROL::makePtr<ROL::StdVector<RealT>>(d_ptr);
152 std::vector<ROL::Ptr<ROL::Objective<RealT> > > vec_obj(2,ROL::nullPtr);
153 vec_obj[0] = ROL::makePtr<ObjectiveFunctionTest07_1<RealT>>();
154 vec_obj[1] = ROL::makePtr<ObjectiveFunctionTest07_2<RealT>>();
155 ROL::Ptr<ROL::StdObjective<RealT> > obj_scalarize
156 = ROL::makePtr<ObjectiveFunctionTest07_scalarize<RealT>>();
157 ROL::Ptr<ROL::Objective<RealT> > obj
158 = ROL::makePtr<ROL::CompositeObjective<RealT>>(vec_obj,obj_scalarize);
160 *outStream <<
"Check Derivatives of CompositeObjective\n";
161 obj->checkGradient(*x,*d,
true,*outStream);
162 obj->checkHessVec(*x,*d,
true,*outStream);
164 catch (std::logic_error& err) {
165 *outStream << err.what() <<
"\n";
170 std::cout <<
"End Result: TEST FAILED\n";
172 std::cout <<
"End Result: TEST PASSED\n";