52 #include "Teuchos_oblackholestream.hpp" 53 #include "Teuchos_GlobalMPISession.hpp" 54 #include "Teuchos_XMLParameterListHelpers.hpp" 61 int main(
int argc,
char *argv[]) {
64 Teuchos::GlobalMPISession mpiSession(&argc, &argv);
67 int iprint = argc - 1;
68 Teuchos::RCP<std::ostream> outStream;
69 Teuchos::oblackholestream bhs;
71 outStream = Teuchos::rcp(&std::cout,
false);
73 outStream = Teuchos::rcp(&bhs,
false);
81 std::string filename =
"input.xml";
82 Teuchos::RCP<Teuchos::ParameterList> parlist = Teuchos::rcp(
new Teuchos::ParameterList() );
83 Teuchos::updateParametersFromXmlFile( filename, parlist.ptr() );
84 parlist->sublist(
"General").set(
"Inexact Hessian-Times-A-Vector",
true);
86 parlist->sublist(
"General").set(
"Inexact Hessian-Times-A-Vector",
false);
91 parlist->sublist(
"Step").sublist(
"Line Search").set(
"Initial Step Size",1.e-4);
92 parlist->sublist(
"Step").sublist(
"Trust Region").set(
"Initial Radius",-1.e1);
93 parlist->sublist(
"Step").sublist(
"Trust Region").set(
"Safeguard Size",1.e-4);
94 parlist->sublist(
"Status Test").set(
"Gradient Tolerance",1.e-6);
97 parlist->sublist(
"Step").sublist(
"Line Search").set(
"Initial Step Size",1.0);
98 parlist->sublist(
"Step").sublist(
"Trust Region").set(
"Initial Radius",1.e3);
99 parlist->sublist(
"Step").sublist(
"Trust Region").set(
"Safeguard Size",1.e4);
100 parlist->sublist(
"Status Test").set(
"Gradient Tolerance",1.e-8);
103 parlist->sublist(
"Step").sublist(
"Line Search").set(
"Initial Step Size",1.0);
104 parlist->sublist(
"Step").sublist(
"Trust Region").set(
"Initial Radius",-1.e1);
105 parlist->sublist(
"Step").sublist(
"Trust Region").set(
"Safeguard Size",1.e4);
106 parlist->sublist(
"Status Test").set(
"Gradient Tolerance",1.e-6);
108 parlist->sublist(
"General").set(
"Scale for Epsilon Active Sets",1.0);
110 parlist->sublist(
"General").set(
"Scale for Epsilon Active Sets",1.e-2);
115 Teuchos::RCP<ROL::Vector<RealT> > x0, z;
116 Teuchos::RCP<ROL::Objective<RealT> > obj;
117 Teuchos::RCP<ROL::BoundConstraint<RealT> > con;
118 ROL::getTestObjectives<RealT>(obj,con,x0,z,prob);
119 Teuchos::RCP<ROL::Vector<RealT> > x = x0->clone();;
122 int dim = x0->dimension();
123 parlist->sublist(
"General").sublist(
"Krylov").set(
"Iteration Limit", 2*dim);
126 Teuchos::RCP<ROL::Vector<RealT> > e = x0->clone();;
141 algo.
run(*x, *obj, *con,
true, *outStream);
146 *outStream << std::endl <<
"Norm of Error: " << e->norm() << std::endl;
149 catch (std::logic_error err) {
150 *outStream << err.what() << std::endl;
155 std::cout <<
"End Result: TEST FAILED" << std::endl;
157 std::cout <<
"End Result: TEST PASSED" << std::endl;
ETestOptProblem
Enumeration of test optimization problems.
int main(int argc, char *argv[])
Contains definitions of test objective functions.
std::string ETestOptProblemToString(ETestOptProblem to)
Provides an interface to run optimization algorithms.
virtual std::vector< std::string > run(Vector< Real > &x, Objective< Real > &obj, bool print=false, std::ostream &outStream=std::cout)
Run algorithm on unconstrained problems (Type-U). This is the primary Type-U interface.
ETrustRegion
Enumeration of trust-region solver types.
std::string ETrustRegionToString(ETrustRegion tr)