Tres masas en un triángulo

Un sólido rígido está formado por tres masas: una 5m, situada en O(0,0,0), una 4m, en A(3b,0,0) y una 3m, en B(0,4b,0).

  1. ¿En qué posición se encuentra el centro de masas del sistema?
  2. ¿Cuánto vale el tensor de inercia de este sólido respecto a unos ejes paralelos a OX, OY y OZ, por el centro de masas?
  3. Si el sólido está girando en torno a un eje que pasa por el CM y con velocidad angular , calcule cuánto valen
    1. su momento cinético respecto a G.
    2. su momento cinético respecto a O.
    3. su energía cinética.

Nota

Todas las velocidades se refieren al movimiento {21}, por lo que se omiten los subíndices.

Centro de masas

La posición del CM es la media ponderada de las posiciones de las tres masas

Tensor de inercia

Para hallar el tensor de inercia tenemos dos caminos.

  • Directamente mediante las posiciones de las tres partículas respecto a los nuevos ejes.
  • Hallando primero el tensor respecto a unos ejes por O y posteriormente aplicar el teorema de Steiner.

Veámoslo de las dos formas.

Directamente

La posición de las tres masas respecto al CM es, para O

para A

y para B

Aplicamos ahora la definición de tensor de inercia

queda para la masa de O, de valor 5m

Para la de A, de valor 4m

y para la de C, de valor 3m

Sumando los tres tensores

Este sería el código que lo hace en Mathematica (muy poco optimizado, pero para que se entienda mejor)

J[m_, P_] := m (P . P IdentityMatrix[3] - KroneckerProduct[P, P])

lm = {5 m, 4 m, 3 m}

mT = Sum[lm[[i]], {i, 3}]

OP = {{0, 0, 0}, {3 b, 0, 0}, {0, 4 b, 0}}

OG = Sum[lm[[i]] OP[[i]], {i, 3}]/mT

GP = Table[OP[[i]] - OG, {i, 3}]

IG = Sum[J[lm[[i]], GP[[i]]], {i, 3}]

MatrixForm[IG]

Mediante el teorema de Steiner

Si consideramos las posiciones respecto a los ejes de la figura, los tensores de inercia de cada masa resultan mucho más simples, por estar sobre los ejes.

Para la masa de O, de valor 5m

Para la de A, de valor 4m

y para la de C, de valor 3m

Sumando los tres tensores

Por el teorema de Steiner, este tensor cumple

lo que nos da

Despejamos y queda

El código para este cálculo sería

J[m_, P_] := m (P . P IdentityMatrix[3] - KroneckerProduct[P, P])

lm = {5 m, 4 m, 3 m}

mT = Sum[lm[[i]], {i, 3}]

OP = {{0, 0, 0}, {3 b, 0, 0}, {0, 4 b, 0}}

OG = Sum[lm[[i]] OP[[i]], {i, 3}]/mT

IO = Sum[J[lm[[i]], OP[[i]]], {i, 3}]

IG = IO - J[mT, OG]

MatrixForm[IG]

Estado de rotación

Momento cinético respecto a G

El momento cinético se calcula como

lo que nos da

o en forma vectorial

Momento cinético respecto a O

Por el teorema de König

Una forma de hallar el momento cinético respecto a O es mediante el teorema de König

siendo la velocidad del CM

Por tanto, vale

El código correspondería a añadir, tras las líneas de códigon anteriores

ω = Ω {1, 1, 1}

LG = IG . ω

vG = ω × OG

LO = mT OG × vG + LG

Directamente

En este caso, el punto O es fijo por hallarse en el eje de rotación. Por tanto, es mucho más fácil hallar el momento cinético directamente como

lo que nos da

que queda, en forma vectorial

Energía cinética

Directamente

De nuevo, por ser O un punto fijo

lo que nos da

Por el teorema de König

En general, tanto si O es fijo como si no podemos recurrir al teorema de König

siendo la energía cinética de traslación

y la de rotación

lo que da el total