function affiche_racines(ens_rac,exp_pol3,f_seuil)
% affiche les racines sous différentes formes possibles
%
% variables d'entrée
% ens_rac est le vecteur des racines de l'équation traitée;
% exp_pol3 est la chaine associée à pol3;
% f_seuil désigne le module de pol3(x) pour lequel il est assimilé à zéro.
%
% variables de sortie
% on peut extraire les objets fabriqués.

% tests à écrire; pas de fonctions sous-jacente...

% au fait
% sortie des résultats sous forme symbolique
disp('Sortie des résultats sous forme symbolique proposée par matlab');
symb=sym(ens_rac,'r');disp('ens_rac = ');disp (symb);


% tentative d'arrondi des racines au sens de f_seuil
% pourrait s'écrire matriciellement ou etre une routine annexe déclenchée
% par le passage d'un champ complémentaire.

for k=1:size(ens_rac,2)
    x=round(ens_rac(k));val=eval(exp_pol3);
    if abs(val)<f_seuil
        ens_rac(k)=round(ens_rac(k));
    end 
end
disp('Sortie des résultats arrondis au sens de f_seuil');
disp(num2str(ens_rac));
disp('Sortie des résultats bruts');
ens_rac
