V

b

C

axe de visée

position copain

A = Point(xAxis)
f = Ray(A, A + (0, 0, 1))
B = Point(f)
C = Point(xAxis)
D: C + (0, 0, 1.7)
a = Sphere(D, 0.15)
h = Segment(D, C)
E: C + (0, 0, 0.7)
F: C + (0, 0.2, 0)
G: C + (0, -0.2, 0)
i = Segment(E, G)
j = Segment(E, F)
H: C + (0, 0, 1.5)
k = Segment(D, E)
I: H + (0, 0.15, 0)
J: H + (0, -0.15, 0)
l = Segment(I, J)
t1, i_1, j_1, e = Polygon(J, E, I)
K: I + (0, 0, -0.7)
m = Segment(I, K)
L = PointIn(a)
n = Segment(L, A)
q = Segment(L, B)
b = Plane(L, z = 0)
M = Intersect(b, f)
N: (x(L), (-y(L)), z(L))
p = Segment(L, M)
c = Sphere(J, 0.7)
O = Intersect(p, c)
r = Segment(J, O)
d = 0.3 (slider from 0 to 5, step 0.05)
s = Segment(O, O + (0, 0, (-d)))
P: O
Q: P + (0, 0, d)
t = Segment(Q, P)
f_1 = Ray(L, Q)
g_1 = Ray(L, P)
OL = Distance(O, L)
AB = Distance(A, B)
c_1 = Circle(M, (Distance[L, O] * AB / d), Line[M, M + (0, 0, 1)])
h_1 = Line(L, M)
R, S = Intersect(h_1, c_1)
T: S + (x(C) - x(L), 0, z(C) - z(L))
k_1 = Line(S, S + (0, 0, 1))
V: S + (x(O) - x(L), y(O) - y(L))
l_1 = Segment(S, A)
m_1 = Line(V, V + (0, 0, 1))
U = Intersect(l_1, m_1)
o = 0 (slider from 0 to 1, step 0.01)
Q' = Rotate(Q, ((o * 90))°, Line[L, O])
P' = Rotate(P, ((o * 90))°, Line[L, O])
t' = Segment(Q', P')
L' = Rotate(L, ((o * 90))°, Line[L, O])
A' = Rotate(A, ((o * 90))°, Line[L, O])
n' = Segment(L', A')
L'_1 = Rotate(L, ((o * 90))°, Line[L, O])
B' = Rotate(B, ((o * 90))°, Line[L, O])
q' = Segment(L'_1, B')
B'_1 = Rotate(B, ((o * 90))°, Line[L, O])
A'_1 = Rotate(A, ((o * 90))°, Line[L, O])
Z: J + (0, 0, -0.7)
n_1 = Segment(J, Z)
W' = (-13.268905476182592, -2, 0)
E'_2 = Translate(E, Vector[C, W'])
G'_1 = Translate(G, Vector[C, W'])
i'_1 = Segment(E'_2, G'_1)
E'_3 = Translate(E, Vector[C, W'])
F'_1 = Translate(F, Vector[C, W'])
j'_1 = Segment(E'_3, F'_1)
t1'_1 = Translate(t1, Vector[C, W'])
I'_1 = Translate(I, Vector[C, W'])
K'_1 = Translate(K, Vector[C, W'])
m'_1 = Segment(I'_1, K'_1)
J'_1 = Translate(J, Vector[C, W'])
Z'_1 = Translate(Z, Vector[C, W'])
q_1 = Segment(J'_1, Z'_1)
a'_1 = Translate(a, Vector[C, W'])
r_1 = Segment(C, A)
s_1 = OrthogonalLine(A, Line[C, A])
A_1 = Point(s_1)
α = Angle(C, A, A_1, space)
A'_2 = Rotate(A, 90°, Line[L, O])
B'_2 = Rotate(B, 90°, Line[L, O])
t_1 = OrthogonalLine(B'_2, xOyPlane)
a_1 = OrthogonalLine(A'_2, xOyPlane)
B_1 = Point(t_1)
C_1 = Point(a_1)
D_1: C + (-2, 2, 0)
E_1: C + (-2, -2, 0)
F_1 = Intersect(g_1, r_1)
G_1 = Intersect(r_1, g_1)
H_1 = Intersect(g_1, z = 0)
b_1 = Segment(L, H_1)
I_1 = Intersect(f_1, a_1)
J_1 = Intersect(f, f_1)
d_1 = Segment(L, J_1)
K_1 = Intersect(Line[L, P], x + (0 * z) = x(A))
g' = Segment(B'_1, K_1)
g = Segment(B, K_1)
p_1 = Segment(A, K_1)
e_1 = Segment(L, K_1)
f_2 = Segment(L, B'_1)