Mercurial > octave-nkf

view test/bug-35448/fA.m @ 20637:756b052037fb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
avoid stepping beyond end of thspan in ode solvers * scripts/ode/private/integrate_adaptive.m: make sure not to step beyound end of tspan.
author Carlo de Falco <carlo.defalco@polimi.it>
date Sun, 11 Oct 2015 20:39:11 +0200
parents 8d1ae996c122
children
line wrap: on
line source

# fA.m
function y = fA (x, f)
  global gfun
  if nargin < 2
    y = fA (x, gfun);
  else
    w = feval (f, x);
    y = feval (@fB, w);
  endif
endfunction