function rsums(f)
%RSUMS  Interactive evaluation of Riemann sums.
%   RSUMS(F) approximates the integral of F by Riemann sums.
%       F is a scalar sym representing a function of exactly one variable.

%   Copyright (c) 1993-98 by The MathWorks, Inc.
%   $Revision: 1.6 $  $Date: 1997/11/29 01:06:03 $

if all(size(f) == 1)
   rsums(f.s);
else
   error('Sym input must be a scalar.')
end
