Doppelspiegeln eines Bildes  an zwei  sich schneidenden Achsen
Author: Prof. Dr. Dörte Haftendorn
Date: Sept 05

Man kann auch durch "Umdefinieren"  b=Gerade(D,a) den parallelen Fall erzeugen.

A = (3.3333333333333335, -0.5333333333333333)
B = (-1.4333333333333333, 1.3333333333333333)
C = (7.7, 5.933333333333334)
a = Line(B, C)
D = (-0.9666666666666667, 3.6333333333333333)
b = Line(D, B)
pic2 = Mirror(pic1, a)
pic3 = Mirror(pic2, b)
A' = Mirror(A, a)
pic4 = Mirror(pic2, b)
A'' = Mirror(A', b)
d = Circle(B, A)
α = Angle(A'', B, A)
G = Point(d)
G_α = Rotate(G, α, B)
pic6 = Rotate(pic5, α, B)