Octogone dans un carré
Author: Patrice Debart

P = (4, -4)
Q = (4, 4)
PQ = Segment(P, Q)
R = Rotate(P, 270.0°, Q)
S = Rotate(Q, 90.0°, P)
QR = Segment(Q, R)
RS = Segment(R, S)
PR = Segment(P, R)
O = Midpoint(PR)
QS = Segment(S, Q)
PS = Segment(P, S)
c_1 = Circle(P, O)
c_2 = Circle(Q, O)
c_3 = Circle(R, O)
c_4 = Circle(S, O)
A = Intersect(c_2, PQ, 1.0)
B = Intersect(c_1, PQ, 1.0)
C = Intersect(c_3, QR, 1.0)
D = Intersect(c_2, QR, 1.0)
E = Intersect(c_4, RS, 1.0)
F = Intersect(c_3, RS, 1.0)
G = Intersect(c_1, PS, 1.0)
H = Intersect(c_4, PS, 1.0)
AB = Segment(A, B)
BC = Segment(B, C)
CD = Segment(C, D)
DE = Segment(D, E)
EF = Segment(E, F)
FG = Segment(F, G)
GH = Segment(G, H)
HA = Segment(H, A)