Lonxitude circunferencia

Podes modificar o radio da circunferencia movendo a frecha vermella.

Se moves a frecha verde, a circunferencia desprázase, e sobre o eixo OX, vaise marcando a loxitude, e vai deixando un rastro azul.

Move as frechas, para ver como todo se modifica

Radio

Move a frecha vermella para aumentar o radio

Move a frecha verde para desprazar a circunferencia

A = Intersect(xAxis, yAxis)
B = Point(yAxis)
a = Ray(A, B)
H = Point(a)
C: (0, y(H) / 2)
r_1: y(C)
D: (((2 * 3.141592653589793) * r_1), r_1)
b = Segment(C, D)
E = Point(b)
c_1 = Circle(E, r_1)
F: (x(E), 0)
G = Rotate(F, ((-x(E))) / r_1, E)
d = Segment(A, F)
e = CircleArc(E, F, G)
g = If(x(E) > 0, Circle[(100 * C), 0], Circle[C, H])
r = Segment(E, G)
I: (x(F), (-0.25))
u = Vector(I, F)
T1: "" + (x(F))
texto2: "Radio =" + (LaTeX[r_1]) + ""
c = Circle(E, r)
f = Circle(H / 2, r)
J: H / 2
texto4: "Lonxitude = 2 · π· " + r + "= " + b + ""