Apprendre Maple

[lol]

En parlant des divisions euclidienne des polynômes , j'ai fait une procédure , mais quelqu'un pourrait-il me dire où est le problème car quand je le programme maple met beaucoup de temps pour m'afficher la réponse .Merci

[prof_simplet]

Salut lol, si tu nous montrais le code de ta procédure, ce serait mieux, non?

[lol]

voilà ma procédure :
division:=proc(f,g);

a:=f;

b:=g;

c:=-1;

d:=-1;

while a<>0 do

a:=diff(a,x);

c:=c+1;

end do ;

while b<>0 do

b:=diff(b,x);

d:=d+1;

end do;

n:=c;

p:=d;

q:=0;

r:=f;

e:=lcoeff(g);

while r<>0 and n>=d do

M:=lcoeff(r)*e^(-1)*x^(r-d);

q:=q+M;

r:=r-g*M;

print(f=b*q+r);

end do;

end proc;

[ALS]

J'ai répondu ici: http://alamanya.free.fr/forum/viewtopic.php?p=2769