next up previous contents index
suivant: Un arbre moins déplumé monter: Les arbres précédent: Les arbres   Table des matières   Index

Un arbre

arbre(x,y):={
 DispG();
 if (abs(x-y)<0.2) {segment(x,y); return 0;}
 segment(x,(x+y)/2);
 arbre((x+y)/2,(x+y)/2+(y-x)*0.5*exp(i*0.5));
 arbre((x+y)/2,(x+y)/2+(y-x)*0.5*exp(-i*0.5));
}


Documentation de giac écrite par Renée De Graeve