Movimiento de vaivén

El cuadrilátero articulado ABCD convierto el movimiento de rotación de B alrededor de A en un movimiento de vaivén de E.

Animación

SI

NO

SI

NO

Lugar geom 

SI

NO

SI

NO

Mueve C

b_3 = 0.17 (slider from 0 to 1, step 0.01)
o = 0.3 (slider from 0 to 1, step 0.1)
c = 5 (slider from 4.5 to 5.5, step 0.1)
b = 0.9 (slider from 0.7 to 1.3, step 0.01)
a = 4.6999999999999975 (slider from 4.5 to 5.2, step 0.1)
α = 3.4557519189487724 rad (slider from 0° to 360°, step 0.1°)
A = (-0.561482006766387, -0.2932538209997974)
ex: x(A)
f = Circle(A, a)
B = Point(f)
B1: B + (b, 0)
C = Rotate(B1, α, B)
e = Circle(C, c)
d = 5 (slider from 4.5 to 5.5, step 0.1)
s = Circle(A, d)
D = Intersect(s, e, 2)
m = Ray(A, D)
n = 2 (slider from 0 to 5, step 0.1)
A1: A + (0, d + n + o)
A2: A1 + (1, 0)
r = Line(A1, A2)
q = Circle(A, d + n)
E = Intersect(q, m, 1)
f_1 = OrthogonalLine(E, r)
F = Intersect(r, f_1)
ey: y(F)
p = Circle(B, b)
i = Ray(B, B1)
C1 = Intersect(p, i, 1)
c_1 = 2.0625 (slider from 0 to 5, step 1.0E-4)
k = 0 (slider from 0 to 1, step 1)
v = 0 (slider from 0 to 1, step 0.1)
d1: (10 * v)
texto1e: "Velocidad animación: " + d1 + ""
k1 = 0 (slider from 0 to 1, step 1)
t = 1 (slider from 0 to 1, step 0.001)
nada = 4.9 (slider from -5 to 5, step 0.1)
texto3: "CD = " + c + ""
texto1b: "BC = " + b + ""
texto1a: "AB = " + a + ""
texto4: "DA = " + d + ""
j = Segment(A, B)
g = Segment(A, D)
h = Segment(D, C)
l = Segment(C, B)
g_1 = Segment(E, D)
u = 0.24 (slider from 0 to 1, step 0.01)
F1: F - (u, 0)
F2: F + (u, 0)
w = 0.7 (slider from 0 to 1, step 0.1)
F3: F1 - (0, w)
F4: F2 - (0, w)
h_1 = Segment(F3, F1)
i_1 = Segment(F4, F2)
a_1 = 5 (slider from 1 to 5, step 0.1)
F5: F - (a_1, 0)
F6: F + (a_1, 0)
j_1 = Segment(F5, F6)
b_1 = 2.4 (slider from 1 to 5, step 0.1)
b_2 = 1 (slider from 0 to 1, step 0.1)
AA0: (ex, ey + b_3)
AA1: AA0 - (b_1, 0)
AA3: AA0 + (b_1, 0)
AA2: AA0 - (b_1 + b_2, 0)
AA4: AA0 + (b_1 + b_2, 0)
BB0: (ex, ey - b_3)
polígono1, k_1, l_1, m_1, n_1, G, H = Polygon(AA2, AA1, 4)
polígono2, p_1, q_1, r_1, s_1, I, J = Polygon(AA3, AA4, 4)
BB1: BB0 - (b_1, 0)
BB3: BB0 + (b_1, 0)
BB2: BB0 - (b_1 + b_2, 0)
BB4: BB0 + (b_1 + b_2, 0)
polígono3, t_1, c_1, d_1, e_1, K, L = Polygon(BB1, BB2, 4)
polígono4, f_2, g_2, h_2, i_2, M, N = Polygon(BB4, BB3, 4)