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

Contenu supprimé Contenu ajouté
Ligne 155 :
 
<source lang="smalltalk">
|figure a b d m p|
figure:=DrGeoCanvas new.
ad:=figure pointcircleCenter: (-2)@1 to: 0@1.
b:=figure point: 0@1.
d:=figure circleCenter: a to: b.
d color: Color blue.
m:=figure point: 1@(-1).