Ver vectores

Burbujas:

Radio:

Velocidad:

r = 2 (slider from 0.1 to 2, step 0.1)
r1: r - 0.01
E1 = Corner(1)
E2 = Corner(2)
E3 = Corner(3)
E4 = Corner(4)
pol, f, g, h, i = Polygon(E1 + (r1, r1), E2 + ((-r1), r1), E3 - (r1, r1), E4 + (r1, (-r1)))
t = 0.023 (slider from 0 to 1, step 0.001)
A1 = PointIn(pol)
v1 = (0.3417294983656227, -2.378717223458934)
vel = 5 (slider from 1 to 10, step 1)
n = 12 (slider from 1 to 20, step 1)
v2 = (-0.642748666046391, -0.5902385670860666)
v3 = (-1.4490588571379666, 1.5401553253013933)
v4 = (-0.0825402605249308, -3.2139553158679277)
v5 = (-0.1901036605470785, -0.6375697849725097)
v6 = (-2.731344277786575, 1.627625993830303)
v7 = (-1.0152950164308194, -0.7278827383151782)
v8 = (0.2256657369907784, -0.2276444606792356)
v9 = (3.854842241127576, -0.3250074239670968)
v10 = (-0.5953101559840345, 1.1728967348238937)
v11 = (0.9933011793897826, 0.9827698323980438)
v12 = (-0.43352380700892124, -1.2785089625218238)
v13 = (1.73879019883219, -2.0311556396801964)
v14 = (0.4283210059557312, 0.1154213608314052)
v15 = (1.377873306995442, 2.3772651881916205)
v16 = (0.15422417721682802, -2.3119342407622305)
v17 = (-2.3891020132124194, 3.1020849763825833)
v18 = (0.5665800716093623, 1.2397999666837438)
v19 = (1.3512435491739043, -0.12672488477952593)
v20 = (-0.8853091057137839, -1.4836496955817817)
A2 = PointIn(pol)
A3 = PointIn(pol)
A4 = PointIn(pol)
A5 = PointIn(pol)
A6 = PointIn(pol)
A7 = PointIn(pol)
A8 = PointIn(pol)
A9 = PointIn(pol)
A10 = PointIn(pol)
A11 = PointIn(pol)
A12 = PointIn(pol)
A13 = PointIn(pol)
A14 = PointIn(pol)
A15 = PointIn(pol)
A16 = PointIn(pol)
A17 = PointIn(pol)
A18 = PointIn(pol)
A19 = PointIn(pol)
A20 = PointIn(pol)
verVectores = false
C1: A1 - (r, r)
D1: A1 + (r, (-r))
C2: A2 - (r, r)
D2: A2 + (r, (-r))
C3: A3 - (r, r)
D3: A3 + (r, (-r))
C4: A4 - (r, r)
D4: A4 + (r, (-r))
C5: A5 - (r, r)
D5: A5 + (r, (-r))
C6: A6 - (r, r)
D6: A6 + (r, (-r))
C7: A7 - (r, r)
D7: A7 + (r, (-r))
C8: A8 - (r, r)
D8: A8 + (r, (-r))
C9: A9 - (r, r)
D9: A9 + (r, (-r))
C10: A10 - (r, r)
D10: A10 + (r, (-r))
C11: A11 - (r, r)
D11: A11 + (r, (-r))
C12: A12 - (r, r)
D12: A12 + (r, (-r))
C13: A13 - (r, r)
D13: A13 + (r, (-r))
C14: A14 - (r, r)
D14: A14 + (r, (-r))
C15: A15 - (r, r)
D15: A15 + (r, (-r))
C16: A16 - (r, r)
D16: A16 + (r, (-r))
C17: A17 - (r, r)
D17: A17 + (r, (-r))
C18: A18 - (r, r)
D18: A18 + (r, (-r))
C19: A19 - (r, r)
D19: A19 + (r, (-r))
C20: A20 - (r, r)
D20: A20 + (r, (-r))
enerLista: {v1^(2), v2^(2), v3^(2), v4^(2), v5^(2), v6^(2), v7^(2), v8^(2), v9^(2), v10^(2), v11^(2), v12^(2), v13^(2), v14^(2), v15^(2), v16^(2), v17^(2), v18^(2), v19^(2), v20^(2)}
energía = Sum(enerLista, n)
r2: r - 0.04
B1 = Circle(A1, r2)
B3 = Circle(A3, r2)
B4 = Circle(A4, r2)
B5 = Circle(A5, r2)
B6 = Circle(A6, r2)
B7 = Circle(A7, r2)
B8 = Circle(A8, r2)
B2 = Circle(A2, r2)
B9 = Circle(A9, r2)
B10 = Circle(A10, r2)
B11 = Circle(A11, r2)
B12 = Circle(A12, r2)
B13 = Circle(A13, r2)
B14 = Circle(A14, r2)
B15 = Circle(A15, r2)
B16 = Circle(A16, r2)
B17 = Circle(A17, r2)
B18 = Circle(A18, r2)
B19 = Circle(A19, r2)
B20 = Circle(A20, r2)
texto4: "Energía 
total:
" + energía + ""