Programme Von Koch de manière itérative
Bonjour à tous,
Je suis sur Mac, avec Maple 14.
J'ai écrit un programme en TD de maths info mais Maple me retourne une erreur que je n'arrive pas à expliquer (mon prof non plus) :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
| VonKoch:=proc(a,b,n);
varloc(K,M,P);
l:=nops(L);
for o from 1 to n do;
for i from 1 to l do;
L:=Triangle(a,b);
K[i]:=Triangle(L[i],L[i+1]);
M[n]:=[op(K[i]),op(K[i+1])];
P:=[op(M[o]),op(M[o+1])];
return P;
end for;
end proc; |
Citation:
Error, reserved word `for` unexpected
Le programme triangle auquel je fais appel est le suivant :
Code:
1
2
3
4
5
6
7
8
| Triangle:=proc(a,b);
varloc(c,e,d,L);
c:=(1/3)*(b-a)+a;
d:=(2/3)*(b-a)+a;
e:=exp((Pi*I)/3)*(d-c)+c;
L:=[a,c,e,d,b];
return L;
end proc; |
PS : le programme "Triangle" ne retourne aucune erreur.
Merci D'avance
XeloaX
