function [y] = my_function(f,x)
% RBK 01/30/2005 -- Tests of passing a function as an argument
   y = feval(f,x);
   