function r = digits(d)
%DIGITS Set Maple's Digits.
%   Digits determines the accuracy of Maple's numeric computations.
%   DIGITS, by itself, displays the current setting of Digits.
%   DIGITS(D) sets Digits to D for subsequent calculations. D is an 
%      integer, or a string or sym representing an integer.
%   D = DIGITS returns the current setting of Digits. D is an integer.
%
%   See also VPA.

%   Copyright (c) 1993-1999 The Mathworks, Inc. All Rights Reserved.
%   $Revision: 1.11 $  $Date: 1999/01/05 13:58:07 $

if nargin == 1
   if ~isstr(d), d = int2str(d); end;
   maple(['Digits := ', d]);
elseif nargout == 1
   r = eval(maple('Digits;'));
else
   disp(' ');
   disp(['Digits = ' maple('Digits')])
   disp(' ');
end
