Resolvemos la ecuación diferencial, integrando dos veces
Los coeficientes c1 y c2 se determinan aplicando las condiciones de contorno. La velocidad del fluido ux(z) se anula en los puntos de contacto con los planos paralelos.
El perfil de velocidades es parabólico. La máxima velocidad se alcanza en z=0
Tubo de sección rectangular
Para determinar el perfil de velocidades de un fluido a través de un tubo de sección rectangular en el estado estacionario, tenemos que resolver la ecuación diferencial en derivadas parciales
Con las condiciones de contorno
La velocidad del fluido adherido a los cuatro planos (dos horizontales y dos verticales) que forman el tubo, es nula
Buscamos una solución que elimina el término Δp/(lη) constante de la ecuación diferencial en derivadas parciales
Introducimos en la ecuación diferencial, transformándose en la ecuación de Laplace en dos dimensiones
Con las siguientes condiciones de contorno
Variables separadas
La solución es el producto de dos funciones una que solamente depende de y y otra que depende de z
Introduciendo en la ecuación diferencial
El primer miembro solamente depende de y y el segundo de z, igualamos a una contante k2. De este modo, transformamos una ecuación diferencial en derivadas parciales en un sistema de dos ecuaciones diferenciales de solución conocida
Condiciones de contorno en los planos horizontales
El resultado es
Condiciones de contorno en los planos verticales
El resultado es
También, por razón de simetría A=B
La solución buscada es la superposición
Teniendo en cuenta que
Calculamos los coeficientes Vn
Resolvemos la integral del primer miembro
Evaluamos el integrando entre -c y c, teniendo en cuenta que cos(knc)=0
Los coeficientes Vn son
El resultado es
El perfil de velocidades del fluido en el tubo de sección rectangular es
Dividimos por la velocidad máxima , para que todas las magnitudes sean adimensionales
Representamos el perfil de velocidades para c=1 y b=2. Tomamos los 100 primeros términos del desarrollo en serie
=1;
b=2;
z=-c:0.05:c;
y=-b:0.05:b;
[Y,Z]=meshgrid(y,z);
ux=1-Z.^2/c^2;
for n=1:100
ux=ux+4*(-1)^n*cos((2*n-1)*pi*Z/(2*c)).*cosh((2*n-1)*pi*Y/(2*c))
/(((2*n-1)*pi/2)^3*cosh((2*n-1)*pi*b/(2*c)));
end
mesh(ux,Y,Z);
xlabel('u_x')
ylabel('y')
zlabel('z')
title('Perfil de velocidades')
Lo mismos datos pero en curvas de nivel
function navier_stokes_16
c=1;
b=2;
fcontour(@perfil, [-b,b,-c,c])
xlabel('y')
ylabel('z')
title('Perfil de velocidades')
function ux=perfil(y,z)
ux=1-z.^2/c^2;
for n=1:100
ux=ux+4*(-1)^n*cos((2*n-1)*pi*z/(2*c)).*cosh((2*n-1)*pi*y/(2*c))
/(((2*n-1)*pi/2)^3*cosh((2*n-1)*pi*b/(2*c)));
end
end
end
Gasto
El gasto (volumen de fluido por unidad de tiempo) es
Resolvemos la integral respecto de z
Integramos respecto de y
Referencias
Tasos C. Papanastasiou, Georgios C. Georgiou, Andreas N. Alexandrou. Viscous Fluid Flow. CRC Press 2000. Sección 6.7.2