Ecuaciones de Navier-Stokes. Estado transitorio (I)

Coordenadas rectangulares

Empezamos con las ecuaciones de Navier-Stokes en coordenadas rectangulares en dos dimensiones

u x x + u y y =0 { ρ f ( u x t + u x u x x + u y u x y )= p x + ρ f g x +η( 2 u x x 2 + 2 u x y 2 ) ρ f ( u y t + u x u y x + u y u y y )= p y + ρ f g y +η( 2 u y x 2 + 2 u y y 2 )

Fluido sobre una placa plana

Una placa indefinida soporta un fluido de altura infinita. En el instante inicial t=0, se pone en movimiento con velocidad v cuya dirección es el eje X. Vamos a determinar como evlouciona el perfil ux(y, t) de velocidades del fluido

Como la componente uy y sus derivadas son nulas, las ecuaciones de Navier-Stokes se simplifican

u x x =0 { ρ f u x t =η 2 u x y 2 0= p y + ρ f g

La ecuación de continuidad nos indica que ux no depende de x. La presión p no depende de x

Resolvemos la ecuación diferencial

u x t =υ 2 u x y 2 ,υ= η ρ f

Con las condiciones iniciales, en el instante t=0, ux(y)=0, 0≤y<∞. El fluido parte del reposo

y las condiciones de contorno para t>0

Haciendo el cambio de variable

z= y 2 υt u x y = u x z z y = u x z 1 2 υt 2 u x y 2 = y ( u x y )= z ( u x z 1 2 υt ) z y = 1 4υt 2 u x z 2 u x t = u x z z t = y 4t υt u x z = z 2t u x z

Sustituyendo en la ecuación diferencial

2 u x z 2 +2z u x z =0

Integramos la derivada primera s de ux

s= d u x dz ds dz +2zs=0 ds s =2z·dz lns= z 2 +ln c 1 ln s c 1 = z 2 d u x dz = c 1 exp( z 2 )

Integramos de nuevo, sabiendo que para y=0, ux=v

0 u x d u x = c 1 0 z exp( z 2 )dz u x v= c 1 0 z exp( z 2 )dz

Determinamos la constante c1 con la condición de contorno y→∞, ux→0

0v= c 1 0 exp( z 2 )dz v= c 1 π 2 , c 1 =v 2 π u x =v( 1 2 π 0 z exp( z 2 )dz )=v( 1erf(z) )=v·erfc( y 2 υt )

erf es la función error. Al final de la página titulada Integrales se justifica el resultado de la integral exp(-z2) entre 0 e ∞

El perfil de velocidades en el instante t es

Representamos el perfil las velocidades de ux/v para los instantes k=tν=4,1,0.25, 0.062, 0.0025

old on
for k=[4,1,0.25,0.062, 0.0025]
    fplot(@(y) erfc(y/(2*sqrt(k))),[0,3],'displayName',num2str(k))
end
hold off
grid on
legend('-DynamicLegend','location','best')
xlabel('y')
ylabel('u_x/v')
title('Perfil de velocidades')

Placa oscilante

Una placa indefinida soporta un fluido de altura infinita. En el instante inicial t=0, se pone en movimiento oscilatorio con velocidad vcos(ωt) cuya dirección es el eje X. Vamos a determinar como evlouciona el perfil ux(y, t) de velocidades del fluido

Resolvemos la ecuación diferencial

u x t =υ 2 u x y 2 ,υ= η ρ f

con las condiciones de contorno siguientes

{ u x (0,t)=vcos( ωt ),y=0,t>0 u x (,t)=0,y=,t0

>

Probamos una solución de variables separadas, una que depende de y y otra del tiempo t

u x (y,t)=[ Y(y)exp( iωt ) ]

El símbolo , indica la parte real del número complejo

Introducimos la solución en la ecuación diferencial en derivadas parciales, obtenemos una ecuación diferencial en Y(y) cuya solución es

d 2 Y d y 2 iω υ Y=0 Y(y)= c 1 exp( iω υ y )+ c 2 exp( iω υ y )

Los coeficientes c1 y c2 se determinan a partir de las condiciones de contorno.

Cuando y→∞, Y(y)→∞, por lo que c1 tiene que ser cero

Y(y)= c 2 exp( iω υ y ) i =exp( i π 4 )= 1 2 ( 1+i ) Y(y)= c 2 exp( ω 2υ ( 1+i )y )

La solución de la ecuación diferencial en derivadas parciales es

u x (y,t)=[ c 2 exp( ω 2υ ( 1+i )y )exp( iωt ) ]= c 2 [ exp( ω 2υ y )exp( i( ωt ω 2υ y ) ) ]= c 2 exp( ω 2υ y )cos( ωt ω 2υ y )

La condición de contorno en y=0 determina el coeficiente c2

u x (0,t)=vcos( ωt )= c 2 cos( ωt ) c 2 =v u x (y,t)=vexp( ω 2υ y )cos( ωt ω 2υ y )

Se trata de la ecuación de un movimiento ondulatorio armónico

Actividades

Se pulsa el botón titulado Nuevo para observar cómo cambia el perfil de velocidades con el tiempo

Fluido entre dos placas planas y paralelas (I)

Situamos el fluido entre dos placas planas y paralelas, distantes h. En el instante t=0, la placa inferior se pone en movimiento con velocidad V cuya dirección es el eje X

Resolvemos la ecuación diferencial

u x t =υ 2 u x y 2 ,υ= η ρ f

Con las condiciones iniciales, en el instante t=0, ux(y,0)=0, 0≤yh. El fluido parte del reposo

y las condiciones de contorno para t>0

Ya hemos estudiado la solución en el estado estacionario, que repetimos

Estado estacionario

2 u x y 2 =0

Integramos dos veces

u x y = c 1 u x = c 1 y+ c 2

Determinamos las constantes c1 y c2 con las condiciones de contorno

{ v= c 2 0= c 1 h+ c 2 u x (y,)= V h y+V=V( 1 y h )

El perfil de velocidades ux(y) es lineal en el estado estacionario

El perfil de velocidades en el instante t, ux(y,t) es la suma del perfil en el estado estacionario y en el estado transitorio

u x (y,t)=V( 1 y h ) u x t (y,t)

Introducimos esta expresión en la ecuación diferencial para obtener la correspondiente al estado transitorio

u x t t =υ 2 u x t y 2

Resolvemos esta ecuación diferencial en derivadas paraciales con las condiciones de contorno e inicial, siguientes

{ u x t (0,t)=0,y=0,t>0 u x t (h,t)=0,y=h,t0 u x t (y,0)=V( 1 y h ),0yh,t=0

Variables separadas

Expresamos la solución de la ecuación diferencial como producto de dos funciones una que depende de la variable y y otra que depende de la variable t

u x t (y,t)=Y(y)T(t) 1 υT dT dt = 1 Y d 2 Y d y 2

El miembro izquierdo, solamente depende de t y el derecho solamente de y. Transformamos una ecuación diferencial en derivadas parciales en un sistema de dos ecuaciones diferenciales

{ 1 υT dT dt = α 2 h 2 1 Y d 2 Y d y 2 = α 2 h 2 { dT dt + α 2 υ h 2 T=0 d 2 Y d y 2 + α 2 h 2 Y=0

Las soluciones de las ecuaciones diferenciales son

T(t)= c 0 exp( α 2 υ h 2 t ) Y(y)= c 1 sin( α h y )+ c 2 cos( α h y )

Los coeficientes c1 y c2 se determinan a partir de las condiciones de contorno

{ u x t (0,t)=Y(0)T(t)=0,Y(0)=0 u x t (h,t)=Y(h)T(t)=0,Y(h)=0 c 2 =0,sin( α h h )=0,α=kπ,k=1,2,...

La solución de la ecuación diferencial enderivadas parciales, es la superposición

u x t (y,t)= k=1 B k sin( α k y h ) exp( α k 2 h 2 υt ) u x t (y,t)= k=1 B k sin( kπ y h ) exp( k 2 π 2 h 2 υt )

Las constantes Bk se determinan a partir de la condición inicial

u x t (y,0)=V( 1 y h ) V( 1 y h )= k=1 B k sin( kπ y h )

Teniendo en cuenta el resultado

0 1 sin( mπx ) sin( nπx )={ 1 2 ,m=n 0,mn

>> syms m n z;
>> assume(m,'integer')
>> assume(n,'integer')
>> y=int(sin(m*pi*z)*sin(n*pi*z), z,0,1)
y =-(m*cos(pi*m)*sin(pi*n) - n*cos(pi*n)*sin(pi*m))/(pi*(m^2 - n^2))
>> limit(y,m,n)
ans =cos(pi*n)^2/2

Los coeficientes Bk

k=1 B k 0 h sin( kπ y h )sin( nπ y h ) dy= 0 h V( 1 y h )sin( nπ y h )dy

Resolvemos las integrales, haciendo el cambio de variable z=y/h. Integramos por partes la segunda

B k h 0 1 sin 2 ( kπz ) dz=Vh 0 1 ( 1z )sin( kπz )dz ,{ u=1z,du=dz dv=sin( kπz )dz,v= cos( kπz ) kπ 1 2 B k =V { (1z)cos( kπz ) kπ sin( kπz ) k 2 π 2 } | 0 1 B k = 2V kπ

El resultado final es la suma del estado estacionario y el estado transitorio

u x (y,t)=V( 1 y h ) 2V π k=1 1 k sin( kπ y h ) exp( k 2 π 2 h 2 υt )

Representamos ux(y,t)/V en los instantes t=0.0001, 0.001, 0.01, 0.1, 1. Tomamos los 150 primeros términos del desarrollo en serie

yy=linspace(0,1, 200);
ux=zeros(length(yy),1);
hold on
for t=[0.0001,0.001 ,0.01,0.1,1]
    i=0;
    for y=yy
        i=i+1;
        ux(i)=1-y;
        for k=1:150
            ux(i)=ux(i)-2*sin(k*pi*y)*exp(-k^2*pi^2*t)/(pi*k);
        end
    end
    plot(ux,yy,'displayName',num2str(t))
end  
hold off
grid on
legend('-DynamicLegend','location','best')
xlabel('u_x/v')
ylabel('y/h')
title('Perfil de velocidades')

Para t=1, se ha establecido el perfil casi lineal de las velocidades del fluido, se está muy próximo al estado estacionario

Comparando esta figura con la de la primer apartado, vemos que la presencia del la plano paralelo en y=h no afecta al prefil de velocidades del fluido al principio

Actividades

Se pulsa el botón titulado Nuevo para observar el estado transitorio y su evolución hacia el estado estacionario

Fluido entre dos placas planas y paralelas (II)

Situamos el fluido entre dos placas planas y paralelas, distantes h. En el instante t=0, se establece un gradiente de presión a lo largo del eje X,

p x = p 2 p 1 x 2 x 1 = Δp l

Para determinar el perfil de velocidades ux(y,t), resolvemos la ecuación diferencial

ρ f u x t = Δp l +η 2 u x y 2

Con las condicones de contorno e inicial

{ u x (0,t)=0,y=0,t>0 u x (h,t)=0,y=h,t0 u x (y,0)=0,0yh,t=0

Estado estacionario

Integramos dos veces la ecuación diferencial

η 2 u x y 2 = Δp l u x = 1 2 Δp ηl y 2 + c 1 y+ c 2

Aplicando la condición de contorno, ux(0,t)=0, resulta c2=0

Aplicando la condición de contorno, ux(h, t)=0, resulta

0= 1 2 Δp ηl h 2 + c 1 h c 1 = 1 2 Δp ηl h u x ( y, )= 1 2 Δp ηl ( hy )y

La solución de la ecuación diferencial en derivadas parciales ux(y, t) es la suma del estado estacionario y del estado transitorio

u x (y,t)= 1 2 Δp ηl ( hy )y+ u x t (y,t)

Introducimos en la ecuación diferencial en derivadas parciales

ρ f u x t t = Δp l +η( 2 u x t y 2 + Δp ηl ) u x t t =υ 2 u x t y 2 ,υ= η ρ f

Con las condiciones de contorno e inicial

{ u x t (0,t)=0,y=0,t>0 u x t (h,t)=0,y=h,t0 u x t (y,0)= 1 2 Δp ηl ( hy )y,0yh,t=0

La solución es similar al apartado anterior, variables separadas

u x t (y,t)= k=1 B k sin( kπ y h ) exp( k 2 π 2 h 2 υt )

Los coeficientes Bk se determinan a partir de la condición inicial

u x t (y,0)= 1 2 Δp ηl ( hy )y 1 2 Δp ηl ( hy )y= k=1 B k sin( kπ y h )

Teniendo en cuenta que

0 1 sin( mπx ) sin( nπx )={ 1 2 ,m=n 0,mn

Calculamos los coeficientes Bk

k=1 B k 0 h sin( kπ y h )sin( nπ y h ) dy= 0 h 1 2 Δp ηl ( hy )ysin( nπ y h )dy

Se hace el cambio de variable z=y/h, y se integra dos veces por partes

B k h 0 1 sin( kπz )sin( kπz ) dz= 1 2 Δp ηl h 2 0 1 ( 1z )zsin( kπz )dz { u=(1z)z,du=(12z)dz dv=sin( kπz )dz,v= cos( kπz ) kπ ( 1z )zsin( kπz )dz = ( 1z )z kπ cos( kπz )+ 1 kπ ( 12z )cos( kπz )dz { u=12z,du=2dz dv=cos( kπz )dz,v= sin( kπz ) kπ ( 1z )z kπ cos( kπz )+ 1 kπ { ( 12z ) kπ sin( kπz )+ 2 kπ sin( kπz )dz }= ( 1z )z kπ cos( kπz )+ 1 kπ { ( 12z ) kπ sin( kπz ) 2 k 2 π 2 cos( kπz ) } 0 1 ( 1z )zsin( kπz )dz = ( ( 1z )z kπ + 2 k 3 π 3 )cos( kπz )+ ( 12z ) k 2 π 2 sin( kπz ) | 0 1 = 2 k 3 π 3 ( 1cos( kπ ) ) 1 2 B k = 1 2 Δp ηl h 2 2 k 3 π 3 ( 1cos( kπ ) ), B k ={ 0,kpar 4 k 3 π 3 Δp ηl h 2 ,kimpar

El resultado es

u x (y,t)= 1 2 Δp ηl ( hy )y+ 4 π 3 Δp ηl h 2 k=1,3,5... 1 k 3 sin( kπ y h ) exp( k 2 π 2 h 2 υt )

En el estado estacionario, la máxima velocidad del fluido se alcanza en y=h/2

u m = 1 8 Δp ηl h 2

Dividimos ux(y, t)/um

u x (y,t) u m =4( 1 y h ) y h 32 π 3 k=1,3,5... 1 k 3 sin( kπ y h ) exp( k 2 π 2 h 2 υt )

Representamos ux(y,t) en los instantes t=0.0001, 0.001, 0.01, 0.1, 1. Tomamos los 150 primeros términos del desarrollo en serie

yy=linspace(0,1, 200);
ux=zeros(length(yy),1);
hold on
for t=[0.0001,0.001 ,0.01,0.1,1]
    i=0;
    for y=yy
        i=i+1;
        ux(i)=4*(1-y)*y;
        for k=1:2:300
            ux(i)=ux(i)-32*sin(k*pi*y)*exp(-k^2*pi^2*t)/(pi^3*k^3);
        end
    end
    plot(ux,yy,'displayName',num2str(t))
end  
hold off
grid on
legend('-DynamicLegend','location','best')
xlabel('u_x/u_m')
ylabel('y/h')
title('Perfil de velocidades')

Actividades

Se pulsa el botón titulado Nuevo para observar el estado transitorio y su evolución hacia el estado estacionario

Fluido entre dos placas planas y paralelas (III)

Situamos el fluido entre dos placas planas y paralelas, y=-h e y=h. En el instante t=0, se establece un gradiente de presión a lo largo del eje X, que contiene un término oscilatorio con frecuencia angular ω

p x = p 2 p 1 x 2 x 1 = Δp l + ρ f Ccos( ωt )

Para determinar el perfil de velocidades ux(y,t), resolvemos la ecuación diferencial

ρ f u x t = Δp l ρ f Ccos( ωt )+η 2 u x y 2

Con las condiciones de contorno

{ u x (h,t)=0,y=h,t>0 u x (h,t)=0,y=h,t>0

Estado estacionario

Integramos dos veces la ecuación diferencial

η 2 u x y 2 = Δp l u x = 1 2 Δp ηl y 2 + c 1 y+ c 2

Aplicando la condición de contorno, determinamos las constantes c1 y c2

{ 1 2 Δp ηl h 2 + c 1 h+ c 2 =0 1 2 Δp ηl h 2 c 1 h+ c 2 =0 u x ( y, )= 1 2 Δp ηl ( y 2 h 2 )

El perfil de velocidades es de tipo parabólico en el estado estacionario. La máxima velocidad se alcanza en y=0

u m = 1 2 Δp ηl h 2

La solución de la ecuación diferencial en derivadas parciales ux(y, t) es la suma del estado estacionario y del estado transitorio

u x (y,t)= u x ( y, )+( f(y)exp( iωt ) )

Donde el símbolo , indica la parte real de un número complejo. Introducimos en la ecuación diferencial en derivadas parciales

ρ f u x t = Δp l ρ f C e iωt +η 2 u x y 2 ρ f ·iω·f(y) e iωt = Δp l ρ f C e iωt +η( Δp ηl + 2 f y 2 e iωt ) iω·f(y)=C+υ 2 f y 2 ,υ= η ρ f

Resolvemos la ecuación diferencial

d 2 f d y 2 iω υ f= C υ

La solución particular es la constante D

iω υ D= C υ ,D= C iω

La solución completa es la suma de la homogénea y la particular

f(y)=Aexp( iω υ y )+Bexp( iω υ y ) C iω

Teniendo en cuenta la raíz de la unidad imaginaria, obtenemos

i = 1+i 2 f(y)=Aexp( (1+i)ky )+Bexp( (1+i)ky ) C iω ,k= ω 2υ

Las condiciones de contorno determinan los coeficientes A y B

{ f(h)=0 f(h)=0 { Aexp( (1+i)kh )+Bexp( (1+i)kh ) C iω =0 Aexp( (1+i)kh )+Bexp( (1+i)kh ) C iω =0 A=B= C iω 1 exp( (1+i)kh )+exp( (1+i)kh )

La expresión de f(y) es

f(y)= C iω exp( (1+i)ky )+exp( (1+i)ky ) exp( (1+i)kh )+exp( (1+i)kh ) C iω f(y)= iC ω ( 1 e ky ( cos( ky )+isin( ky ) )+ e ky ( cos( ky )isin( ky ) ) e kh ( cos( kh )+isin( kh ) )+ e kh ( cos( kh )isin( kh ) ) ) f(y)= iC ω ( 1 cos( ky )( e ky + e ky )+isin( ky )( e ky e ky ) cos( kh )( e kh + e kh )+isin( kh )( e kh e kh ) ) f(y)= iC ω ( 1 cos( ky )cosh( ky )+isin( ky )sinh( ky ) cos( kh )cosh( kh )+isin( kh )sinh( kh ) ) f(y)= iC ω ( 1 { cos( ky )cosh( ky )+isin( ky )sinh( ky ) }{ cos( kh )cosh( kh )isin( kh )sinh( kh ) } { cos( kh )cosh( kh )+isin( kh )sinh( kh ) }{ cos( kh )cosh( kh )isin( kh )sinh( kh ) } ) f(y)= iC ω ( 1 { cos( ky )cosh( ky )cos( kh )cosh( kh )+sin( ky )sinh( ky )sin( kh )sinh( kh ) }+i{ sin( ky )sinh( ky )cos( kh )cosh( kh )cos( ky )cosh( ky )sin( kh )sinh( kh ) } cos 2 ( kh ) cosh 2 ( kh )+ sin 2 ( kh ) sinh 2 ( kh ) ) f(y)= iC ω ( 1 aib c ),{ a=cos( ky )cosh( ky )cos( kh )cosh( kh )+sin( ky )sinh( ky )sin( kh )sinh( kh ) b=cos( ky )cosh( ky )sin( kh )sinh( kh )sin( ky )sinh( ky )cos( kh )cosh( kh ) c= cos 2 ( kh ) cosh 2 ( kh )+ sin 2 ( kh ) sinh 2 ( kh )

La solución de la ecuación diferencial en derivadas parciales ux(y, t) es

u x (y,t)= u x (y,)+( iC ω ( 1 aib c )exp( iωt ) ) u x (y,t)= 1 2 Δp ηl ( y 2 h 2 )+( iC ω ( 1 aib c )( cos( ωt )+isin( ωt ) ) ) u x (y,t)= 1 2 Δp ηl ( y 2 h 2 ) C ω { ( 1 a c )sin( ωt )+ b c cos( ωt ) }

Dividiendo por la velocidad máxima u m = 1 2 Δp ηl h 2 , llegamos a la expresión final del perfil de velocidades del fluido

u x (y,t) u m =1 y 2 h 2 C ω u m { ( 1 a c )sin( ωt )+ b c cos( ωt ) }

Nota: En la expresión que figura en la segunda referencia, hay un signo - delante del coeficiente b/c. Como puede comprobar el lector en el código MATLAB, debe tratarse de un error tipográfico

Representamos el perfil de velocidades en los instantes ωt=0, π/4, π/2, 3π/4, para dos valores de k= 1 2 , 5 2 , tomando la constante C ω u m =7

h=1;
k=1/sqrt(2);
hold on
yy=linspace(-1,1,100);
cte=4;
for wt=[0, pi/4, pi/2, 3*pi/4]
    ux=zeros(1,length(yy));
    j=0;
    for y=yy
        j=j+1;
        a=cos(k*y)*cosh(k*y)*cos(k*h)*cosh(k*h)+sin(k*y)*sinh(k*y)*sin(k*h)*
sinh(k*h);
        b=cos(k*y)*cosh(k*y)*sin(k*h)*sinh(k*h)-sin(k*y)*sinh(k*y)*cos(k*h)*
cosh(k*h);
        c=cos(k*h)^2*cosh(k*h)^2+sin(k*h)^2*sinh(k*h)^2;
        ux(j)=1-y^2/h^2-cte*((1-a/c)*sin(wt)+b*cos(wt)/c);
%       ux(j)=1-y^2/h^2+cte*real((1-cosh((1+1i)*k*y)/cosh((1+1i)*k*h))*
1i*exp(1i*wt));
    end
    plot(ux,yy)
end
hold off
grid on
ylabel('y/h')
legend('0','\pi/4','\pi/2','3\pi/4','location','best')
xlabel('u_x/u_m')
title('Perfil de velocidades')

Actividades

Referencias

Tasos C. Papanastasiou, Georgios C. Georgiou, Andreas N. Alexandrou. Viscous Fluid Flow. CRC Press 2000. Sección 6.6

Michel O. Deville. An Introduction to the Mechanics of Incompressible Fluids. Springer (2022), pp. 68-70