7.2.2 Point

Method on DrGeoFigure: <WrpPoint> point: pointOuBloc

pointOuBloc, un couple de coordonnées (x,y) ou un bloc de code retournant un couple de coordonnées. Dans le deuxième cas, le bloc est exécuté à chaque fois que les coordonnées du point sont demandées.

⇒ référence d’un point libre du plan de coordonnées pointOuBloc.

| fig |
fig := DrGeoFigure nouveau.
fig point: 5@2.
fig point: [ 5 auHasard @ 5 auHasard ].

Method on DrGeoFigure: <WrpPoint> pointX:Y: v1 v2

v1, un objet valeur

v2, une objet valeur

⇒ référence d’un point contraint par ses coordonnées

figure 
   pointX: (figure valeurLibre: 2) cacher 
   Y: (fiugre valeurLibre: 5) cacher.

Method on DrGeoFigure: <WrpPoint> pointSurLigne:a: curve a

curve, référence d’une ligne (droite, demi-droite, segment, etc.)

a, abscisse curviligne du point libre, la valeur est normalisée sur [0 ; 1].

⇒ référence d’un point libre sur une ligne

myPoint := figure pointSurLigne: s1 at: 0.5.

Method on DrGeoFigure: <WrpPoint> milieuDe:et: p1 p2

p1, référence d’un point ou d’un couple de coordonnées

p2, référence d’un point ou d’un couple de coordonnées

⇒ référence du milieu des deux points

| a i |
a := figure point: 1@1.
i := figure milieuDe: a et: 4@4.

Method on DrGeoFigure: <WrpPoint> milieuDe: s

s, référence d’un segment

⇒ référence du milieu du segment

figure milieuDe: s.

Method on DrGeoFigure: <WrpPoint> intersectionDe:et: l1 l2

l1, référence d’une ligne

l2, référence d’une ligne

⇒ référence du point d’intersection des deux lignes

figure intersectionDe: droite et: segment

Method on DrGeoFigure: <WrpPoint> autreIntersectionDe:et: l1 l2

l1, référence d’une ligne

l2, référence d’une ligne

⇒ référence de l’autre point d’intersection des deux lignes, lorsqu’il existe.

figure autreIntersectionDe: droite et: circle.

Method on DrGeoFigure: <WrpPoint> point:parent: bloc item

bloc, bloc de code retournant un point

item, référence d’un item géométrique

⇒ référence d’un point dont les coordonnées sont calculées avec le bloc de code ayant comme argument item.

| figure s mobile c block |
figure := DrGeoFigure nouveau.
s := figure segment: -5@0 to: 5@0.
mobile := figure pointSurLigne: s a: 0.1.
block := [:mathItem | |x|
   x := mathItem point x.
   x @ (x * x * x / 25 - x)].
c := figure point: block parent: mobile.
figure lieuDe: c lorsqueBouge: mobile.

Method on DrGeoFigure: <WrpPoint> point:parents bloc liste

bloc, bloc de code retournant un point

liste, une collection d’items géométriques

⇒ référence d’un point dont les coordonnées sont calculées avec le bloc de code ayant comme argument liste.

| figure d m p |
figure := DrGeoFigure nouveau.
d := figure droitePassantPar: -2 @ 1 et: 3 @ 3.
d couleur: Color blue.
m := figure point: 1 @ -1.
p := figure 
   point: [:parents |
      parents first closestPointTo: parents second point]
   parents: {d . m}.