33 typedef typename compositor_t::function function_t;
37 symbol_table_t symbol_table;
39 symbol_table.add_function(
"println", println);
40 symbol_table.add_constants();
42 compositor_t compositor(symbol_table);
45 function_t(
"archimedes_pi")
50 " var approx_pi := 0.0; "
52 " for (var i := 0; i < iterations; i += 1) "
55 " var s2 := (s / 2)^2; "
56 " var t := sqrt(1 - s2); "
60 " approx_pi := p / 2; "
61 " s := sqrt(q^2 + s2); "
67 const std::string archimedes_pi_program =
68 " const var n := 30; "
70 " for (var i := 1; i <= n; i += 1) "
72 " var approx_pi := archimedes_pi(i); "
73 " var abs_error := abs(approx_pi - pi); "
75 " println('approx pi: ', approx_pi, ' abs error:', abs_error); "
78 expression_t expression;
79 expression.register_symbol_table(symbol_table);
82 parser.compile(archimedes_pi_program,expression);