1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
// SPDX-License-Identifier: EPL-2.0 OR GPL-2.0-or-later
// SPDX-FileCopyrightText: Bradley M. Bell <bradbell@seanet.com>
// SPDX-FileContributor: 2003-22 Bradley M. Bell
// ----------------------------------------------------------------------------
/*
{xrst_begin ad_output.cpp}
AD Output Operator: Example and Test
####################################
{xrst_literal
// BEGIN C++
// END C++
}
{xrst_end ad_output.cpp}
*/
// BEGIN C++
# include <cppad/cppad.hpp>
# include <sstream> // std::ostringstream
# include <string> // std::string
# include <iomanip> // std::setprecision, setw, setfill, right
namespace {
template <class S>
void set_ostream(S &os)
{ os
<< std::setprecision(4) // 4 digits of precision
<< std::setw(6) // 6 characters per field
<< std::setfill(' ') // fill with spaces
<< std::right; // adjust value to the right
}
}
bool ad_output(void)
{ bool ok = true;
// This output stream is an ostringstream for testing purposes.
// You can use << with other types of streams; i.e., std::cout.
std::ostringstream stream;
// ouput an AD<double> object
CppAD::AD<double> pi = 4. * atan(1.); // 3.1415926536
set_ostream(stream);
stream << pi;
// ouput a VecAD<double>::reference object
CppAD::VecAD<double> v(1);
CppAD::AD<double> zero(0);
v[zero] = exp(1.); // 2.7182818285
set_ostream(stream);
stream << v[zero];
// convert output from stream to string
std::string str = stream.str();
// check the output
ok &= (str == " 3.142 2.718");
return ok;
}
// END C++
|
