Una partícula desliza a lo largo de la generatriz de un cono que gira

Movimiento en el cono

Sea un cono de altura h y radio de la base R. Supongamos que se ha hecho una ranura a lo largo del cono, desde el vértice a la base, señalada por la línea de color rojo en la figura.

El cono gira alrededor del eje Z con velocidad angular ω0. Una partícula de masa m se suelta en el vértice deslizando por la ranura sin rozamiento alguno, tal como se indica en la figura. Vamos a estudiar el movimiento de la partícula y del cono y calcularemos la velocidad angular del cono cuando la partícula llege a su base

El momento de inercia del cono macizo alrededor del eje Z es I0=3MR2/10. Siendo M la masa del cono

En el instante t=0, la partícula de masa m se encuentra en el vértice del cono que gira con velocidad angular ω0. El momento angular es I0ω0 y la energía inicial del sistema es

E= 1 2 I 0 ω 0 2

En el instante t, la velocidad angular de rotación alrededor del eje Z del cono es ω. La partícula se ha desplazado x a lo largo de la ranura, su distancia al eje de rotación es xsinθ. Su velocidad tiene dos componentes: una v paralela a la ranura, y otra ωxsinθ correspondiente a la rotación alrededor del eje Z con velocidad angular ω.

Se conserva el momento angular del sistema formado por el cono y la partícula

I 0 ω 0 =( I 0 +m x 2 sin 2 θ )ω

Se conserva la energía (suma de la energía cinética de la partícula, de rotación del cono y la energía potencial correspondiente a una altura xcosθ)

1 2 I 0 ω 0 2 = 1 2 m( v 2 + ω 2 x 2 sin 2 θ )+ 1 2 I 0 ω 2 mgxcosθ

Cuando la partícula llega a la base del cono, xsinθ=R, xcosθ=h, la velocidad angular ω del cono es

ω= I 0 ω 0 I 0 +m R 2

La velocidad final v de la partícula a lo largo de la ranura es

v 2 = I 0 ω 0 2 R 2 I 0 +m R 2 +2gh

Ecuación del movimiento

En el sistema de referencia no inercial en rotación del cono. Las fuerzas que actúan sobre la partícula son:

La ecuación del movimiento a lo largo de la ranura es

m d 2 x d t 2 =mgcosθ+( m ω 2 xsinθ )sinθ d 2 x d t 2 =gcosθ+ ( I 0 ω 0 I 0 +m x 2 sin 2 θ ) 2 x sin 2 θ

El ángulo girado por el cono φ en función del tiempo es

dφ dt = I 0 ω 0 I 0 +m x 2 sin 2 θ

Tenemos que resolver un sistema de dos ecuaciones diferenciales, con las siguientes condiciones iniciales: en el instante t=0, x=0 y dx/dt=0, la partícula parte del vértice del cono en reposo. El ángulo inicial girado por el cono, φ=0

Considermos un cono de masa M=1, altura h=1 y ángulo θ=45°. El cono gira inicialmente con velocidad angular ω0=10 rad/s, cuando la partícula de masa m=0.5 kg se encuentra en el vértice del cono. La partícula empieza a deslizar sin rozamiento por la ranura. Representamos el cono y la trayectoria de la partícula sobre su suerficie, resolviendo el sistema de dos ecuaciones diferenciales mediante la función ode45 de MATLAB

theta=pi/4; %ángulo del cono
h=1;  %altura del cono
I0=3*h^2*tan(theta)^2/10; %momento de inercia del cono, M=1
m=0.5; %masa partícula
w0=10; %velocidad angular inicial de rotación

opts=odeset('events',@(t,x) cono_gira_ode45(t,x,h,theta));
fg=@(t,x)[x(2); 9.8*cos(theta)+x(1)*sin(theta)^2*
(I0*w0/(I0+m*x(1)^2*sin(theta)^2))^2; I0*w0/(I0+m*x(1)^2*sin(theta)^2)];
[t,x]=ode45(fg,[0,10],[0,0,0], opts);
xp=x(:,1).*cos(x(:,3))*sin(theta);
yp=x(:,1).*sin(x(:,3))*sin(theta);
zp=h-x(:,1)*cos(theta);
fprintf('tiempo: %1.2f, velocidad angular: %1.2f, velocidad partícula: 
%1.2f\n',t(end),I0*w0/(I0+m*x(end,1)^2*sin(theta)^2),x(end,2))

hold on
view(250,30)
%superficie cónica
phi=linspace(0,2*pi,40);
r=linspace(0,h/cos(theta));
[phi,r]=meshgrid(phi,r);
x=r.*cos(phi)*sin(theta);
y=r.*sin(phi)*sin(theta);
z=h-r*cos(theta);
h1=mesh(x,y,z);
set(h1,'EdgeColor',[0.6,0.6,0.6], 'FaceAlpha',0.5,'EdgeAlpha',0.5)

%trayectoria
h1=line(xp,yp,zp);
set(h1,'Color',[.7,0,0],'LineWidth',1.5)
 
hold off
grid on
xlabel('x')
ylabel('y')
zlabel('z')
title('Movimiento en una superficie cónica')

Cuando la partícula llega a la base del cono

tiempo: 0.47, velocidad angular: 3.75, velocidad partícula: 7.56

Definimos una función para que interrumpa el proceso de integración cuando la partícula llegue a la base del cono x=h/cosθ

function [detect,stopin,direction]=cono_gira_ode45(~,x, h, theta)
    detect=x(1)-h/cos(theta); 
    stopin=1;
    direction=1; 
end

Actividades

Se introduce

Observamos el movimiento de la partícula sobre la superficie del cono

En la parte izquierda se proporcionan los datos de

Movimiento en la esfera

Una esfera de masa M y radio R gira alrededor de un eje fijo Z con velocidad angular ω0. Una partícula de masa m se desplaza con velocidad v constante a lo largo de un meridiano.

En el instante inicial t=0, la partícula se encuentra en el polo norte θ=0, cuando la velocidad angular de rotación de la esfera es ω0.

Vamos a calcular el ángulo de girado por la esfera φ, cuando la partícula llega al polo Sur, θ

Aplicamos el principio de conservación del momento angular

( 2 5 M R 2 ) ω 0 =( 2 5 M R 2 +m d 2 )ω

La distancia de la partícula al eje de rotación es d=Rsinθ. La velocidad angular de rotación ω=dφ/dt. En el instante t la partícula se encuentra sobre el meridiano en la posición Rθ=v·t.

ω= 2 2+5 m M sin 2 θ ω 0

Representamos la velocidad angular de rotación ω para m/M=1/2 y ω0=1

w0=1; %velocidad angular inicial de rotación
m_M=1/2; %relación entre masas
w=@(x) 2*w0./(2+5*m_M*sin(x).^2);
fplot(w,[0,pi])
grid on
set(gca,'XTick',0:pi/6:pi)
set(gca,'XTickLabel',{'0','\pi/6','\pi/3','\pi/2','2\pi/3','5\pi/6','\pi'})
xlabel('\theta')
ylabel('\omega')
title('Velocidad angular de rotación')

El momento de inercia es máximo en el ecuador θ=π/2 y mínimo en los polos, θ=0, π. La velocidad angular de rotación ω le ocurre la inversa, es máxima en los polos y mínima en el ecuador

La conservación del momento angular se escribe

2 5 M ω 0 =( 2 5 M+m sin 2 ( vt R ) ) dφ dt

La partícula llega al polo sur θ=π en el instante T=πR/v. El ángulo girado φ por la esfera es

φ= 0 T 2 ω 0 2+5 m M sin 2 ( vt R ) dt

Hacemos el cambio de variable

x= 2vt R ,dx= 2v R dt φ= R ω 0 v 0 2π dx 2+5 m M sin 2 ( x 2 )

Empleamos la relación trigonométrica

cosx= cos 2 ( x 2 ) sin 2 ( x 2 )=12 sin 2 ( x 2 ) φ= R ω 0 v 0 2π dx 2+5 m M ( 1cosx 2 ) = R ω 0 v 0 2π dx ( 2+ 5 2 m M ) 5 2 m M cosx

Efectuamos un nuevo cambio de variable para calcular la integral

dx abcosx tan( x 2 )=t, 1 2 dx cos 2 ( x 2 ) =dt,( 1+ tan 2 ( x 2 ) )dx=dt,dx= 2dt 1+ t 2 cosx= cos 2 ( x 2 ) sin 2 ( x 2 )= 1 1+ t 2 t 2 1+ t 2 = 1 t 2 1+ t 2 2dt 1+ t 2 ab 1 t 2 1+ t 2 = 2dt a( 1+ t 2 )b( 1 t 2 ) = 2dt ( a+b ) t 2 +( ab ) = 2 a+b dt t 2 + ab a+b ,a>b = 2 a+b 1 ab a+b arctan( t ab a+b )= 2 a 2 b 2 arctan( t a+b ab )= 2 a 2 b 2 arctan( a+b ab tan( x 2 ) )

La integral definida es

0 2π dx abcosx = 2 a 2 b 2 { arctan( a+b ab tanπ )arctan( a+b ab tan0 ) }= 2π a 2 b 2

No parece muy claro que el resultado entre las llaves sea π, por lo que representamos el integrando para m/M=1/2, es decir, para a=13/4 y b=5/4. Comparamos el resultado obtenido con la integración por el procedimiento numérico integral de MATLAB

%m/M=1/2; %relación entre masas
a=13/4;
b=5/4;
f=@(x) 1./(a-b*cos(x));
fplot(f,[0,2*pi])
grid on
set(gca,'XTick',0:pi/4:2*pi)
set(gca,'XTickLabel',{'0','\pi/4','\pi/2','3\pi/4','\pi',
'5\pi/4','3\pi/2','7\pi/4','2\pi'})
xlabel('\theta')
ylabel('f(\theta)')
title('Integral')

>> integral(f,0,2*pi)
ans =    2.0944
>> 2*pi/sqrt(a^2-b^2)
ans =   2.0944

Los resultados coinciden

Finalmente, el ángulo girado φ por la esfera alrededor del eje Z, cuando la partícula se mueve a lo largo de un meridiano partiendo del polo norte y llegando al sur

φ= R ω 0 v 0 2π dx ( 2+ 5 2 m M ) 5 2 m M cosx = R ω 0 v 2π ( 2+ 5 2 m M ) 2 ( 5 2 m M ) 2 φ= R ω 0 v 2π 4+10 m M = πR ω 0 v 2M 2M+5m

Trayectoria de a partícula en el Sistema Inercial

La trayectoria de la partícula en el Sistema de Referencia en rotación es media circunferencia (un meridiano)

Vamos a representar la trayectoria vista por un observador inercial, fuera de la esfera. Partimos del resultado

0 x dx abcosx = 2 a 2 b 2 { arctan( a+b ab tan( x 2 ) )arctan( a+b ab tan0 ) } = 2 a 2 b 2 { arctan( a+b ab tan( x 2 ) ) },x= 2vt R

El ángulo girado φ en el instante t es

φ(t)= R ω 0 v 0 x dx abcosx = R ω 0 v 2 a 2 b 2 { arctan( a+b ab tan( vt R ) ) }

Representamos la trayectoria para

En color negro, la posición inicial del meridiano y en azul la final, el ángulo girado por la esfera es φ=2.0944·180/π=120°

%m/M=1/2; %relación entre masas
a=13/4;
b=5/4;
R=1; %radio esfera
w0=1; %velocidad angular inicial de rotación
v=1; %velocidad partícula
T=pi*R/v; %tiempo de viaje
tt=linspace(0,T,100);
phi=zeros(1,length(tt));
k=1;
f=@(x) 1./(a-b*cos(x));
for t=tt
    temp=atan(sqrt((a+b)/(a-b))*tan(v*t/R));
   if temp<0
       temp=pi+temp;
   end
    phi(k)=R*w0*2*temp/(v*sqrt(a^2-b^2));
     temp1=(R*w0/v)*integral(f,0,2*v*t/R);
     disp([phi(k), temp1])
     k=k+1;
end
th=v*tt/R;
xp=R*sin(th).*cos(phi);
yp=R*sin(th).*sin(phi);
zp=R*cos(th);
desplaza=phi(end);

%esfera
theta=linspace(0,pi,30);
phi=linspace(0,2*pi,40);
[theta, phi]=meshgrid(theta,phi);
x=R*sin(theta).*cos(phi);
y=R*sin(theta).*sin(phi);
z=R*cos(theta);
hold on
h1=mesh(x,y,z);
set(h1,'EdgeColor',[0.6,0.6,0.6],'EdgeAlpha',0.5,'FaceAlpha',0.5)
%meridianos inicial y final
theta=linspace(0,pi,30);
x=R*sin(theta);
y=zeros(1, length(x));
z=R*cos(theta);
h1=line(x,y,z);
set(h1,'Color','k','LineWidth',1.5)
x=R*sin(theta).*cos(desplaza);
y=R*sin(theta).*sin(desplaza);
z=R*cos(theta);
h1=line(x,y,z);
set(h1,'Color','b','LineWidth',1.5)

%trayectoria
 h1=line(xp,yp,zp);
set(h1,'Color',[.9,0,0],'LineWidth',1.5)
axis equal
hold off
axis equal
grid on
xlabel('x')
ylabel('y')
zlabel('z')
title('Movimiento en la superficie de una esfera')
view (-170,10)

Referencias

Lim Yung-kuo. Problems and Solutions on Mechanics. World Scientific (1994). Problem 1174, pp. 283-284

Sidney B. Cahn, Boris E. Nadgorny. A guide to physics problems, part 1. Mechanics, Relativity, and Electrodynamics.. Kluwer Academic Publishers, 2004. Problem 1.40