1function r = nested_test_2 ()
2  a = 3;
3  b = 5;
4  c = 7;
5  f1 = @(f, x) f(x) + a;
6  f2 = @(y) f1 (@(z) z^2 + b*y, y) + c;
7  r = f2 (2);
8endfunction
9