longuer de cordes
Author: Daniel Mentrard

Pliage

Dépliage

Oter la ficelle

Mettre la ficelle

B_1 = (-6.135239136597887, -4.275192039379794)
Vues = (-5.797959249070974, 0.4443525313066434)
xa: x(Vues)
sinphi: sin(xa)
cosphi: cos(xa)
ya: y(Vues)
sintheta: sin(ya)
Zoom = 1 (slider from 1 to 5, step 0.1)
xy: -(Zoom) * cosphi * sintheta
X: (x(B_1) + Zoom * sinphi, y(B_1) + xy)
u = Vector(B_1, X)
costheta: cos(ya)
Z: (x(B_1), y(B_1) + Zoom * costheta)
w = Vector(B_1, Z)
a_1 = OrthogonalLine(Vues, yAxis)
b_1 = OrthogonalLine(Vues, xAxis)
c_1: cos(ya)
Y: (x(B_1) + Zoom * cosphi, y(B_1) + Zoom * sinphi * sintheta)
v = Vector(B_1, Y)
O = (-1.0902142247975148, 0.004463831225425487)
L = 2 (slider from 1 to 5, step 0.1)
l = 1.5 (slider from 1 to 5, step 0.1)
h = 1.8 (slider from 1 to 5, step 0.1)
K: O + L * u + l * v
L_3: O - L * u + l * v
M: O - L * u - l * v
N: O + L * u - l * v
α = 1.1344640137963142 rad (slider from 0 to 1.5707963267948966, step 0.017453292519943295)
poly1, l_4, k_1, n, m = Polygon(L_3, K, N, M)
P: O + L * u + l * v + h * cos(α) * u + h * sin(α) * w
Q: O + L * u - l * v + h * cos(α) * u + h * sin(α) * w
R: O - L * u + l * v - h * cos(α) * u + h * sin(α) * w
S: O - L * u - l * v - h * cos(α) * u + h * sin(α) * w
poly2, k_2, p, q, n_1 = Polygon(K, P, Q, N)
poly3, l_1, m_1, s, r = Polygon(L_3, M, S, R)
T: O + L * u + l * v + h * cos(α) * v + h * sin(α) * w
U: O - L * u + l * v + h * cos(α) * v + h * sin(α) * w
V: O + L * u - l * v - h * cos(α) * v + h * sin(α) * w
W: O - L * u - l * v - h * cos(α) * v + h * sin(α) * w
poly4, n_2, v_1, w_1, m_2 = Polygon(N, V, W, M)
poly5, k_3, t, u_1, l_2 = Polygon(K, T, U, L_3)
A: O + L * u + l * v + h * cos(α) * u + h * sin(α) * w + 2.0 * L * cos(2.0 * α) * u + l * sin(2.0 * α) * w
B: O + L * u - l * v + h * cos(α) * u + h * sin(α) * w + 2.0 * L * cos(2.0 * α) * u + l * sin(2.0 * α) * w
poly6, b_2, q_1, p_1, a_2 = Polygon(B, Q, P, A)
D = Midpoint(R, M)
D_1 = Midpoint(N, P)
F_1 = Midpoint(k_1)
h_2 = Segment(M, W)
N_1: O - L * u - l * v - h * cos(α) * v + h * sin(α) * w
C = Midpoint(v_1)
E = Midpoint(n)
F = Midpoint(m)
G = Midpoint(t)
H = Midpoint(m_1)
I = Midpoint(r)
J = Midpoint(s)
A_1 = Midpoint(p)
C_1 = Midpoint(a_2)
c = Segment(F, J)
e = Segment(F_1, F)
f = Segment(F_1, A_1)
h_3 = Segment(A_1, C_1)
E_1 = Midpoint(l_4)
i = Segment(E, C)
j = Segment(E, E_1)
d_1 = Segment(E_1, G)
G_1 = Midpoint(q)
I_1 = Midpoint(b_2)
J_1 = Midpoint(p_1)
f_1 = Segment(J_1, I_1)
g_1 = Segment(H, I)
H_1 = Midpoint(k_2)
e_1 = Segment(G_1, H_1)
K_1 = Midpoint(w_1)
L_1 = Midpoint(n_2)
h_1 = Segment(K_1, L_1)
M_1 = Midpoint(u_1)
O_1 = Midpoint(k_3)
j_1 = Segment(M_1, O_1)
P_1 = (0.884605258545825, 0.3788371929966748)
i_1 = Segment(O, P_1)
o = 0 (slider from 0 to 7, step 0.1)
r_1 = Circle(O, If[o < i_1, o, i_1])
Q_1, V_2 = Intersect(r_1, i_1)
z = Vector(O, Q_1)
F'_1 = Translate(F, z)
J' = Translate(J, z)
c' = Segment(F'_1, J')
R_1 = Translate(F_1, z)
F' = Translate(F, z)
e' = Segment(R_1, F')
E'_1 = Translate(E, z)
C' = Translate(C, z)
i' = Segment(E'_1, C')
S_1 = Translate(K_1, z)
T_1 = Translate(L_1, z)
s_1 = Segment(S_1, T_1)
E' = Translate(E, z)
U_1 = Translate(E_1, z)
j' = Segment(E', U_1)
V_1 = Translate(J_1, z)
W_1 = Translate(I_1, z)
t_1 = Segment(V_1, W_1)
Z_1 = Translate(E_1, z)
G' = Translate(G, z)
c_2 = Segment(Z_1, G')
A_2 = Translate(M_1, z)
B_2 = Translate(O_1, z)
d_2 = Segment(A_2, B_2)
H' = Translate(H, z)
I' = Translate(I, z)
e_2 = Segment(H', I')
C_2 = Translate(G_1, z)
D_2 = Translate(H_1, z)
f_2 = Segment(C_2, D_2)
E_2 = Translate(A_1, z)
F_2 = Translate(C_1, z)
h' = Segment(E_2, F_2)
G_2 = Translate(F_1, z)
H_2 = Translate(A_1, z)
f' = Segment(G_2, H_2)
I_2 = Midpoint(C_1, A_1)
J_2 = Midpoint(C_1, I_2)
K_2 = Midpoint(I_2, A_1)
poly7, j_2, k_4, p_2, a_3 = Polygon(J_2, K_2, P, A)
poly8, b_3, j_3, k_5, q_2 = Polygon(B, J_2, K_2, Q)
L_2 = Midpoint(E, E_1)
M_2 = Midpoint(F, O)
N_2 = Midpoint(O, F_1)
poly9, m_3, n_3, k_6, l_3 = Polygon(M_2, N_2, K, L_3)
poly10, m_4, m_5, n_4, n_5 = Polygon(M, M_2, N_2, N)
O_2 = Intersect(h', t_1)
P_2 = Midpoint(W_1, F_2)
Q_2 = Midpoint(V_1, F_2)
R_2 = Midpoint(P_2, O_2)
S_2 = Midpoint(O_2, Q_2)
T_2 = Midpoint(W_1, H_2)
U_2 = Midpoint(T_2, O_2)
texte5: "" + (h * 10.0) + "cm"
texte6: "L = " + (L * 10.0) + "cm"
texte7: "l = " + (l * 10.0) + "cm"