L = (-1.16, 3.6)
I = Point(Circle[L, 5])
f = Segment(L, I)
S = Point(Circle[I, 2.5])
g = Segment(I, S)
h = Line(S, f)
i = Line(L, g)
E = Intersect(h, i)
j = Segment(E, L)
k = Segment(E, S)