A = (-0.54, -4.62)
B = (13.84, -4.62)
a = Segment(A, B)
C = Point(a)
k, k_a, k_b, M, M_a, M_b = arbelos2(A, B, C)
Vieleck1, b, c, d, e, D, E = Polygon(C, B, 4)
Vieleck2, f, g, h, i, F, G = Polygon(A, C, 4)
H = Midpoint(h)
I = Midpoint(d)
j = Ray(A, I)
l = Ray(B, H)
M_i = Intersect(j, l)
m = Segment(M_i, M_b)
J = Intersect(k_b, m, 1)
p = Circle(M_i, J)

Tool: arbelos2
input:endpoints, then intermediate point  output: arbelos
Input: A, B, C
Output: e, c, d, D, E, F

a = Segment(A, B)
c = Semicircle(A, C)
d = Semicircle(C, B)
e = Semicircle(A, B)
D = Center(e)
E = Center(c)
F = Center(d)

Tool: arbelos
input: two points   output:three semicircles with center for arbelos
Input: A, B
Output: a, C, c, d, e, D, F, E

a = Segment(A, B)
C = Point(a)
c = Semicircle(A, C)
d = Semicircle(C, B)
e = Semicircle(A, B)
E = Center(d)
F = Center(e)
D = Center(c)