Llenado de recipiente
Author: M. C. José María Bravo Tapia

Llenado de recipientes

Ángulo de
inclinación

Parámetros

A = (-4.14, -3.22)
a = 3 (slider from 0.2 to 5, step 0.1)
h = 5 (slider from 0.2 to 5, step 0.1)
b = 4 (slider from 0.2 to 5, step 0.1)
B = (20.86, -3.38)
c = Line(A, B)
d = Circle(A, b)
C = Intersect(d, c, 2)
α = 0.8203047484373349 rad (slider from 0 to 90*°, step 0.0174532925199433)
C' = Rotate(C, α, A)
β = Angle(C, A, C')
e = Segment(A, C')
f = OrthogonalLine(A, e)
g = Circle(A, h)
D = Intersect(g, f, 2)
i = OrthogonalLine(D, f)
j = OrthogonalLine(C', i)
E = Intersect(i, j)
F = (12.94, 3.72)
k = Line(A, F)
p = Circle(A, a)
G = Intersect(p, k, 2)
l = Line(G, e)
m = Line(C', k)
H = Intersect(l, m)
n = Segment(A, G)
q = Segment(G, H)
r = Segment(A, D)
s = Segment(D, E)
t = Segment(C', E)
a_1 = Segment(C', H)
b_1 = OrthogonalLine(E, c)
I = Intersect(c, b_1)
h_1 = Segment(I, E)
c_1 = Line(D, n)
d_1 = Line(E, n)
e_1 = Line(G, r)
f_1 = Line(H, r)
J = Intersect(d_1, f_1)
K = Intersect(c_1, e_1)
g_1 = Segment(D, K)
i_1 = Segment(G, K)
j_1 = Segment(K, J)
k_1 = Segment(H, J)
l_1 = Segment(E, J)
m_1 = OrthogonalLine(E, h_1)
L = Point(c)
n_1 = OrthogonalLine(L, c)
M = Intersect(m_1, n_1)
p_1 = Segment(L, M)
N = Point(p_1)
q_1 = OrthogonalLine(N, p_1)
O = Intersect(q_1, e)
P = Intersect(q_1, s)
r_1 = Line(O, n)
s_1 = Line(P, n)
Q = Intersect(r_1, q)
R = Intersect(s_1, j_1)
S = Intersect(q_1, r)
t_1 = Line(S, n)
T = Intersect(t_1, i_1)
U = Intersect(q_1, t)
a_2 = Line(U, n)
V = Intersect(a_2, k_1)
b_2 = Segment(L, N)
polígono1, p_2, o, q_2, r_2 = Polygon(P, O, Q, R)
polígono2, p_3, d_2, a_3, o_1 = Polygon(P, D, A, O)
polígono3, o_2, a_4, g_2, q_3 = Polygon(O, A, G, Q)
polígono4, p_4, u, v, r_3 = Polygon(P, U, V, R)
polígono5, p_5, d_3, a_5, c', u_1 = Polygon(P, D, A, C', U)
polígono6, u_2, c'_1, a_6, g_3, h_2, v_1 = Polygon(U, C', A, G, H, V)
polígono7, s_2, o_3, q_4, t_2 = Polygon(S, O, Q, T)
polígono8, o_4, s_3, a_7 = Polygon(S, A, O)
polígono9, s_4, u_3, v_2, t_3 = Polygon(S, U, V, T)
polígono10, s_5, a_8, c'_2, u_4 = Polygon(S, A, C', U)
polígono11, u_5, c'_3, h_3, v_3 = Polygon(U, C', H, V)
w = false