Figure 1

Figure 2

A = (-1.88, -0.5)
B = Point(Circle[A, 6])
a = Segment(A, B)
C = Midpoint(a)
b = OrthogonalLine(C, a)
c = Circle(C, 6)
D = Intersect(c, b, 2)
d = Segment(D, A)
e = Segment(D, B)
f = Segment(A, C)
E = Point(f)
g = OrthogonalLine(E, f)
F = Intersect(g, d)
h = OrthogonalLine(F, g)
G = Intersect(h, e)
poly1, e_1, f_1, g_1, b_1 = Polygon(E, F, G, B)
AD = Distance(A, D)
S: (Distance[A, E], poly1)
α = Angle(C, E, F)
β = Angle(E, F, G)