function  retval = myfcn(x)
% usage: y = myfcn(x)
% description: Returns ordinate vector of values of myfcn at abscissa
% vector x, where myfcn is selected from below

% programmer: t. shores
% last rev.: 2/8/16

%retval = sin(x); % simple test
retval = sin(2*x) - 0.2*cos(5*x); % bit more complicated
%retval = (abs(x)>10*eps).*sign(pi - x); % square wave with average at discontinuity
%retval = x.*sin(x); % discontinuous at right end
%retval = x.*(2*pi-x).*sin(x); % derivative discontinuous at both ends
%retval = sin(x)-2*cos(3*x)+1 + sin(2*x).^2;  % analytic and periodic
