Fuoco

Sorgente

Raggio incidente

Raggio riflesso

ray

bisectors

Direttrice

parabola

Muovere diretettrice
per interpolare specchi.

F = (4, 0)
i = Line(F, xAxis)
passoOriz = 0.5
ix = 127 (slider from 0 to 215, step 1)
nColonne = 24
nRiga: floor(ix / nColonne)
Ay: (nRiga + 1.0) * 0.5
nColonna: ix - floor(ix / nColonne) * nColonne
Ax: nColonna * passoOriz - 4.0
S: (-(4.0), Ay)
A: (Ax, Ay)
a = Line(S, A)
c = Line(A, F)
b, d = AngularBisector(a, c)
R = 0.3 (slider from 0 to 0.5, step 0.05)
e = Circle(A, R)
B, C = Intersect(e, b)
f = Segment(B, C)
g = true
h = true
passoVert = 0.5
D = Point(i)
dir = OrthogonalLine(D, i)
k = Parabola(F, dir)
l = false
m = Ray(A, S)
n = Ray(A, F)