Una varilla vertical penetra en el agua

Una varilla en posición vertical de longitud l y sección S hecha de un material de densidad ρ, penetra en el agua de densidad ρf con velocidad inicial v0, tal como se muestra en la figura. Supondremos que la densidad de la varilla es mayor que la del agua

Vamos a estudiar el movimiento de la varilla, suponiendo que el medio ejerce una fuerza de rozamiento proporcional a la velocidad

Las fuerzas que actúan sobre la varilla son:

La varilla está parcialmente sumergida x<l

Sea x la posición del extremo inferior de la varilla. Estudiamos el movimiento de la varilla parcialmente sumergida, x<l

m d 2 x d t 2 =mg( ρ f Sx )gk dx dt d 2 x d t 2 + k m dx dt + ρ f ρ g x l =g

La ecuación característica tiene dos raíces reales negativas

r 2 + k m r+ ρ f ρ g l =0 r 1 = k m + k 2 m 2 4 ρ f ρ g l 2 , r 2 = k m k 2 m 2 4 ρ f ρ g l 2

La solución de la ecuación diferencial homogénea es

x h = A 1 exp( r 1 t )+ B 1 exp( r 2 t )

La solución particular es una cosntante C tal que

ρ f ρ g C l =g C= ρ ρ f l

La solución completa es la suma de las dos

x= A 1 exp( r 1 t )+ B 1 exp( r 2 t )+ ρ ρ f l dx dt = r 1 A 1 exp( r 1 t )+ r 2 B 1 exp( r 2 t )

Los coeficientes A1 y B1 se determinan a partir de las condiciones iniciales, en el instante t=0, la posición del extremo inferior de la varilla es x=0 y su velocidad es dx/dt=v0

{ 0= A 1 + B 1 + ρ ρ f l v 0 = r 1 A 1 + r 2 B 1 A 1 = v 0 + r 2 ρ ρ f l r 1 r 2 , B 1 = v 0 + r 1 ρ ρ f l r 1 r 2

La varilla está completamente sumergida x=l en el instante t0, raíz de la ecuación transcendente

l= A 1 exp( r 1 t )+ B 1 exp( r 2 t )+ ρ ρ f l ( 1 ρ ρ f )l= A 1 exp( r 1 t )+ B 1 exp( r 2 t )

En dicho instante la velocidad de la varilla es

v 01 = r 1 A 1 exp( r 1 t 0 )+ r 2 B 1 exp( r 2 t 0 )

La varilla está completamente sumergida x>l

La ecuación del movimiento es ahora

m d 2 x d t 2 =mg( ρ f Sl )gk dx dt d 2 x d t 2 + k m dx dt =g( 1 ρ f ρ )

La ecuación característica tiene dos raíces reales

r 2 + k m r=0 r 1 =0, r 2 = k m

La solución de la ecuación diferencial homogénea es

x h = A 2 + B 2 exp( r 2 ( t t 0 ) )

La solución particular ya no es una constante, sino C(t-t0), introduciendo en la ecuación diferencial

k m C=g( 1 ρ f ρ ) C=( 1 ρ f ρ ) mg k

La solución completa para t>t0 es

x= A 2 + B 2 exp( r 2 ( t t 0 ) )+( 1 ρ f ρ ) mg k ( t t 0 ) dx dt = B 2 r 2 exp( r 2 ( t t 0 ) )+( 1 ρ f ρ ) mg k

Los coeficientes A2 y B2 se determinan a partir de las condiciones iniciales, en el instante t=t0, la posición del extremo inferior de la varilla es x=l y su velocidad es dx/dt=v01

{ l= A 2 + B 2 v 01 = B 2 r 2 +( 1 ρ f ρ ) mg k B 2 = v 01 ( 1 ρ f ρ ) mg k r 2 =, A 2 =l B 2

Como la raíz r2 es negativa, la velocidad final tiende a

v =( 1 ρ f ρ ) mg k

La velocidad final es independiente de la inicial v0

Ejemplos

Los datos son los siguientes

Representamos la velocidad de la varilla en función del tiempo, calculando el instante t0 mediante la fzero de MATLAB y representándolo mediante una línea vertical a trazos.

k=1;
rho_f=1000; %densidad del agua
rho=2000; %densidad varilla
S=1e-4; %sección varilla
l=2; %longitud varilla
m=rho*S*l; %masa de la varilla
dis=sqrt(k^2/m^2-4*rho_f*9.8/(rho*l)); %discriminante

hold on
for v0=[0,4]
     %primera etapa
    r1=(-k/m+dis)/2; %raíces de la ecuación característica
    r2=(-k/m-dis)/2;
    A1=(v0+r2*rho*l/rho_f)/(r1-r2); %coeficientes
    B1=-(v0+r1*rho*l/rho_f)/(r1-r2);
    x=@(t) A1*exp(r1*t)+B1*exp(r2*t)+rho*l/rho_f;
    f=@(t) x(t)-l;
    t0=fzero(f,[0,10]); %instante completamente sumergida
    v=@(t) A1*r1*exp(r1*t)+B1*r2*exp(r2*t);
    v0_1=v(t0);
    
    %segunda etapa
    r2=-k/m; %raíz de la ecuación acaracterística
    B2=(v0_1-(1-rho_f/rho)*m*9.8/k)/r2; %coeficientes
    A2=l-B2;
    
    %x1=@(t) A2+B2*exp(r2*(t-t0))+(1-rho_f/rho)*m*9.8*(t-t0)/k;
    v1=@(t) B2*r2*exp(r2*(t-t0))+(1-rho_f/rho)*m*9.8/k;
    line([t0,t0],[0,v(t0)],'lineStyle','--')
    fplot(v,[0,t0])
    fplot(v1,[t0, 5])
end
hold off
grid on
xlabel('t (s)')
ylabel('v (m/s)')
title('Velocidad')

La velocidad límite constante v, independiente de la velocidad inicial es

>> (1-rho_f/rho)*m*9.8/k
ans =   1.9600

Representamos la posición x del extremo inferior de la varilla

k=1;
rho_f=1000; %densidad del agua
rho=2000; %densidad varilla
S=1e-4; %sección varilla
l=2; %longitud varilla
m=rho*S*l; %masa de la varilla
dis=sqrt(k^2/m^2-4*rho_f*9.8/(rho*l)); %discriminante
 
hold on
for v0=[0,4]
     %primera etapa
    r1=(-k/m+dis)/2; %raíces de la ecuación característica
    r2=(-k/m-dis)/2;
    A1=(v0+r2*rho*l/rho_f)/(r1-r2); %coeficientes
    B1=-(v0+r1*rho*l/rho_f)/(r1-r2);  
    x=@(t) A1*exp(r1*t)+B1*exp(r2*t)+rho*l/rho_f;
    f=@(t) x(t)-l;
    t0=fzero(f,[0,10]); %instante completamente sumergida
    v0_1=r1*A1*exp(r1*t0)+r2*B1*exp(r2*t0);
    
    %segunda etapa
    r2=-k/m; %raíz de la ecuación acaracterística
    B2=(v0_1-(1-rho_f/rho)*m*9.8/k)/r2; %coeficientes
    A2=l-B2;
    
    x1=@(t) A2+B2*exp(r2*(t-t0))+(1-rho_f/rho)*m*9.8*(t-t0)/k;
    line([t0,t0],[0,x(t0)],'lineStyle','--')
    fplot(x,[0,t0])
    fplot(x1,[t0, 3])
end
hold off
grid on
xlabel('t (s)')
ylabel('x (m)')
title('Posición')

Referencias

HANG Yu-feng, XIE Dong, WEI Xiang-zhong, SHANGGUAN Wang-zuo. Analytical calculation and numerical simulation of the dynamics of water-entry of a slender rod. College Physics. Volume 43, Issue 01, March 2024