Construcción de un cilindro hidráulico

Diagrama que expone la construcción geométrica de un cilindro hidráulico.
En la parte superior tenemos el cilindro independiente.

NO

C determina la inclinación de
la barra con un extremo en B.

Construcción de un cilindro hidráulico
para inclinar una barra que tiene un
extremo en B con un cilindro sujeto a A
y a un punto C de la barra.

C es el punto de intersección
de dos circunferencias.

Animación

Activa la animación.

Cilindro hidráulico

NO

NO

SI

SI

Segmento que une A
con C y D.

Los segmentos representan
el cilindro y el émbolo.

Mueve B y B'

q = 1.6499 (slider from 0 to md, step 1.0E-4)
a = 3.3092271247461906 (slider from dd to 4, step 1.0E-4)
A = (-1, -3)
C = (-3, -0.9999999999999999)
dd = Distance(A, C)
b = 3.7 (slider from 2 to 5, step 0.1)
d = Circle(C, b)
g = Segment(C, A)
ch = 8 (slider from 0 to 8, step 1)
K = Point(yAxis)
L = Point(yAxis)
M = (-4, -4)
N = (-4, -1)
polígono1, b_2, a_2, k_1, l_1, m_1, n_1 = Polygon(C, A, K, L, M, N)
a1 = 2.2 (slider from -5 to 5, step 1)
b1: 1.2
c1: 1.2
l = 1 (slider from 0 to 1, step 1)
e = Circle(A, a + q)
c = Circle(A, a)
B = Intersect(d, e, 1)
f = Ray(C, B)
c_1 = Circle(A, a)
h = Segment(A, B)
D = Intersect(c_1, h, 1)
k = Circle(C, 8)
i = Segment(A, D)
j = Segment(D, B)
E = Intersect(k, f, 1)
m = Segment(C, E)
n = Segment(B, A)
df = Min(b, dd)
texto6: "Paso de construcción " + ch + ""
ve = If(ch ≥ 8, 1, 0)
A' = (-1, 3)
G = (7, 3)
p = Line(A', G)
dd2: b + dd - a
r = Circle(A', a)
D' = Intersect(r, p, 2)
s = Circle(D', q)
B' = Intersect(s, p, 2)
t = Segment(A', D')
a_1 = Segment(D', B')
md = Min(b + dd - a, a)
v = 0 (slider from 0 to 1, step 1)
o = 0 (slider from -5 to 5, step 0.1)
d_1 = Circle(A', D')
e_1 = Circle(A', B')
F = (-4.539926381586872, 3.342247661831703)
texto6a: "Distancia del punto de apoyo al
extremo de la barra d(B,C) = " + b + ""
aq: a + q
texto1: "Longitud del cilindro
Mínima long. = d(A,B) = " + dd + ""
texto6c: "Suma de longitudes del cilindro
y el émbolo = " + aq + "
Long. émbolo  l≤" + dd2 + " y l≤" + a + ""
f_1 = Segment(B, C)
texto7c: "  CB = " + b + ""
g_1 = Segment(C, B)
texto7e: "Cilindro AD = " + a + ""
da = Distance(A, C)
texto7g: "Émbolo DB = " + q + ""
ac = Distance(A, C)
texto2: "AC= " + ac + ""
nada = -0.2 (slider from -5 to 5, step 0.1)