A = (-2, 1)
B = (9, -2)
a = Line(A, B)
C = Point(p)
Vieleck1, c, a_1, b = Polygon(A, B, C)
D = Midpoint(A, B)
d = Semicircle(A, B)
S = (4, 7)
C1 = (0, 3)
C2 = (6, 6)
Vieleck2, c1, a_2, b_1 = Polygon(A, B, C1)
Vieleck3, c2, a_3, b_2 = Polygon(A, B, C2)
E, F = Intersect(p, a)
e = OrthogonalLine(B, a)
C5 = Intersect(p, d, 1.0)
C6 = Intersect(p, d, 2.0)
C7 = Intersect(p, d, 3.0)
C8 = Intersect(p, e, 2.0)
f = Line(C, a)