1# script_nest.m
2function r = script_nest_2 (x)
3  function r = nest_fun ()
4    r = 13;
5  endfunction
6  script_nest_script_2;
7endfunction
8