<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="es">
		<id>https://mat.caminos.upm.es/w/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=SReig</id>
		<title>MateWiki - Contribuciones del usuario [es]</title>
		<link rel="self" type="application/atom+xml" href="https://mat.caminos.upm.es/w/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=SReig"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/SReig"/>
		<updated>2026-04-29T00:17:40Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22343</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22343"/>
				<updated>2014-12-05T19:27:45Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Variación de la velocidad y la presión. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}&amp;lt;/math&amp;gt; &lt;br /&gt;
→ '''despreciamos los cocientes:'''&lt;br /&gt;
&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
→&lt;br /&gt;
2cosθ&amp;lt;math&amp;gt;\vec{g^ρ} - 2ρsen θ \vec{g^ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + \frac{100}{81}sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;f(θ)= 2  { (\frac{64}{81}) cos^2θ + \frac{100}{81}sen^2θ} &amp;lt;/math&amp;gt;  →  &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → f'(θ)= 4 senθ=0 \\ θ_1=0 con\ f(0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fv=inline('((2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2))^2+(-16*(x.*y)./((y.^2+x.^2).^2))^2)^(1/2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fv(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fp=inline('15-((2+(8*(y.^2)-8*&lt;br /&gt;
(x.^2))./((y.^2+x.^2).^2))^2+(-16*(x.*y)./((y.^2+x.^2).^2))^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fp(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22342</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22342"/>
				<updated>2014-12-05T19:27:21Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Variación de la velocidad y la presión. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}&amp;lt;/math&amp;gt; &lt;br /&gt;
→ '''despreciamos los cocientes:'''&lt;br /&gt;
&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
→&lt;br /&gt;
2cosθ&amp;lt;math&amp;gt;\vec{g^ρ} - 2ρsen θ \vec{g^ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + \frac{100}{81}sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;f(θ)= 2  { (\frac{64}{81}) cos^2θ + \frac{100}{81}sen^2θ} &amp;lt;/math&amp;gt;  →  &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → f'(θ)= 4 senθ=0 \\ θ_1=0 con\ f(0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
MODULO VELOCIDADES&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fv=inline('((2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2))^2+(-16*(x.*y)./((y.^2+x.^2).^2))^2)^(1/2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fv(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
PRESIONES&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fp=inline('15-((2+(8*(y.^2)-8*&lt;br /&gt;
(x.^2))./((y.^2+x.^2).^2))^2+(-16*(x.*y)./((y.^2+x.^2).^2))^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fp(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22316</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22316"/>
				<updated>2014-12-05T18:52:17Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}&amp;lt;/math&amp;gt; &lt;br /&gt;
→ '''despreciamos los cocientes:'''&lt;br /&gt;
&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
→&lt;br /&gt;
2cosθ&amp;lt;math&amp;gt;\vec{g^ρ} - 2ρsen θ \vec{g^ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22314</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22314"/>
				<updated>2014-12-05T18:51:07Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}&amp;lt;/math&amp;gt; &lt;br /&gt;
→ '''despreciamos los cocientes: &amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → &lt;br /&gt;
2cosθ&amp;lt;math&amp;gt;\vec{g^ρ} - 2ρsen θ \vec{g^ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22312</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22312"/>
				<updated>2014-12-05T18:49:42Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}&amp;lt;/math&amp;gt; → '''despreciamos los cocientes\frac{8}{ρ^2}) y (\frac{8}{ρ})''' → = 2cosθ&amp;lt;math&amp;gt;\vec{g^ρ} - 2ρsen θ \vec{g^ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22311</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22311"/>
				<updated>2014-12-05T18:48:13Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}\ → '''despreciamos los cocientes\frac{8}{ρ^2}) y (\frac{8}{ρ})''' → = 2cosθ\vec{g^ρ} - 2ρsen θ \vec{g^ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22310</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22310"/>
				<updated>2014-12-05T18:47:08Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}\ → '''despreciamos los cocientes\frac{8}{ρ^2}\) y (\frac{8}{ρ}\)''' → = 2cosθ\vec{g^ρ} - 2ρsen θ \vec{g^ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22309</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22309"/>
				<updated>2014-12-05T18:44:39Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}\ → '''despreciamos los cocientes\frac{8}{ρ^2}\) y (\frac{8}{ρ}\)''' → = &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (\frac{64}{81}) cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22300</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22300"/>
				<updated>2014-12-05T18:37:21Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}&amp;lt;/math&amp;gt; → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22299</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22299"/>
				<updated>2014-12-05T18:36:49Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\\vec{u} = (2-\frac{8}{ρ^2})cosθ\vec{g^ρ} - (2ρ + \frac{8}{ρ}) sen θ \vec{g^θ}&amp;lt;/math&amp;gt; → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22292</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22292"/>
				<updated>2014-12-05T18:30:42Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}\=(2cosθ-\frac{8}{ρ^2}\cosθ)\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22290</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22290"/>
				<updated>2014-12-05T18:30:04Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}=\(2cosθ-\frac{8}{ρ^2}\cosθ)\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22289</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22289"/>
				<updated>2014-12-05T18:27:55Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ))\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}=\(2cosθ-\frac{8}{ρ^2}\cosθ)\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22288</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22288"/>
				<updated>2014-12-05T18:25:59Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}=\(2cosθ-\frac{8}{ρ^2}\cosθ)\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22285</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22285"/>
				<updated>2014-12-05T18:24:25Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}=\(2cosθ-\frac{8}{ρ^2}\cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22284</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22284"/>
				<updated>2014-12-05T18:23:54Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}\+\frac{δφ}{δθ}\=\(2cosθ\-\frac{8}{ρ^2}\cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22281</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22281"/>
				<updated>2014-12-05T18:22:07Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}=\(2cosθ\-\frac{8}{ρ^2}\cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22277</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22277"/>
				<updated>2014-12-05T18:20:53Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}=\(\2cosθ\-\frac{8}{ρ^2}\cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22274</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22274"/>
				<updated>2014-12-05T18:19:34Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: /* Rotacional y divergencia. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ=\frac{δφ}{δρ}+\frac{δφ}{δθ}=\(2cosθ-\frac{8}{ρ^2}\cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-\frac{8}{ρ}\senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22271</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22271"/>
				<updated>2014-12-05T18:17:37Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ\=\frac{δφ}{δρ}+\frac{δφ}{δθ}\=(2cosθ-\frac{8}{ρ^2}\cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22268</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22268"/>
				<updated>2014-12-05T18:16:13Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nablaφ&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22265</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22265"/>
				<updated>2014-12-05T18:14:24Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. &lt;br /&gt;
En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nabla&amp;lt;/math&amp;gt;•φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22264</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22264"/>
				<updated>2014-12-05T18:13:59Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nabla&amp;lt;/math&amp;gt;•φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22261</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22261"/>
				<updated>2014-12-05T18:12:42Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
                                                                                                                        &amp;lt;math&amp;gt;\vec{u} = \nabla&amp;lt;/math&amp;gt;•φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22260</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22260"/>
				<updated>2014-12-05T18:12:11Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u} = \nabla&amp;lt;/math&amp;gt;•φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22257</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22257"/>
				<updated>2014-12-05T18:10:55Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;•φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22254</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=22254"/>
				<updated>2014-12-05T18:09:52Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\)''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66666.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,100)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ que\ coinciden\ con\ los\ de\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4\end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 2 {\sqrt { (1-\frac{4}{36})^2 cos^2θ + (6+\frac{4}{6})^2 \frac{1}{36} sen^2θ} } &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-(4./(U.^2))).^2).*((cos(V)).^2))-4*(((1+(4./(U.^3))).^2).*((sin(V)).^2));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
Para el cálculo de la presión media hemos utilizado un método numérico en MATLAB basado en el método del trapecio. El resultado de la '''presión estática media''' del fluido es de&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Cálculo de la presión media &lt;br /&gt;
i=1000; &lt;br /&gt;
j=1000;                  &lt;br /&gt;
u=linspace(2,6,i+1);&lt;br /&gt;
v=linspace(0,2*pi,j+1);&lt;br /&gt;
h=(6-2)/i;&lt;br /&gt;
H=2*pi/j;&lt;br /&gt;
&lt;br /&gt;
%Creación la malla.&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
&lt;br /&gt;
%Definición de la presión estática&lt;br /&gt;
P=15-4*(((1-4./(u.^2)).^2).*((cos(v)).^2)+((1./(u.^4)).*(((u+4./u)).^2).*((sin(v)).^2)));&lt;br /&gt;
&lt;br /&gt;
%Integración y cálculo de presión total&lt;br /&gt;
A=ones(i+1,1);                 &lt;br /&gt;
A(1)=1/2;&lt;br /&gt;
A(i+1)=1/2;&lt;br /&gt;
&lt;br /&gt;
B=ones(j+1,1);                 &lt;br /&gt;
B(1)=1/2; &lt;br /&gt;
w(j+1)=1/2;&lt;br /&gt;
PT=h*H*B*P*A;&lt;br /&gt;
&lt;br /&gt;
%Cálculo del área y de la presión media&lt;br /&gt;
ro=2;&lt;br /&gt;
roo=6;&lt;br /&gt;
Ar=pi*(roo^2-ro^2);&lt;br /&gt;
PM=PT/Ar}}&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Green''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo entendido como una '''curva cerrada''' será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ'(2π)- φ'(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
\(\boxed { l=ρvΓ   } \)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21659</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21659"/>
				<updated>2014-12-05T11:40:58Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21658</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21658"/>
				<updated>2014-12-05T11:40:02Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;•\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|350px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21654</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21654"/>
				<updated>2014-12-05T11:39:31Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo, &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;\(\vec{n}\)=0, lo que significa que \(\vec{n}\) es ortogonal a &amp;lt;math&amp;gt;\nabla\vec{u}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
En este apartado únicamente se nos pide el dibujo de las curvas de nivel de la presión estática.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:11campos14.png|450px|right|Dibujo de las curvas de nivel de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo de las curvas de nivel de la presión estática&lt;br /&gt;
u=linspace(2,6,100);&lt;br /&gt;
v=linspace(0,2*pi,100);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Dibujo y definición de P&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
contour(X,Y,P,100)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21650</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21650"/>
				<updated>2014-12-05T11:35:50Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ)=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21649</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21649"/>
				<updated>2014-12-05T11:35:09Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))= →'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→ =&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(ρ(2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ))+&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(-ρ(&amp;lt;math&amp;gt;\frac{2}{ρ}&amp;lt;/math&amp;gt;+&amp;lt;math&amp;gt;\frac{8}{ρ^3}&amp;lt;/math&amp;gt;)senθ))=&amp;lt;math&amp;gt;\frac{1}{\rho}&amp;lt;/math&amp;gt;((2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ+(-2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)cosθ=0&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|450px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:82.png|600px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21640</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21640"/>
				<updated>2014-12-05T11:27:52Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;ρ&amp;lt;/sup&amp;gt;))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;U&amp;lt;sup&amp;gt;θ&amp;lt;/sup&amp;gt;))→'''&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;=ρ'''→&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:81.png|500px|right|Dibujo en 2D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
Los valores que nos proporciona el programa para la presión máxima y mínima son los siguientes: Pmáx=15 y Pmín=11'004.&lt;br /&gt;
[[Archivo:81.png|500px|center|Dibujo en 3D de la presión estática P del fluido. ]]&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21635</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21635"/>
				<updated>2014-12-05T11:25:17Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;u^ρ))+&amp;lt;math&amp;gt;\frac{1}{\sqrt {g}}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;u^θ))=&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21631</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21631"/>
				<updated>2014-12-05T11:23:13Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=1/&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;u^ρ))+&amp;lt;math&amp;gt;\frac{1}{&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;u^θ))=&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido y cácularemos númericamente el valor máximo y mínimo ésta.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a cartesianas&lt;br /&gt;
[U,V]=meshgrid(u,v);&lt;br /&gt;
x=U.*cos(V);&lt;br /&gt;
y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Definimos la presión estática del fluido&lt;br /&gt;
P=15-4*(((1-4./(U.^2)).^2).*((cos(V)).^2)+((1./(U.^4)).*(((U+4./U)).^2).*((sin(V)).^2)));&lt;br /&gt;
&lt;br /&gt;
%dibujo de la presión&lt;br /&gt;
figure(1)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
%dibujo en 3D &lt;br /&gt;
figure(2)&lt;br /&gt;
surf(x,y,P)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
view(3)&lt;br /&gt;
&lt;br /&gt;
%Cálculo de la presión máxima y mínima &lt;br /&gt;
Pmax=max(max(P))&lt;br /&gt;
Pmin=min(min(P))}}&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21624</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21624"/>
				<updated>2014-12-05T11:20:45Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=1/&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;u^ρ))+1/&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(&amp;lt;math&amp;gt;\sqrt{g}&amp;lt;/math&amp;gt;u^θ))=&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido.&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21619</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21619"/>
				<updated>2014-12-05T11:18:54Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}&amp;lt;/math&amp;gt;=1/sqrt { g }(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;(sqrt{g}u^ρ))+1/sqrt{g}(&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \theta  }&amp;lt;/math&amp;gt;(sqrt{g}u^θ))&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|500px|right|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
Por último dibujaremos la presión estática  P del fluido.&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21607</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21607"/>
				<updated>2014-12-05T11:14:27Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{\nabla}\vec{u}=\frac{1}{sqrt { g }}&amp;lt;/math&amp;gt;=&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21604</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21604"/>
				<updated>2014-12-05T11:13:46Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{nabla}\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{nabla}\vec{u}=\frac{1}{sqrt { g }}&amp;lt;/math&amp;gt;=&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21591</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21591"/>
				<updated>2014-12-05T11:08:20Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21590</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21590"/>
				<updated>2014-12-05T11:07:39Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21588</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21588"/>
				<updated>2014-12-05T11:07:16Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
  &amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21587</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21587"/>
				<updated>2014-12-05T11:06:50Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;=(2cosθ-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;senθ)\(\vec{g^θ}\) → '''despreciamos los cocientes (&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;) y (&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;)''' → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21581</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21581"/>
				<updated>2014-12-05T11:05:43Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;'''=(2cosθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;'''cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;'''senθ)\(\vec{g^θ}\) → despreciamos los cocientes ('''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;''') y ('''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;''') → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)'''&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21578</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21578"/>
				<updated>2014-12-05T11:04:43Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;'''=(2cosθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;'''cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;'''senθ)\(\vec{g^θ}\) → despreciamos los cocientes ('''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;''') y ('''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;''') → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)'''&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\)=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21577</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21577"/>
				<updated>2014-12-05T11:03:39Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;'''=(2cosθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;'''cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;'''senθ)\(\vec{g^θ}\) → despreciamos los cocientes ('''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;''') y ('''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;''') → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)'''&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\=\(\vec{0}\)&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21576</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21576"/>
				<updated>2014-12-05T11:02:34Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;'''=(2cosθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;'''cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;'''senθ)\(\vec{g^θ}\) → despreciamos los cocientes ('''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;''') y ('''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;''') → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)'''&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\=\(\vec{0}\&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21574</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21574"/>
				<updated>2014-12-05T11:02:02Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;'''=(2cosθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;'''cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;'''senθ)\(\vec{g^θ}\) → despreciamos los cocientes ('''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;''') y ('''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;''') → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)'''&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=((-2+&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ + (2-&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;)senθ)\(\vec{g_z}\=\(\vec{0}\&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21571</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21571"/>
				<updated>2014-12-05T10:59:49Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;'''=(2cosθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;'''cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;'''senθ)\(\vec{g^θ}\) → despreciamos los cocientes ('''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;''') y ('''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;''') → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)'''&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt;U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21569</id>
		<title>Visualización de campos en un fluido incompresible. (Grupo 7-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_fluido_incompresible._(Grupo_7-C)&amp;diff=21569"/>
				<updated>2014-12-05T10:59:25Z</updated>
		
		<summary type="html">&lt;p&gt;SReig: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
 {{ TrabajoED |  Visualización de campos en un fluido incompresible. (Grupo 7-C) | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Alejandro García Saínz, &lt;br /&gt;
Adela González Barbado,&lt;br /&gt;
 &lt;br /&gt;
Sergio Reig Vellón, &lt;br /&gt;
&lt;br /&gt;
Diego Solano López, &lt;br /&gt;
&lt;br /&gt;
Ramiro Torres Garófalo }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==.-Visualización de campos escalares y vectoriales en fluidos. ==&lt;br /&gt;
Vamos a estudiar la visualización de '''campos escalares y vectoriales''' en un '''fluido incompresible''' alrededor de un '''obstáculo''' con forma '''circular'''. Trabajaremos en el plano en '''coordenadas cilíndricas''',es decir, '''polares''', por trabajar en 2D.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Croquis7c.jpg|200x200px|miniaturadeimagen|izquierda|Croquizado de la situación a estudiar. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Movimiento del fluido.-Representación de los puntos interiores. ==&lt;br /&gt;
Dibujamos en un software científico de visualización (MATLAB en este caso) la '''malla''' en la que vamos a trabajar. Hemos realizado el mallado del anillo comprendido entre los '''radios 2 y 6 con centro el origen'''. la visualización la hemos realizado con los ejes en el '''intervalo [-5,5]x[-5,5]'''. El dibujo se ha modificado añadiendo sobre la malla de '''MATLAB''' el obstáculo con un programa de edición de imagen.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallafluido1.jpg|300x300px|miniaturadeimagen|derecha|Malla. ]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El código MATLAB utilizado es el siguiente:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
zz=zeros(50,50);&lt;br /&gt;
mesh(xx,yy,zz)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==.-Función potencial y velocidad. ==&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel y Campo de velocidades. ====&lt;br /&gt;
&lt;br /&gt;
La '''velocidad de las partículas''' viene dada por el '''gradiente''' de la función potencial '''φ=2(ρ+4/ρ)cosθ'''. Hemos representado, haciendo uso de '''MATLAB''', las '''curvas de nivel''' de la función potencial '''φ''' y el '''campo de velocidades''' del fluido. &lt;br /&gt;
&lt;br /&gt;
Los códigos '''MATLAB''' utilizados para ello son los que siguen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Curvasdenivel7c.jpg|300px|miniaturadeimagen|rigth|Curvas de nivel de la '''función potencial φ'''. ]]&lt;br /&gt;
*Representación de las curvas de nivel.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*x+8*x./(x.^2+y.^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
contour(xx,yy,f,50);&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campodevelocidades.jpg|300px|miniaturadeimagen|rigth|Representación del '''campo de velocidades'''. ]]&lt;br /&gt;
&lt;br /&gt;
*Representación del campo de velocidades.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En las siguientes imágenes hemos superpuesto las representaciones de la función potencial y el campo de velocidades ('''\(\vec{u}\)=Δφ''') para comprobar (gráficamente) que éstos son ortogonales. La imagen de la derecha es un zoom sobre la imagen de la izquierda para facilitar la visualización de la perpendicularidad entre las líneas de los dos campos.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Doscamposjuntosm.jpg|1000px|centro|miniaturadeimagen|Superposición de las representaciones de los dos campos (izquierda) y zoom para facilitar la visualización de la ortogonalidad entre '''φ''' y '''\(\vec{u}\)=Δφ''' (derecha). ]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional y divergencia. ====&lt;br /&gt;
Si '''\(\vec{n}\)''' es el vector normal a los puntos del obstáculo&lt;br /&gt;
&lt;br /&gt;
Hemos definido la función potencial '''φ=2(ρ+4/ρ)cosθ'''. También hemos definido '''&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ''', campo de velocidades del fluido. Si estudiamos la situación alejándonos del obstáculo, ρ es muy grande, y por tanto &amp;lt;math&amp;gt;\frac{1}{ρ}&amp;lt;/math&amp;gt; (y todos sus múltiplos) es despreciable. En este caso:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=\nabla&amp;lt;/math&amp;gt;φ=&amp;lt;math&amp;gt;\frac{δφ}{δρ}+\frac{δφ}{δθ}&amp;lt;/math&amp;gt;'''=(2cosθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;'''cosθ)\(\vec{g^ρ}\)+(-2ρsenθ-'''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;'''senθ)\(\vec{g^θ}\) → despreciamos los cocientes ('''&amp;lt;math&amp;gt;\frac{8}{ρ^2}&amp;lt;/math&amp;gt;''') y ('''&amp;lt;math&amp;gt;\frac{8}{ρ}&amp;lt;/math&amp;gt;''') → = 2cosθ\(\vec{g^ρ}\)-2ρsenθ\(\vec{g^θ}\)'''&lt;br /&gt;
&lt;br /&gt;
Para calcular el rotacional y la divergencia operamos en coordenadas polares:&lt;br /&gt;
===== Rotacional =====&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}&amp;lt;/math&amp;gt;=&amp;lt;math&amp;gt;\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { U }_{ \rho  } &amp;amp; { U }_{ \theta  } &amp;amp; 0 \end{vmatrix}&amp;lt;/math&amp;gt;= + (&amp;lt;math&amp;gt;\frac { \partial  }{ \partial \rho  }&amp;lt;/math&amp;gt; U&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; - &amp;lt;math&amp;gt;\frac { \partial }{ \partial \theta  }&amp;lt;/math&amp;gt; U&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;)\(\vec{g_z}\)=&lt;br /&gt;
&lt;br /&gt;
El rotacional da la dirección y la velocidad de giro. Un campo con rotacional nulo (o irrotacional), no tiene rotaciones. Extrapolando a nuestro caso, acabamos de comprobar que el rotacional es nulo, por lo que nuestro fluido no genera remolinos.&lt;br /&gt;
===== Divergencia =====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es la tasa de flujo neto hacia el exterior por unidad de volumen. En términos más sencillos, es lo que se expande el fluido (lo que crece o decrece). Como la divergencia es 0, el fluido es incompresible, es decir, ni masa ni volumen cambian.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente. ====&lt;br /&gt;
Las '''líneas de corriente''' del campo \(\vec{u}\) son las '''tangente a la velocidad''', entendida como el gradiente de la función potencial '''φ'''. &lt;br /&gt;
Para poder dibujar las líneas de corriente procedemos al cálculo de un '''vector perpendicular a \(\vec{u}\)''', el vector &amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{k}\times\vec{u}= \sqrt { g }\begin{vmatrix} \bar { { g }^{ \rho  } }  &amp;amp; \bar { { g }^{ \theta  } }  &amp;amp; \bar { { g }^{ z } }  \\ 0  &amp;amp; 0  &amp;amp; 1  \\ { u }^{ \rho  } &amp;amp; { u }^{ \theta  } &amp;amp; { u }^{ z } \end{vmatrix}= ρ (\vec{u^ρ} \vec{g^θ} - \vec{u^θ} \vec{g^ρ}) = \boxed {\vec{v} = 2ρ(1-\frac{4}{ρ^2})cosθ\vec{g^θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g^ρ}= 2(\frac{1}{ρ}-\frac{4}{ρ^3})cosθ \vec{g_θ} + 2(1 + \frac{4}{ρ^2}) sen θ \vec{g_ρ}} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Por ser la '''divergencia de \(\vec{u}\) nula''', es decir, &amp;lt;math&amp;gt;\nabla·\vec{u}=0&amp;lt;/math&amp;gt; (como se ha calculado en el apartado anterior), el vector '''\(\vec{v}\)''' será '''irrotacional'''. Calculando &amp;lt;math&amp;gt;\nabla\times\vec{v}=0&amp;lt;/math&amp;gt; podremos comprobarlo.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{v}=\frac{1}{\sqrt { g }}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ { v }_{ \rho  } &amp;amp; { v }_{ \theta  } &amp;amp; { v }_{ z } \end{vmatrix}=\frac{2}{ρ}\begin{vmatrix} \bar { { g }_{ \rho  } }  &amp;amp; \bar { { g }_{ \theta  } }  &amp;amp; \bar { { g }_{ z } }  \\ \frac { \partial  }{ \partial \rho  }  &amp;amp; \frac { \partial  }{ \partial \theta  }  &amp;amp; \frac { \partial  }{ \partial z }  \\ (1+\frac{4}{ρ^2}) senθ &amp;amp; ρ(1-\frac{4}{ρ^2}) cosθ &amp;amp; 0 \end{vmatrix}=\frac{1}{ρ}((2+\frac{8}{ρ^2})cosθ- (2+\frac{8}{ρ^2})cosθ)\vec{g_z}= \frac{2}{ρ}((1+\frac{4}{ρ^2}) - (1+\frac{4}{ρ^2}))cosθ\vec{g_z} = 0&amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt;\boxed { \bar { rot } (\bar { v } )=\nabla\times\vec{v}=0 } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Además \(\vec{v}\) tendrá un '''potencial escalar ψ''' que se conoce como la función de corriente de \(\vec{u}\). Dicho potencial lo calcularemos gracias al campo \(\vec{v}\) pues es el gradiente de dicho potencial.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}=\vec{grad}ψ= \frac{∂ψ}{∂ρ}\vec{g^ρ} + \frac{∂ψ}{∂θ}\vec{g^θ} + \frac{∂ψ}{∂z}\vec{g^z} = 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1 - \frac{4}{ρ^2})cosθ \vec{g^θ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\left\{\begin{matrix}\ \frac{∂ψ}{∂ρ}= 2(1 + \frac{4}{ρ^2})senθ  → ψ=\int 2(1 + \frac{4}{ρ^2})senθ dρ= 2(ρ-\frac{4}{ρ})senθ + h(θ) \\ \frac{∂ψ}{∂θ}=2ρ(1-\frac{4}{ρ^2})cosθ=2(ρ-\frac{4}{ρ})cosθ+h'(θ) → h'(θ) = 0&amp;lt;br /&amp;gt; → h(θ) = cte  &lt;br /&gt;
\end{matrix}\right\}&amp;lt;/math&amp;gt; → &amp;lt;math&amp;gt;\boxed {ψ=2(ρ-\frac{4}{ρ})senθ}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Se observa que h(θ) puede tomar el valor de cualquier constante por lo que podríamos encontrar infinitos potenciales escalares, pues no influye en su gradiente.&lt;br /&gt;
Fácilmente comprobamos el cálculo de ψ hallando su gradiente &amp;lt;math&amp;gt;\vec{grad}ψ = \frac{∂ψ}{∂ρ}+\frac{∂ψ}{∂θ}= 2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2(ρ-\frac{4}{ρ})cosθ \vec{g^θ}=2(1 + \frac{4}{ρ^2})senθ \vec{g^ρ} + 2ρ(1-\frac{4}{ρ^2})cosθ \vec{g^θ} &amp;lt;/math&amp;gt; que efectivamente corresponde al campo \(\vec{v}\).&lt;br /&gt;
&lt;br /&gt;
Cabe destacar que al existir el potencial escalar ψ de \(\vec{v}\) podríamos haber anticipado que el rotacional de éste seria nulo y por tanto es que isorrotacional.&lt;br /&gt;
&lt;br /&gt;
Finalmente se dibujan las líneas de corriente del campo de velocidades \(\vec{v}\) sobre las que añadiremos las curvas de nivel del potencial escalar ψ.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:66.png|400px|rigth|Curvas de nivel de las ctes del potencial escalar ψ sobre las líneas de corriente del campo de velocidades \(\vec{v}\). ]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Generación de la líneas de corriente de la velocidad&lt;br /&gt;
u=linspace(2,6,50);&lt;br /&gt;
v=linspace(0,2*pi,50);&lt;br /&gt;
fi=inline('2*y-8*y./(x.^2+y.^2)','x','y');&lt;br /&gt;
&lt;br /&gt;
%Creación de la malla y paso a polares&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo del campo de velocidades&lt;br /&gt;
f=fi(xx,yy);&lt;br /&gt;
hold on&lt;br /&gt;
contour(xx,yy,f,50)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
&lt;br /&gt;
%Generación de las curvas de nivel&lt;br /&gt;
u=linspace(2,6,10);&lt;br /&gt;
v=linspace(0,2*pi,10);&lt;br /&gt;
&lt;br /&gt;
%Definición y dibujo de función potencial &lt;br /&gt;
fx=inline('2+(8*(y.^2)-8*(x.^2))./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
fy=inline('-16*(x.*y)./((y.^2+x.^2).^2)','x','y');&lt;br /&gt;
[uu,vv]=meshgrid(u,v);&lt;br /&gt;
xx=uu.*cos(vv);&lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
u1=fx(xx,yy);&lt;br /&gt;
u2=fy(xx,yy);&lt;br /&gt;
quiver(xx,yy,u1,u2)&lt;br /&gt;
axis([-5,5,-5,5])}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En la imagen podemos observar como las curvas de nivel son tangentes al campo de velocidades \(\vec{v}\) en cada uno de los puntos.&lt;br /&gt;
&lt;br /&gt;
==== Puntos de frontera. ====&lt;br /&gt;
Gracias al módulo de \(\vec{u}\) podemos establecer una función dependiente de ρ y θ, u(ρ,θ), que nos permitirá calcular aquellos puntos con mayor y menor velocidad en la frontera S fijando el valor de ρ en 2 y 6.&lt;br /&gt;
&lt;br /&gt;
Dado que el módulo es invariante a la base escogida podremos hacerlo tanto en coordenadas contravariantes como covariantes, siendo éstas últimas las utilizadas para el cálculo. Además, se hallarán los puntos de remanso, donde la velocidad se anula, que veremos que además son los puntos de velocidad mínima.&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt; |\vec u| (ρ,θ)= 2 {\sqrt { (1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ} } &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ ρ=2 → &amp;lt;math&amp;gt;|\vec u|(2,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(2,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(2,0)=0 \\ θ_2=π con\ |\vec u|(2,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(2,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(2,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(2,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
♦ ρ=6 → &amp;lt;math&amp;gt;|\vec u|(6,θ)= 4 senθ &amp;lt;/math&amp;gt;  → &amp;lt;math&amp;gt; \left\{\begin{matrix}\ Puntos\ de\ remanso\ y\ velocidad\ mínima\ → |\vec u|(6,θ)= 4 senθ=0 \\ θ_1=0 con\ |\vec u|(6,0)=0 \\ θ_2=π con\ |\vec u|(6,π)=0 \\ Velocidad\ máxima\ → |\vec u|'(6,θ)= 4 cosθ=0 \\ θ_3=\frac{π}{2} con\ |\vec u|(6,\frac{π}{2})=4 \\ θ_4=\frac{3π}{2} con\ |\vec u|(6,\frac{3π}{2})=4 \end{matrix}\right.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==.-Presión. ==&lt;br /&gt;
==== Ecuación de Bernouilli. ====&lt;br /&gt;
La ecuación de Bernouilli describe el movimiento del fluido con respecto a ciertas variables de éste que podemos describir como: &lt;br /&gt;
  → p: '''Presión estática''' a la que se ve sometido el fluido p debido a las moléculas que lo rodean.&lt;br /&gt;
  → ρ: '''Densidad''' del fluido.&lt;br /&gt;
  → \(\vec{u}\): '''Velocidad de flujo''' del fluido.&lt;br /&gt;
&lt;br /&gt;
Esta ecuación se aplica en la '''dinámica de fluidos''', dicho fluido, que podemos considerar '''gas o líquido''', adoptará la forma del recipiente que lo contiene pues sus partículas no están rígidamente unidas, como ocurre con los cuerpos sólidos&lt;br /&gt;
 &lt;br /&gt;
Al limitar el nivel de aplicabilidad con la suposiciones que citamos a continuación se puede llegar a la ecuación: &amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
♦ La velocidad de cada punto no será variante con el tiempo por lo que nuestro fluido se moverá en un '''régimen estacionario'''.&lt;br /&gt;
&lt;br /&gt;
♦ Despreciaremos la '''viscosidad del fluido''' entendida como una fuerza interna de rozamiento.&lt;br /&gt;
&lt;br /&gt;
♦ El '''efecto Bernouilli''' es consecuencia directa que surge a partir de su ecuación: Al aumentar la velocidad del punto disminuirá la presión de éste, es decir, habrá una relación inversa entre la presión y la velocidad del fluido. Dicho efecto nos facilitará el cálculo de los puntos de máxima y mínima presión.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Estableciendo una densidad constante para el fluido con ρ=2 y valor para la constante de la ecuación de 15 podremos calcular cuál es la presión de éste en cada uno de sus puntos.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \frac{1}{2}ρ (|\vec{u}|)^2 + p = cte &amp;lt;/math&amp;gt; → ρ=2 y cte=15 →  &amp;lt;math&amp;gt; (|\vec{u}|)^2 + p = 15 &amp;lt;/math&amp;gt; → \(\boxed { p= 15 - 4 [(1-\frac{4}{ρ^2})^2 cos^2θ + (ρ+\frac{4}{ρ})^2 \frac{1}{ρ^2} sen^2θ]  } \)&lt;br /&gt;
&lt;br /&gt;
==== Curvas de nivel. ====&lt;br /&gt;
==== Presión media. ====&lt;br /&gt;
==== Variación de la velocidad y la presión. ====&lt;br /&gt;
Como se ha comentado en el primer apartado de esta sección existe una relación entre la velocidad de flujo y la presión estática del fluido determinada por el efecto Bernouilli que establece que en los puntos donde la velocidad aumenta disminuirá la presión y viceversa, por lo que podemos afirmar que aquellos donde la presión sea máxima la velocidad será mínima así como donde la primera sea mínima la velocidad será máxima.&lt;br /&gt;
&lt;br /&gt;
La variación de la presión estática y de la velocidad de una partícula del fluido seguirá una relación inversa que podremos comprobar con el dibujo de las gráficas de las líneas de corriente \(\vec{v}\), la presión P y el módulo de la velocidad. Podremos ver en las gráfica  como aquellos puntos que alcanzan el valor máximo corresponden al color rojo mientras que aquellos en los que es mínimo se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
♦ Observando la gráfica de la velocidad podemos ver como los puntos máximo se concentran puntos superiores e inferiores (θ=0 y θ=π y alrededores) en el obstáculo (ρ=2) y algunos ligeramente menores en los lados (θ=π/2 y θ=3π/2 y alrededores) en la frontera exterior de ρ=6. El resto de la gráfica la observamos en colores azulados que nos indican los puntos de menor velocidad.&lt;br /&gt;
&lt;br /&gt;
♦ Sin embargo en el dibujo de la presión se observa como ocurre exactamente lo contrario, ésta tiende a colores rojizos en la mayor parte de la función salvo en aquellos puntos donde la velocidad era rojo que podemos ver en tonos azules. &lt;br /&gt;
&lt;br /&gt;
De igual modo que la velocidad tiende a minimizar en la mayoría de los puntos de igual zona, la presión tenderá al máximo en los mismos puntos, viéndose reducidos por tanto aquellos en los que se maximiza la velocidad y reduce al mínimo la presión. Es decir vemos como una partícula con velocidad pequeña o reducida al mínimo tiene una gran presión, pero si ésta se acerca al 'extremo norte' o 'extremo sur' del obstáculo (ρ=2) o a los 'extremos este y oeste de la frontera exterior de ρ=6.&lt;br /&gt;
&lt;br /&gt;
==.- Teorema de Kutta-Joukowski y paradoja de D'Alembert. ==&lt;br /&gt;
Debemos comprobar que la circulación del campo \(\vec{u}\) a lo largo de la circunferencia de radio 2 centrada en el origen.&lt;br /&gt;
&lt;br /&gt;
Antes de proceder al cálculo directo de la integral analizaremos nuestro caso detenidamente pues podemos anticiparnos al resultado. Nuestro campo \(\vec{u}\) posee un potencial escalar ψ', pues su rotacional es cero lo cual nos lleva a dos posibles deducciones del valor de la circulación en la curva.&lt;br /&gt;
&lt;br /&gt;
→ Por un lado el '''teorema de Stokes''' establece que la integral de un campo vectorial alrededor de una frontera de la superficie es igual a la del rotacional de éste mismo campo alrededor de toda la superficie. Al ser el rotacional de campo \(\vec{u}\) nulo podemos afirma que la circulación a lo largo del obstáculo será nula. &lt;br /&gt;
  &amp;lt;math&amp;gt; ∫_{əS} \vec {u} \vec {dr} = ∫_S (\nabla\times\vec{u}) \vec {dS}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
→ Por otro lado al poseer el campo un potencial escalar, la circulación no dependerá del camino recorrido pues únicamente influye en ella el origen y el extremo de éste pues todo campo que tenga asociado un potencial escalar será '''conservativo'''.&lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
Además vemos que la curva sobre la que estamos trabajando tiene como origen y como extremo el mismo punto, es decir, se trata de una '''curva cerrada''' y por tanto la circulación será nula. &lt;br /&gt;
 &amp;lt;math&amp;gt; ∫_Ύ \vec {u} \vec {dr} = ∫_0^{2π} \vec u \vec {dr}= φ(2π)- φ(0)=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El '''teorema de Kutta-Joukowski''', que establece que la fuerza que ejerce el fluido sobre el obstáculo no es sólo proporcional a la circulación si no también a la densidad y la velocidad de fluido. La ecuación viene dado por: &lt;br /&gt;
 →l: La '''fuerza de sustentación'''.&lt;br /&gt;
 →ρ: '''Densidad''' del fluido.&lt;br /&gt;
 →v: '''Velocidad''' del fluido.&lt;br /&gt;
 →Γ: '''La circulación.'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\(\boxed [ l=ρvΓ \])&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al ser nula la circulación, el obstáculo no se ve sometido a ninguna fuerza por el fluido lo cual nos lleva a mencionar la siguiente paradoja pues el resultado obtenido se aleja por completo de aquel hubiéramos podido intuir con la descripción del movimiento del fluido, la '''paradoja de D'Alembert'''.&lt;br /&gt;
&lt;br /&gt;
Si el resultado de las fuerzas ejercidas sobre el obstáculo no hubiesen sido nulas éstas serían ortogonales a las líneas de corriente.&lt;/div&gt;</summary>
		<author><name>SReig</name></author>	</entry>

	</feed>