A = (-3.16036, -2.6089)
B = (4.80144, -2.6089)
C, D = carré(A, B)
a = Segment(A, B)
b = Segment(B, C)
c = Segment(C, D)
d = Segment(D, A)
liste1 = partage(D, C, 3)
F = Point(liste1)
E = Point(liste1)
G = (5.834930909090909, -1.4849909090909093)
H = (11.39493090909091, -1.4849909090909093)

Tool: carré
carré[ <Point>, <Point> ]
Input: C, D
Output: E, F

poly1, a, b, c, d, E, F = Polygon(C, D, 4)

Tool: partage
donner une valeur à n puis choisir deux points
Input: A, B, n
Output: L'

c = Circle(A, 1)
a = Segment(A, B)
b = OrthogonalLine(A, a)
C = Intersect(c, b, 2)
u = Vector(A, C)
f(x) = x(u) + x
g(x) = y(u) + x
L_x = IterationList(f, x(A), n)
L_y = IterationList(g, y(A), n)
L = Sequence((Element[L_x, i + 1], Element[L_y, i + 1]), i, 1, n)
D_0 = Line(B, Element[L, n])
D = Sequence(Line[Element[L, i], D_0], i, 1, n)
L' = Sequence(Intersect[a, Element[D, i]], i, 1, n)