Prolungamento raggio incidente

Sorgente apparente

Raggio riflesso

Raggio incidente

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)
I = Intersect(a, b)
b' = Segment(I, riflesso)
c = Segment(C', I)
d = Segment(Sorgente, I)