Codebase list cppad / upstream/2015.00.00.7 doc / exp_2_rev1.cpp.xml
upstream/2015.00.00.7

Tree @upstream/2015.00.00.7 (Download .tar.gz)

exp_2_rev1.cpp.xml @upstream/2015.00.00.7raw · history · blame

<?xml version='1.0'?>
<html xmlns='http://www.w3.org/1999/xhtml'
      xmlns:math='http://www.w3.org/1998/Math/MathML'
>
<head>
<title>exp_2: Verify First Order Reverse Sweep</title>
<meta http-equiv='Content-Type' content='text/html' charset='utf-8'/>
<meta name="description" id="description" content="exp_2: Verify First Order Reverse Sweep"/>
<meta name="keywords" id="keywords" content=" exp_2: verify first order reverse sweep exp_2 mode "/>
<style type='text/css'>
body { color : black }
body { background-color : white }
A:link { color : blue }
A:visited { color : purple }
A:active { color : purple }
</style>
<script type='text/javascript' language='JavaScript' src='_exp_2_rev1.cpp_xml.js'>
</script>
</head>
<body>
<table><tr>
<td>
<a href="http://www.coin-or.org/CppAD/" target="_top"><img border="0" src="_image.gif"/></a>
</td>
<td><a href="exp_2_rev1.xml" target="_top">Prev</a>
</td><td><a href="exp_2_for2.xml" target="_top">Next</a>
</td><td>
<select onchange='choose_across0(this)'>
<option>Index-&gt;</option>
<option>contents</option>
<option>reference</option>
<option>index</option>
<option>search</option>
<option>external</option>
</select>
</td>
<td>
<select onchange='choose_up0(this)'>
<option>Up-&gt;</option>
<option>CppAD</option>
<option>Introduction</option>
<option>exp_2</option>
<option>exp_2_rev1</option>
<option>exp_2_rev1.cpp</option>
</select>
</td>
<td>
<select onchange='choose_down3(this)'>
<option>Introduction-&gt;</option>
<option>get_started.cpp</option>
<option>exp_2</option>
<option>exp_eps</option>
<option>exp_apx_main.cpp</option>
</select>
</td>
<td>
<select onchange='choose_down2(this)'>
<option>exp_2-&gt;</option>
<option>exp_2.hpp</option>
<option>exp_2.cpp</option>
<option>exp_2_for0</option>
<option>exp_2_for1</option>
<option>exp_2_rev1</option>
<option>exp_2_for2</option>
<option>exp_2_rev2</option>
<option>exp_2_cppad</option>
</select>
</td>
<td>
<select onchange='choose_down1(this)'>
<option>exp_2_rev1-&gt;</option>
<option>exp_2_rev1.cpp</option>
</select>
</td>
<td>exp_2_rev1.cpp</td>
<td>Headings</td>
</tr></table><br/>



<center><b><big><big>exp_2: Verify First Order Reverse Sweep</big></big></b></center>
<code><font color='blue'><pre style='display:inline'> # include &lt;cstddef&gt;                 // define size_t
# include &lt;cmath&gt;                   // prototype for fabs
extern bool exp_2_for0(double *v0); // computes zero order forward sweep
bool exp_2_rev1(void)
{	bool ok = true;

	// set the value of v0[j] for j = 1 , ... , 5
	double v0[6];
	ok &amp;= exp_2_for0(v0);

	// initial all partial derivatives as zero
	double f_v[6];
	size_t j;
	for(j = 0; j &lt; 6; j++)
		f_v[j] = 0.;

	// set partial derivative for f5
	f_v[5] = 1.;
	ok &amp;= std::fabs( f_v[5] - 1. ) &lt;= 1e-10; // f5_v5

	// f4 = f5( v1 , v2 , v3 , v4 , v2 + v4 )
	f_v[2] += f_v[5] * 1.;
	f_v[4] += f_v[5] * 1.;
	ok &amp;= std::fabs( f_v[2] - 1. ) &lt;= 1e-10; // f4_v2
	ok &amp;= std::fabs( f_v[4] - 1. ) &lt;= 1e-10; // f4_v4

	// f3 = f4( v1 , v2 , v3 , v3 / 2 )
	f_v[3] += f_v[4] / 2.;
	ok &amp;= std::fabs( f_v[3] - 0.5) &lt;= 1e-10; // f3_v3

	// f2 = f3( v1 , v2 , v1 * v1 )
	f_v[1] += f_v[3] * 2. * v0[1];
	ok &amp;= std::fabs( f_v[1] - 0.5) &lt;= 1e-10; // f2_v1

	// f1 = f2( v1 , 1 + v1 )
	f_v[1] += f_v[2] * 1.;
	ok &amp;= std::fabs( f_v[1] - 1.5) &lt;= 1e-10; // f1_v1

	return ok;
}
</pre></font></code>


<hr/>Input File: introduction/exp_apx/exp_2_rev1.cpp

</body>
</html>