function res=polyder_symb(P)

%	polyder_symb : intégration formelle de polynôme
%
%
% *********************************************************
%  ATTENTION, polyder ne marche pas sur un tableau 
%             à coefficients formels !!
%
% *********************************************************
%
%	res=polyval_sym(P,x) : renvoie la dérivée de P en x (en formel) :
%     si n+1 est la longueur de P : 
%     res=[n*P(1) (n-1)*P(2) ... 2*P(n-1) P(n)]
%
%	variables d'entrées : 
%    *  P : polynômes à coefficients formels
%	variables de sortie : 
%    * res : tableau correspondant à la dérivée de P
%
%
%
% ************ Fonctions auxiliaires utilisées ************
%
%       aucune
%
% *********************************************************
%



% Contrôles d'entrée
% nombre d'arguments
if nargin~=1
   error('nombre d''arguments de la fonction incorrect');
end


% Corps d'algorithme.
if (isempty(P)) | (P==0) 
   res=0;
else
   n=length(P)-1;
   res=[P(1:n).*sym(n:-1:1)];
end