Sorgente apparente

Raggio riflesso

Muovere la direzione del raggio incidente 
muovendo il suo punto finale.

specchio = (-4, 0)
B = (8, 0)
a = Segment(specchio, B)
Sorgente = (-2, 1)
D = (6, -3)
b = Segment(Sorgente, D)
C' = Mirror(Sorgente, a)
riflesso = Mirror(D, a)
b' = Segment(C', riflesso)