Error cometido

R_2 = 2.1 (slider from 1.5 to 10, step 0.1)
a2: 3.141592653589793 / 2.0 - 4.0 / R_2
A = (2.34, 0.22)
r = 7 (slider from -5 to 15, step 0.1)
B: A + (0.0, r / 2.0)
C: A + (0.0, 3.0 * r / 4.0)
R_1 = 3.5 (slider from 2 to 13, step 0.1)
a1: 3.141592653589793 / 2.0 - 6.0 / R_1
s = 1.8 (slider from -5 to 5, step 0.1)
c = Semicircle(A - (r, 0.0), A + (r, 0.0))
a = true
texto1: "Error del arco azul = " + (abs(r - R_1) * 100.0 / r) + " %" + "

Error del arco rojo = " + (abs(r - R_2) * 100.0 / r) + " %"
A1 = 0
f = CircumcircleArc(C - (0.0, R_1) + (R_1; a1), C, C - (0.0, R_1) + (R_1; 180.0° - a1))
ff = CircumcircleArc((7.631827556, 3.0522004667), (2.34, 5.47), (-2.951827556, 3.0522004667))
g = CircumcircleArc(B - (0.0, R_2) + (R_2; a2), B, B - (0.0, R_2) + (R_2; 180.0° - a2))
gg = CircumcircleArc((6.12584, 2.6079), (2.34, 3.72), (-1.44584, 2.6079))