A = Intersect(xAxis, yAxis)
B = (1, 0)
c = Circle(A, B)
C = Point(c)
a = OrthogonalLine(C, xAxis)
D = Intersect(a, xAxis)
abstandCD = Distance(C, D)
TextCD: "\overline{" + (Name[C]) + (Name[D]) + "} \, = \, " + abstandCD
α = Angle(D, A, C)
β = Angle(B, A, C)
b = Segment(A, C)
E = Point(a)
d = Segment(C, D)