Analysator

Polarisator

E

Polfilter

E_1

E_2

E_3

A = Point(xAxis)
B = Point(yAxis)
u = Vector(A)
C = Point(xAxis)
D = Point(yAxis)
v = Vector(C)
w = Vector(B)
a = Vector(D)
E = (5.094280102668974, 3.017100453104505)
b = Vector(E)
F = Point(b)
c = Circle(F, 6)
G = Point(c)
d = Vector(G)
f = Line(G, F)
H, I = Intersect(c, f)
e = Vector(I)
g = OrthogonalLine(E, w)
J = Intersect(g, yAxis)
h = Vector(F, J)
i = Segment(J, E)
j = OrthogonalLine(J, d)
k = Line(F, G)
K = Intersect(j, k)
l = Segment(J, K)
m = Vector(F, K)
n = OrthogonalLine(K, xAxis)
L = Intersect(n, xAxis)
p = Segment(K, L)
q = Vector(F, L)