33 const std::string european_option_binomial_model_program =
35 " var z := exp(r * dt); "
36 " var z_inv := 1 / z; "
37 " var u := exp(v * sqrt(dt)); "
38 " var u_inv := 1 / u; "
39 " var p_up := (z - u_inv) / (u - u_inv); "
40 " var p_down := 1 - p_up; "
42 " var option_price[n + 1] := [0]; "
44 " for (var i := 0; i <= n; i += 1) "
46 " var base_price := s * u^(n - 2i); "
47 " option_price[i] := "
50 " case callput_flag == 'call' : max(base_price - k, 0); "
51 " case callput_flag == 'put' : max(k - base_price, 0); "
55 " for (var j := n - 1; j >= 0; j -= 1) "
57 " for (var i := 0; i <= j; i += 1) "
59 " option_price[i] := z_inv * "
60 " (p_up * option_price[i] + p_down * option_price[i + 1]); "
73 std::string callput_flag;
75 symbol_table_t symbol_table;
76 symbol_table.add_variable(
"s",s);
77 symbol_table.add_variable(
"k",k);
78 symbol_table.add_variable(
"t",t);
79 symbol_table.add_variable(
"r",r);
80 symbol_table.add_variable(
"v",v);
81 symbol_table.add_constant(
"n",n);
82 symbol_table.add_stringvar(
"callput_flag",callput_flag);
84 expression_t expression;
85 expression.register_symbol_table(symbol_table);
88 parser.compile(european_option_binomial_model_program,expression);
90 callput_flag =
"call";
92 const T binomial_call_option_price = expression.value();
96 const T binomial_put_option_price = expression.value();
98 printf(
"BinomialPrice(call, %5.3f, %5.3f, %5.3f, %5.3f, %5.3f) = %10.6f\n",
100 binomial_call_option_price);
102 printf(
"BinomialPrice(put , %5.3f, %5.3f, %5.3f, %5.3f, %5.3f) = %10.6f\n",
104 binomial_put_option_price);
106 const T put_call_parity_diff =
107 (binomial_call_option_price - binomial_put_option_price) -
108 (s - k * std::exp(-r * t));
110 printf(
"Put-Call parity difference: %20.17f\n", put_call_parity_diff);