A = (1.68, -0.7)
B = (9.34, -0.72)
a_2 = Line(A, B)
b = OrthogonalLine(B, a_2)
C = Point(b)
c = OrthogonalLine(C, b)
d = OrthogonalLine(A, a_2)
D = Intersect(c, d)
mnohoúhelník1, a_1, b_1, c_1, d_1 = Polygon(A, B, C, D)
a = 1 (slider from 0 to 10, step 0.1)
e = Circle(C, a)
f = Circle(B, a)
g = Circle(A, a)
h = Circle(D, a)
E = Intersect(h, d, 2)
F = Intersect(h, c, 2)
G = Intersect(g, a_2, 1)
H = Intersect(g, d, 1)
I = Intersect(f, b, 1)
J = Intersect(f, a_2, 2)
K = Intersect(e, c, 1)
L = Intersect(e, b, 2)
i = Segment(E, L)
j = Segment(K, J)
k = Segment(I, H)
l = Segment(G, F)
p = CircleArc(D, E, F)
q = CircleArc(C, K, L)
r = CircleArc(B, I, J)
s = CircleArc(A, G, H)
M = (0.38, -2.04)
P = (10.66, -2.04)