function s = symop(varargin);
%SYMOP Obsolete Symbolic Toolbox function.
% SYMOP takes any number of arguments, including '+','-','*','/','^',
% '(' and ')', concatenates them and symbolically evaluates the result.
 
% Copyright (c) 1993-98 by The MathWorks, Inc.
% $Revision: 1.2 $ $Date: 1997/11/29 01:06:41 $
 
s = [];
for k = 1:nargin
   v = varargin{k};
   if ~ischar(v), v = char(sym(v)); end
   switch v
   case {'+','-','*','/','^','(',')'}
      s = [s v];
   otherwise
      s = [s 'sym(''' v ''')'];
   end
end
s = eval(s);