Ver vectores

Añadir carga

t0: {0, 0, 0}
t1: {0, 0, 0}
t: ((t1(3) < t0(3)) * 3600) + ((t1(3) - t0(3)) * 60) + t1(2) - t0(2) + (t1(1) - t0(1)) / 1000
g: (0, -9.81)
A = (3.9, 23.1)
B = (107.9, 16.2)
c1 = Ellipse(A, B, B + (2 * (B - A) / abs(B - A)))
M1 = Point(c1)
tt = 209
dt = 0.025
anima = 0 (slider from 0 to 1, step 0.001)
i1 = Tangent(M1, c1)
n1 = UnitVector(i1)
gt1: (((g * n1)) * n1)
j1 = Segment(M1 + g, M1 + gt1)
v1 = (0, 0)
vt1: ((sgn((v1 * n1)) * abs(v1)) * n1)
C1 = Point(c1)
tirolina = PolyLine(A, M1, B)
reg1: {(5.26167601809081, 17.68919251188505)}
pol1 = PolyLine(reg1)
c2 = Circle(M1, 4)
M2 = Point(c2)
f = Segment(M1, M2)
C2 = (3.110692653106716, 14.31676451953863)
i2 = Tangent(M2, c2)
n2 = UnitVector(i2)
v2 = (0, 0)
vt2: ((sgn((v2 * n2)) * abs(v2)) * n2)
reg2: {(3.110692653106716, 14.31676451953863)}
pol2 = PolyLine(reg2)
gt2: (((g * n2)) * n2)
j2 = Segment(M2 + g, M2 + gt2)
verVectores = true
verCarga = false
vMax1 = 0
vMax2 = 0
M1': M1
texto1: "Velocidad máxima: " + vMax1 + " m/s "
texto2: "Velocidad máxima
de la carga: " + vMax2 + " m/s"