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 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80
|
// 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 print_graph.cpp}
Print a C++ AD Graph: Example and Test
######################################
Source Code
***********
{xrst_literal
// BEGIN C++
// END C++
}
{xrst_end print_graph.cpp}
*/
// BEGIN C++
# include <cppad/cppad.hpp>
bool print_graph(void)
{ bool ok = true;
using std::string;
//
// AD graph example
// node_1 : p[0]
// node_2 : p[1]
// node_3 : x[0]
// node_4 : p[0] + p[1]
// node_5 : x[0] + ( p[0] + p[1] )
// y[0] = x[0] + ( p[0] + p[1] )
//
// C++ graph object
CppAD::cpp_graph graph_obj;
//
// operator being used
CppAD::graph::graph_op_enum op_enum;
//
// set scalars
graph_obj.function_name_set("print_graph example");
size_t n_dynamic_ind = 2;
graph_obj.n_dynamic_ind_set(n_dynamic_ind);
size_t n_variable_ind = 1;
graph_obj.n_variable_ind_set(n_variable_ind);
//
// node_4 : p[0] + p[1]
op_enum = CppAD::graph::add_graph_op;
graph_obj.operator_vec_push_back(op_enum);
graph_obj.operator_arg_push_back(1);
graph_obj.operator_arg_push_back(2);
//
// node_5 : x[0] + ( p[0] + p[1] )
graph_obj.operator_vec_push_back(op_enum);
graph_obj.operator_arg_push_back(3);
graph_obj.operator_arg_push_back(4);
//
// y[0] = x[0] + ( p[0] + p[1] )
graph_obj.dependent_vec_push_back(5);
//
// get output of print command
std::stringstream os;
graph_obj.print(os);
//
std::string check =
"print_graph example\n"
" 1 p[0]\n"
" 2 p[1]\n"
" 3 x[0]\n"
" 4 add 1 2\n"
" 5 add 3 4\n"
"y nodes = 5\n"
;
std::string str = os.str();
ok &= str == check;
//
return ok;
}
// END C++
|