« Programmation objet et géométrie/Programmation avec DrGeoII » : différence entre les versions

Contenu supprimé Contenu ajouté
Ligne 374 :
<source lang="smalltalk">
|figure u p|
|figure s r u|
figure:=DrGeoCanvas new.
s:=figure segment: (figure point: 0@(-1)) to: (figure point: 4@(-1)).
u:=0.1.
pr:=figure pointpointOnCurve: s at: 0@u.8.
s:=figure segment: (figure point: 0@0) to: (figure point: 0@1).
p round small.
u:=figure pointOnCurve: s at: 0.7.
p color: Color blue.
pu round small.
1 to: 200 do: [:n|
pu color: Color blue.
u:=4*u*(1-u).
1 to: 200100 do: [:n|
p:=figure point: (n/10)@u.
u:=figure point: [:parents| |y t|
p round small.
y:=parents first point y.
p color: Color blue.
t:=parents second point x.
].
(n/5)@t*y*(1-y)]
parents: {u.r}.
p u round small.
p u color: Color blue.
].
</source>
 
La manipulation des curseurs montre dynamiquement le phénomène de dédoublement de période. En simplifiant légèrement le script, on peut vérifier l'effet de la raison d'une suite géométrique sur sa convergence.
 
[[Catégorie:Programmation objet et géométrie (livre)|Programmation avec DrGeoII]]