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

Contenu supprimé Contenu ajouté
Ligne 384 :
s:=figure segment: 0@(-1) to: 4@(-1).
r:=figure pointOnCurve: s at: 0.8.
s:=figure segment: 0@0 to: 0@1.
u:=figure pointOnCurve: s at: 0.7.
u round small.
u color: Color blue.
1 to: 100 do: [:n|
u:=figure
point: [:parents| |y t|
y:=parents first point y.
t:=parents second point x.
(n/5)@t*y*(1-y)]
parents: {u.r}.
u round small.
u color: Color blue].
].
</source>