function [y] = fctn(x)
%FCTN A simple function to find the roots of
  y = x.^3 - 3*x.^2 + x./2 + 2*cos(x);
end

