Prolungamento raggio incidente

Sorgente virtuale

Raggio riflesso

Raggio incidente

Muov slider +1 passo, e commentare. Ripetere.

e = 0 (slider from -8 to 8, step 2)
specchio = (-4.16, 1)
B = (8, 1)
a = Segment(specchio, B)
Sorgente = (-2, 3)
D: (e, -(3.5))
b = Segment(Sorgente, D)
C' = Mirror(Sorgente, a)
riflesso = Mirror(D, a)
I = Intersect(a, b)
rr = Segment(I, riflesso)
c = Segment(C', I)
ri = Segment(Sorgente, I)