view test/bug-35448/fA.m @ 20589:421e3ebfca8d

maint: Periodic merge of stable to default.
author Rik <rik@octave.org>
date Thu, 23 Jul 2015 09:50:10 -0700
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