An A_n ziehen!

A_2 = (2, 4)
a = Line(A_2, xAxis)
b = Line(A_2, yAxis)
C: (0, -4)
A: (0, 4)
c = Segment(A_2, C)
B: (-2, 0)
D: (2, 0)
poly1, a_1, b_1, c_1, d = Polygon(A, B, C, D)
M: (0, 0)
l = Segment(A, M)
A_n = Point(l)
u = Vector(A, A_n)
f = Segment(A, A_n)
e = Circle(C, f)
g = Circle(D, f)
h = Circle(B, f)
B_n, G = Intersect(h, xAxis)
D_n = Intersect(g, xAxis, 2)
C_n = Intersect(e, yAxis, 2)
v = Vector(C, C_n)
w = Vector(B, B_n)
i = Vector(D, D_n)
v1, a_n, b_n, c_n, d_n = Polygon(A_n, B_n, C_n, D_n)
Text2: "Flächeninhalt von A_nB_nC_nD_n: " + v1 + " FE"