Mercurial > octave

view test/bug-61105/nested_test_2.m @ 31554:1d410367802c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Merge stable to default.
author Markus Mützel <markus.muetzel@gmx.de>
date Sat, 26 Nov 2022 18:51:28 +0100
parents 55eeb7f0850b
children
line wrap: on
line source

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