Author: B. Spier

optische Achse

Linse

Konstruktionslinien

G

B

Konstruktion mit Hauptstrahlen / Parallelen

Lichtbündel

P = (-6.126838989025573, 2.927795405963895)
f_{max} = 8
A = Point(xAxis)
B = Point(xAxis)
oa = Line(A, B)
Li = Point(oa)
L_2: (x(Li) + f_{max}, 0)
L_1 = Mirror(L_2, Li)
s_f = Segment(L_1, L_2)
F_2 = Point(s_f)
e = OrthogonalLine(F_2, oa)
LO: (x(Li), 2)
a = Line(P, LO)
d = Line(Li, a)
C = Intersect(d, e)
h = Line(LO, C)
LU = Mirror(LO, Li)
c = Line(P, LU)
i = Line(Li, c)
D = Intersect(i, e)
j = Line(LU, D)
Q = Intersect(j, h)
f: x(F_2) - x(Li)
M1: (x(F_2) + (3 * sgn(f)) - 0.5, 0)
li = Segment(LO, LU)
cr1 = CircleArc(M1, LO, LU)
M2 = Mirror(M1, Li)
cr2 = CircleArc(M2, LU, LO)
CO: (x(M1) + sqrt((x(Li) - x(M1))^(2) - y(LO)^(2)) - 0.125, 0.2 + y(LO))
CU = Mirror(CO, oa)
c3 = CircleArc(M1, CU, CO)
CO' = Mirror(CO, li)
CU' = Mirror(CU, li)
c4 = CircleArc(M2, CO', CU')
kv_o = Segment(CO, CO')
kv_u = Segment(CU, CU')
F_1 = Mirror(F_2, li)
g: x(Li) - x(P)
b: x(Q)
k = Segment(P, LO)
l = Segment(P, LU)
m = Ray(LO, C)
n = Ray(LU, D)
p = OrthogonalLine(F_1, oa)
E = Intersect(p, a)
F = Intersect(p, c)
q = Ray(LO, E)
r = Ray(LU, F)
G = Intersect(h, p)
H = Intersect(j, p)
s = Ray(LO, G)
t = Ray(LU, H)
I = Intersect(e, a)
J = Intersect(c, e)
a_1 = Ray(LO, I)
b_1 = Ray(LU, J)
K = true
c_1 = OrthogonalLine(P, oa)
L = Intersect(c_1, oa)
d_1 = OrthogonalLine(Q, oa)
M = Intersect(d_1, oa)
u = Vector(L, P)
v = Vector(M, Q)
X = true
e_1 = Line(LU, LO)
f_1 = Line(P, oa)
g_1 = Line(P, F_1)
h_1 = Line(Q, F_2)
i_1 = Line(Q, oa)
N = Intersect(f_1, h_1)
j_1 = Segment(P, N)
k_1 = Segment(N, Q)
O = Intersect(i_1, g_1)
l_1 = Segment(P, O)
m_1 = Segment(O, Q)
n_1 = Line(P, Li)
o = false
p_1 = Ray(N, F_2)