B = (11.36, 2.62)
d = Circle(B, 2)
C = Point(d)
c = Circle(C, 1)
A = Point(c)
e = Circle(A, 1)
D = Point(d)
E = Point(d)
F = Point(e)
G = Point(e)
a = Line(D, F)
b = Line(E, G)
H = Intersect(a, b)
α = Angle(F, H, G)
f = Line(A, C)
I = Intersect(d, f, 2)
g = OrthogonalLine(I, f)
J = Intersect(a, g)
K = Intersect(b, g)
β = Angle(I, J, D)
γ = Angle(E, K, I)
poly1, k, h, j = Polygon(H, J, K)
Textpoly1: "Area of  " + (Name[H]) + (Name[J]) + (Name[K]) + " = " + poly1
i = Segment(J, K)
distanceHI = Distance(H, I)
TextHI: "\overline{" + (Name[H]) + (Name[I]) + "} \, = \, " + distanceHI
p = Circle(H, B)
q = Circle(H, E)
E1 = Intersect(q, f, 2)
B1 = Intersect(p, a, 1)
l = Segment(B, E)
poly2, e_1, b_1, h_1 = Polygon(B, H, E)
m = Segment(B1, E1)
poly3, e1, b1, h_2 = Polygon(B1, H, E1)