next up previous contents index
suivant: La courbe de Péano monter: Les courbes de Péano précédent: Les courbes de Péano   Table des matières   Index

La courbe $ \mathcal {C}$0 de Péano

Soit un carré de diagonale l :
au jour 0, on trace une diagonale,
au jour 1, on divise ce carré en 9 carrés et on trace les diagonales de ces carrés, de façon à avoir un trait continu en parcourant la première ligne, puis la deuxième, et enfin la troisième, comme ci-dessous :

\begin{pspicture}(0.0000,0)(14,4)
\psset{unit=0.0173cm}
\psset{linewidth=.5pt}
\...
...330.6066,200.6066)
\psline(316.4645,193.5355)(330.6066,200.6066)
\end{pspicture}

puis on recommence le même processus.
On tape :

//peano(90)
peano(l):={
  si (l<10) alors avance(l);
  sinon
  peano(l/3);
  tourne_droite;peano(l/3);
  tourne_gauche;peano(l/3);
  tourne_gauche;peano(l/3);
  tourne_gauche;peano(l/3);
  tourne_droite;peano(l/3);
  tourne_droite;peano(l/3);
  tourne_droite;peano(l/3);
  tourne_gauche;peano(l/3);
  fsi
};


Documentation de giac écrite par Renée De Graeve