\text{ Uhol dvoch priamok } a=KL,b=RS ... (⊂E_3)

\text{Postup

a

b

1. \;  \text{Zvolíme si ľub. bod } M∈  E_3

 π 

2. \;  \text{Priamky } a'∥a, \; b'∥b; \; M∈a'∩b' 

3. \text{ Rovinu }ξ=(a',b')

\text{ Pohybujte bodmi } K,L,R,S \;  resp. \;  M

\text{Nastavte plohu bodov tak, aby uhol bol pravý.

a = 7 (slider from 5 to 8, step 0.2)
A: (((-a)) / 2, ((-a)) / 2, -2)
B = PointIn(Sphere[A, a])
C = Point(Circle[B, Distance[A, B], Segment[A, B]])
b, D, E, F, G, H, stenaABCD, stenaADHE, stenaABFE, stenaBCGF, stenaCDHG, stenaEFGH, hranaAD, hranaAB, hranaBC, hranaCD, hranaAE, hranaDH, hranaEH, hranaEF, hranaBF, hranaFG, hranaCG, hranaGH = Cube(A, B, C)
S = Point(b)
R = Point(b)
K = Point(b)
L = Point(b)
f = Line(S, R)
g = Line(K, L)
p = Plane(A, B, C)
M = (-0.06891698197329177, -1.4806322857179488, -0.5147279417381476)
h = Line(M, g)
i = Line(M, f)
q = Plane(h, i)
α = Angle(i, h)
text9: "4.  \; ∡(a,b)≅∡(a',b') ... =" + (LaTeX[α]) + ""