radio = 2.78 (slider from 0 to 5, step 0.01)
G = (5.86, 2.96)
c = Circle(G, radio)
B = (6.8, 2.48)
f = Line(G, B)
D, Z = Intersect(c, f)
A = (5.74, 4.04)
g = Line(G, A)
H, E = Intersect(c, g)
h = Segment(D, Z)
i = Segment(H, E)
d = CircleArc(G, D, H)
e = CircleArc(G, Z, E)
C = Point(e)
α = Angle(G, C, B)
β = Angle(A, C, G)
s1: abs((α - β) / °)
R = Minimize(s1, C)
I = Point(d)
γ = Angle(G, I, A)
δ = Angle(B, I, G)
s2: abs((γ - δ) / °)
S = Minimize(s2, I)
j = Segment(A, R)
k = Segment(R, B)
l = Segment(B, S)
m = Segment(S, A)
n = Segment(R, G)
p = Segment(G, S)
q = Circle(G, B, A)