Bogenma
Author: Andreas Brinken

Jeder Kreis ist ähnlich 
zum Einheitskreis!

Verändere die Lage von P_1. 
Welche Beziehung besteht zwi-
schen der (grünen) Bogenlänge
b und dem Bogenmaß (rot)?

M = (-4.619246861924686, 4.1841004184100425)
Einheitskreis = Circle(M, 1)
Kreisradius = 4 (slider from 0 to 4, step 0.1)
M_1 = (-1.5408805031446542, -0.5974842767295597)
Kreis_b = Circle(M_1, Kreisradius)
A = Point(Einheitskreis)
c = Segment(M, A)
P_1 = Point(Kreis_b)
e = Segment(M_1, P_1)
u = Vector(M, M_1)
A' = Translate(A, u)
b_1 = Ray(M_1, A')
A_1 = Intersect(Kreis_b, b_1, 1)
f = Segment(M_1, A_1)
b = CircleArc(M_1, A_1, P_1)
α = Angle(A_1, M_1, P_1)
v = Vector(M_1, M)
D = Translate(M_1, v)
B' = Translate(P_1, v)
e' = Segment(D, B')
E = Intersect(Einheitskreis, e', 1)
Bogenmaß = CircleArc(M, A, E)
h = Segment(M, E)
β = Angle(A, M, E)