zweifach reflektierter Strahl

Spuren löschen

Tangente und Einfallslot

Brennpunkt

Weg eines Lichtstrahls

reflektierter Strahl

Reflexion bei Parabeln

IMP10

t

t

Ziehe rechts am Schieberegler x_P !

weiter ...

a = 0.25 (slider from 0 to 2, step 0.05)
p: y = (a * x^(2))
x_P = 4 (slider from 1 to 4, step 0.25)
P: (x_P, p(x_P))
t, f_1 = Tangent(P, p)
n = OrthogonalLine(P, t)
v = Vector((0, 0), (0, 1))
s = Ray(P, v)
P' = Mirror(P, n)
gl1: x = x(P)
gl1' = Mirror(gl1, n)
B_1, C = Intersect(p, gl1')
f = Tangent(C, p)
g = OrthogonalLine(C, f)
E = Point(n)
F = Point(g)
n_2 = Segment(C, F)
gl1'' = Mirror(gl1', g)
j = Segment(C, P)
D = Point(gl1'')
k = Ray(C, D)
a_1 = false
G = Point(f)
H = Point(f)
t_2 = Segment(H, G)
b = false
B = Focus(p)
n_1 = Segment(P, E)
c = false
hoehe = 6 (slider from 0 to 7, step 1)
l_1: {-1.5, 1, 3, 4}
l_2 = Sequence((Element[l_1, i], p(Element[l_1, i])), i, 1, 4)
l_3 = Sequence(Vector[(Element[l_1, i], hoehe), Element[l_2, i]], i, 1, 4)
d = false
e = false
I = Point(t)
J = Point(t)
t_1 = Segment(I, J)
x_{min}: -5
x_{max}: 5
y_{min}: -1.7
h = false
A = (-4.882467315280937, 6.125847720203126)
K = (4.947294092455036, -2.264488124935671)