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-1999 The Mathworks, Inc. All Rights Reserved.
%   $Revision: 1.3 $  $Date: 1999/01/05 13:58:21 $

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);
