<?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=Javier+Fab%C3%B3n</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=Javier+Fab%C3%B3n"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Javier_Fab%C3%B3n"/>
		<updated>2026-04-29T17:26:17Z</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_fluidos_(Grupo_C12)&amp;diff=7603</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7603"/>
				<updated>2013-12-10T19:26:52Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Puntos de velocidad nula y velocidad máxima */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable '''y''' (altura del punto). Sabiendo que '''s=vt''' y para tiempo igual a 1 segundo, '''s=v''', o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula y en el centro, al tener el máximo valor de '''y''', es máxima. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}= (1-2y)\frac{p_1-p_2}{2μ}\vec{k}&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
'''¿Es razonable?'''&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;''la paleta''&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en '''x''', es lógico coger una sección cualquiera &amp;quot;'''x'''&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
&amp;lt;math&amp;gt;T(x,y)=(x-1)^2-y^2    &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7580</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7580"/>
				<updated>2013-12-10T19:07:07Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}= (1-2y)\frac{p_1-p_2}{2μ}\vec{k}&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
'''¿Es razonable?'''&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;''la paleta''&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en '''x''', es lógico coger una sección cualquiera &amp;quot;'''x'''&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
&amp;lt;math&amp;gt;T(x,y)=(x-1)^2-y^2    &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7579</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7579"/>
				<updated>2013-12-10T19:06:32Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Campo de temperatura */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}= (1-2y)\frac{p_1-p_2}{2μ}\vec{k}&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
'''¿Es razonable?'''&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;''la paleta''&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en '''x''', es lógico coger una sección cualquiera &amp;quot;'''x'''&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
&amp;lt;math&amp;gt;T(x,y)=(x-1)^2-y^2    &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7574</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7574"/>
				<updated>2013-12-10T19:03:03Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}= (1-2y)\frac{p_1-p_2}{2μ}\vec{k}&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
'''¿Es razonable?'''&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;''la paleta''&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en '''x''', es lógico coger una sección cualquiera &amp;quot;'''x'''&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7571</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7571"/>
				<updated>2013-12-10T19:02:04Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}= (1-2y)\frac{p_1-p_2}{2μ}\vec{k}&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
¿Es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;''la paleta''&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en '''x''', es lógico coger una sección cualquiera &amp;quot;'''x'''&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7570</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7570"/>
				<updated>2013-12-10T19:01:28Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}= (1-2y)\frac{p_1-p_2}{2μ}\vec{k}&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
'''(PROGRAMA Y GRÁFICA DEL ROTACIONAL AQUÍ)'''&lt;br /&gt;
&lt;br /&gt;
¿Es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;''la paleta''&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en '''x''', es lógico coger una sección cualquiera &amp;quot;'''x'''&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7569</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7569"/>
				<updated>2013-12-10T18:57:59Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}= (1-2y)\frac{p_1-p_2}{2μ}\vec{k}&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7567</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7567"/>
				<updated>2013-12-10T18:56:50Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec u|= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{vmatrix}= \begin{vmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \ (y-y^2)\frac{p_1-p_2}{2μ} &amp;amp; 0 &amp;amp; 0 \end{vmatrix}=0&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]]&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7564</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7564"/>
				<updated>2013-12-10T18:51:57Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7563</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7563"/>
				<updated>2013-12-10T18:51:22Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7562</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7562"/>
				<updated>2013-12-10T18:50:23Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=\frac{p_1-p_2}{2μ}(\frac{y^2}{2}-\frac{y^3}{3})+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7558</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7558"/>
				<updated>2013-12-10T18:46:44Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Puntos de velocidad nula y velocidad máxima */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7557</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7557"/>
				<updated>2013-12-10T18:46:15Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Puntos de velocidad nula y velocidad máxima */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad '''máxima''', se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7555</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7555"/>
				<updated>2013-12-10T18:45:20Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Puntos de velocidad nula y velocidad máxima */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es '''nula''' y en cuáles es '''máxima'''.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es '''nula'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para hallar los puntos de velocidad máxima, se obtienen los extremos relativos de la función &amp;lt;math&amp;gt;g(y)=y-y^2&amp;lt;/math&amp;gt;, que serán los mismos que los de la función dada.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g'(y)=0  \longrightarrow  1-2y=0  \longrightarrow  y=0.5&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;g''(y)=-2&amp;lt;0&amp;lt;/math&lt;br /&gt;
&lt;br /&gt;
La función presenta un máximo en '''y=0.5'''&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7543</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7543"/>
				<updated>2013-12-10T18:34:18Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Puntos de velocidad nula y velocidad máxima */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
A continuación, se investiga en qué puntos la velocidad es nula y en cuáles es máxima.&lt;br /&gt;
En primer lugar, se iguala la expresión de la velocidad al vector $\vec{0}$, para averiguar dónde es nula&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{u}=y(1-y)\frac{p_1-p_2}{2μ}\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
y(1-y)=0   \left \{ \begin{matrix} y=0&lt;br /&gt;
\\ y=1 \end{matrix}\right.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7531</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7531"/>
				<updated>2013-12-10T18:17:23Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Condición de incompresibilidad */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7530</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7530"/>
				<updated>2013-12-10T18:16:26Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Condición de incompresibilidad */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}+\frac{\partial u_2}{\partial y} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
En el caso estudiado, &amp;lt;math&amp;gt;u_2(x,y)=0&amp;lt;/math&amp;gt; y, por tanto, &amp;lt;math&amp;gt;\nabla \cdot \vec{u}=\frac{\partial u_1}{\partial x}=\frac{\partial}{\partial x}(\frac{y(1-y)(p_1-p_2)}{2μ})=0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7527</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7527"/>
				<updated>2013-12-10T18:08:27Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Condición de incompresibilidad */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
La comprobación de las ecuaciones de Navier-Stokes pasa ahora por verificar que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7525</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7525"/>
				<updated>2013-12-10T18:04:40Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en '''''x=1''''' y '''''x=2''''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7524</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7524"/>
				<updated>2013-12-10T18:03:57Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en ''''x=1'''' y ''''x=2'''' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7523</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7523"/>
				<updated>2013-12-10T18:03:23Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en ''x=1'' y ''x=2'' respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7522</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7522"/>
				<updated>2013-12-10T18:02:11Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria '''(1)''' y la  condición de incompresibilidad '''(2)''', que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;   '''(1)''' &amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  '''(2)'''&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7521</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7521"/>
				<updated>2013-12-10T18:01:16Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas '''cartesianas''' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprobado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7519</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7519"/>
				<updated>2013-12-10T18:00:38Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Se comprueba si el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Al trabajar en coordenadas ''cartesianas'' las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se comprueba si se cumple la igualdad&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Queda comprabado.&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7518</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7518"/>
				<updated>2013-12-10T17:57:38Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p= \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix}\cdot \begin{pmatrix}&lt;br /&gt;
      (y-y^2)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0  \\&lt;br /&gt;
   \end{pmatrix} + \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}=μ \Delta\vec{u}=\begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7506</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7506"/>
				<updated>2013-12-10T17:24:12Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial^2 u_1}{\partial x^2}+\frac{\partial^2 u_1}{\partial y^2} \\&lt;br /&gt;
      \frac{\partial^2 u_2}{\partial x^2}+\frac{\partial^2 u_2}{\partial y^2} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7504</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7504"/>
				<updated>2013-12-10T17:21:35Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7503</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7503"/>
				<updated>2013-12-10T17:20:42Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\nabla\ p)_1 \\&lt;br /&gt;
      (\nabla\ p)_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      p_2-p_1 \\&lt;br /&gt;
      0 \end{pmatrix}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7500</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7500"/>
				<updated>2013-12-10T17:14:47Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7498</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7498"/>
				<updated>2013-12-10T17:13:47Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{\partial p}{\partial x} \\&lt;br /&gt;
      \frac{\partial p}{\partial y} \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      \frac{p_2-p_1}{μ} \\&lt;br /&gt;
      0 \end{pmatrix}&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7492</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7492"/>
				<updated>2013-12-10T17:10:05Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Operando:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij})= \begin{pmatrix}&lt;br /&gt;
      \frac{\partial u_1}{\partial x} &amp;amp;  \cfrac{\partial u_1}{\partial y}  \\&lt;br /&gt;
      \frac{\partial u_2}{\partial x} &amp;amp;  \cfrac{\partial u_2}{\partial y}  \\&lt;br /&gt;
   \end{pmatrix} = \begin{pmatrix}&lt;br /&gt;
      0 &amp;amp;  (1-2y)\frac{p_1-p_2}{2μ}  \\&lt;br /&gt;
      0 &amp;amp;  0  \\&lt;br /&gt;
   \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7478</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7478"/>
				<updated>2013-12-10T16:48:11Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} \cdot u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;((\nabla\vec{u})_{ij}) \cdot \begin{pmatrix}&lt;br /&gt;
      u_1 \\&lt;br /&gt;
      u_2 \end{pmatrix}       +\begin{pmatrix}&lt;br /&gt;
      (\nabla p)_1 \\&lt;br /&gt;
      (\nabla p)_2 \end{pmatrix} = μ\cdot\begin{pmatrix}&lt;br /&gt;
      (\Delta\vec{u})_1 \\&lt;br /&gt;
      (\Delta\vec{u})_2 \end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7477</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7477"/>
				<updated>2013-12-10T16:38:22Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;(\nabla\vec{u})_{ij} u_j+(\nabla p)_i= μ (\Delta\vec{u})_i &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora pasamos la expresión a matrices:&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7475</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7475"/>
				<updated>2013-12-10T16:31:37Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuación estacionaria */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esta expresión en lenguaje indicial será:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora pasamos la expresión a matrices:&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7474</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7474"/>
				<updated>2013-12-10T16:29:15Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
y presión &amp;lt;math&amp;gt;\vec{p}(x,y)=p_1+(p_2-p_1)(x-1)&amp;lt;/math&amp;gt;&lt;br /&gt;
donde $p_1$ y $p_2$ son la presión en x=1 y x=2 respectivamente&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder operar analíticamente pasamos la expresión a lenguaje indicial:&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora pasamos la expresión a matrices:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7473</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=7473"/>
				<updated>2013-12-10T16:25:56Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria(1) y la  condición de incompresibilidad(2), que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt;  (1)&amp;lt;/center&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;  (2)&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}\vec{i}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder operar analíticamente pasamos la expresión a lenguaje indicial:&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora pasamos la expresión a matrices:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=6752</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=6752"/>
				<updated>2013-12-09T22:54:17Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt; (Estacionaria)&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt; (Incompresibilidad)&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y\cdot(1-y)\frac{p_1-p_2}{2μ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder operar analíticamente pasamos la expresión a lenguaje indicial:&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora pasamos la expresión a matrices:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=6747</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=6747"/>
				<updated>2013-12-09T22:50:45Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Ecuaciones de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
== Ecuaciones de Navier-Stokes ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente, salvo ciertos tipos de flujo y situaciones muy concretas, y se tiene que llevar a cabo un análisis numérico para obtener una solución aproximada.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt; (Estacionaria)&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt; (Incompresibilidad)&lt;br /&gt;
&lt;br /&gt;
Siendo '''$\vec{u}$''' la velocidad del fluido y '''p''' la presión del mismo.&lt;br /&gt;
&lt;br /&gt;
Sea un fluido con velocidad &amp;lt;math&amp;gt;\vec{u}(x,y)=u_1(x,y)\vec{i}+u_2(x,y)\vec{j}=y*(1-y)\frac{p_1-p_2}{2μ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Ecuación estacionaria ===&lt;br /&gt;
Veamos el fluido satisface la ecuación de Navier-Stokes estacionaria&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder operar analíticamente pasamos la expresión a lenguaje indicial:&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Al trabajar en coordenadas cartesianas las componentes contravariantes y covariantes coinciden.&lt;br /&gt;
Ahora pasamos la expresión a matrices:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Condición de incompresibilidad ===&lt;br /&gt;
Continuemos la comprobación de las ecuaciones de Navier-Stokes viendo que se trata de un fluido incompresible, es decir, que ni se expande ni se contrae. Para ello debemos comprobar, como ya antes se ha mencionado:&lt;br /&gt;
&lt;br /&gt;
La divergencia de '''$\vec{u}$''' se define como:&lt;br /&gt;
&lt;br /&gt;
== Campo de presiones y campo de velocidades ==&lt;br /&gt;
Para el estudio de los campos de presiones y velocidades, consideramos el flujo del fluido a través de un canal con paredes rectas de dimensiones 1mx4m. &lt;br /&gt;
&lt;br /&gt;
Trabajaremos en el plano con coordenadas cartesianas. Empezamos definiendo un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1], simulando el canal.&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|sinmarco|centro|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Campo de presiones ===&lt;br /&gt;
Veamos el campo de presiones del fluido:&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|sinmarco|centro|Campo de presiones]] &lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|sinmarco|centro|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
&lt;br /&gt;
El campo de presiones viene representado por una ecuación, la cual sólo depende de la variable x, lo que nos conduce a afirmar que para todo valor de y arbitrario, la presión depende de x exclusivamente. Esto explica y da sentido a nuestras gráficas ya que la zona de color rojo nos indica altas presiones al ser los valores de x próximos a cero, y alcanzar la función máximos valores para cualquier valor de y. A medida que aumentamos los valores de x la presión disminuye y alcanza ese tono azul. &lt;br /&gt;
&lt;br /&gt;
Para obtener la gráfica en 2D simplemente proyectamos.&lt;br /&gt;
&lt;br /&gt;
=== Campo de velocidades ===&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%visualización del campo de velocidades&lt;br /&gt;
x=0:0.5:4; %Mallado en x&lt;br /&gt;
y=0:0.1:1; %Mallado en y&lt;br /&gt;
[xx,yy]=meshgrid (x,y);&lt;br /&gt;
ux=1/2.*(yy-yy.^2);&lt;br /&gt;
uy=0.*xx&lt;br /&gt;
figure(1)&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagencampodevelocidades.jpg|200px|sinmarco|centro|Campo de velocidades]] &lt;br /&gt;
&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&lt;br /&gt;
&lt;br /&gt;
Corroboramos lo visto analíticamente mediante la siguiente gráfica:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:velocidadampliada.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
[[Archivo:seccionvelocidad.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
 &lt;br /&gt;
En la primera gráfica representamos el sólido antes de desplazarse en dicho mallado de puntos, y proyectado según los ejes.&lt;br /&gt;
Para representar el desplazamiento longitudinal, usamos el campo de velocidades del fluido, el cual depende de la variable y (altura del punto). Sabiendo que s=vt y para tiempo igual a 1 segundo, s=v, o lo que es lo mismo, el valor del desplazamiento coincide con el de la velocidad. Por lo tanto, sumamos al punto su velocidad y vemos el desplazamiento que experimenta. De esta forma, en las paredes del canal, no hay desplazamiento por tanto la velocidad es nula, y en el centro es máxima, al tener el máximo valor de y. Esto es lo que queda representado en la segunda gráfica.&lt;br /&gt;
La tercera gráfica muestra todo lo anterior pero en una sección x.&lt;br /&gt;
&lt;br /&gt;
==== Líneas de corriente ====&lt;br /&gt;
&lt;br /&gt;
Vamos a dibujar ahora las líneas de corriente del campo de velocidades $\vec{u}$, es decir, las líneas de corriente son tangentes a $\vec{u}$en cada punto.&lt;br /&gt;
De forma general, siendo  $\vec{u}$ un campo cualquiera que tenga Ψ como potencial escalar, las superficies equipotenciales (superficies con el mismo potencial) se caracterizan por ser ortogonales al campo en cada punto.&lt;br /&gt;
En el caso tratado, al trabajar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja (en nuestro caso el plano XOY)&lt;br /&gt;
Para definir las líneas de corriente $\vec{u}$ (tangentes al campo $\vec{u}$ en cada punto) vamos a definir un campo $\vec{v}$ ortogonal al mismo en cada punto y definir éstas como las líneas equipotenciales de $\vec{v}$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  [0,4]x[0,1]\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Existe&lt;br /&gt;
&amp;lt;math&amp;gt;\exists[0,4]x[0,1]: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt; tal que&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Su representación gráfica en matlab es:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.25:4;       &lt;br /&gt;
y=0:0.2:1;            &lt;br /&gt;
[xx,yy]=meshgrid(x,y); % Mallado en [0,4]x[0,1] con equidistancia 0.1&lt;br /&gt;
p=(1/2).*((yy.^2/2)-(yy.^3/3)); % Potencial escalar&lt;br /&gt;
contour(xx,yy,p)  %Líneas de nivel&lt;br /&gt;
axis([0,4,-1,2])      % Ejes en [0,4]x[-1,2]&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:potencial1.jpg|400px|sinmarco|centro|Potencial del campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
(Explicación analítica)&lt;br /&gt;
&lt;br /&gt;
¿es razonable?&lt;br /&gt;
&lt;br /&gt;
Entendamos el rotacional como un vector perpendicular al plano de curvatura del campo que caracteriza el efecto de giro o rotación del fluido. Para entender esto podemos verlo con el ejemplo práctico de &amp;quot;la paleta&amp;quot;:&lt;br /&gt;
&lt;br /&gt;
Para ver la rotación en un punto, cogemos una sección a la que pertenezca el punto y dibujamos su campo de velocidades. Como éste es constante en x, es lógico coger una sección cualquiera &amp;quot;x&amp;quot;. (ver figura adjunta). Nos imaginamos al lado del campo de velocidades una &amp;quot;paleta&amp;quot; que tiene como eje de giro el punto en cuestión. El campo de velocidades &amp;quot;empujará&amp;quot; la paleta de una forma u otra en función de dónde se encuentre dicho eje. Veamos algunos ejemplos:&lt;br /&gt;
(EJEMPLO EN MEDIO, EN LA MITAD SUPERIOR Y EN EXTREMO)&lt;br /&gt;
Si el eje está en medio, el campo por arriba y por abajo son iguales, pero empujan en sentido contrario por tanto, el rotacional será nulo.&lt;br /&gt;
&lt;br /&gt;
Si el eje está en el medio de la parte superior, girará en sentido antihorario porque el empuje del campo por abajo es mayor que el de arriba.&lt;br /&gt;
&lt;br /&gt;
Por último, si el eje está en el extremo superior, todo el campo empujará la paleta en sentido antihorario.&lt;br /&gt;
&lt;br /&gt;
En la parte inferior sería totalmente análogo al ser simétrico.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Valor absoluto del rotacional&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
x=abs(1/2*(1-2*y));&lt;br /&gt;
plot(x,y)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Imagenvalorabsolutorotacional.jpg|200px|sinmarco|centro|Valor absoluto del rotacional]] &lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&lt;br /&gt;
Supongamos que la temperatura del fluido viene dado por el campo:&lt;br /&gt;
Veamos su representación gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=((xx-1).^2)-yy.^2&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:campodetemperaturas1.jpg|400px|sinmarco|centro|Campo de Temperaturas]]&lt;br /&gt;
[[Archivo:campodetemperaturas2.jpg|400px|sinmarco|centro|Campo de Temperaturas sobre el plano z=0]]&lt;br /&gt;
&lt;br /&gt;
Sea '''$\vec{w}$''' el gradiente de la temperatura. Comprobemos gráficamente que son ortogonales.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
f=inline('((x-1).^2)-y.^2','x','y');  %Campo escalar de temperatura&lt;br /&gt;
fx=inline('2.*(x-1)','x','y');  %derivadas parciales del campo&lt;br /&gt;
fy=inline('2.*y','x','y');&lt;br /&gt;
x=0:0.1:4;&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[X,Y]=meshgrid(x,y); %hacemos el mallado&lt;br /&gt;
Z=f(X,Y);&lt;br /&gt;
contour(X,Y,Z,20,'k'); %Curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
xx=0:0.25:4;&lt;br /&gt;
yy=0:0.1:1;&lt;br /&gt;
[XX,YY]=meshgrid(xx,yy) %Representación de las flechas&lt;br /&gt;
U=fx(XX,YY);&lt;br /&gt;
V=fy(XX,YY);&lt;br /&gt;
quiver(XX,YY,U,V)&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:fugure8.jpg|400px|sinmarco|centro|Campo de Temperaturas y lineas equipotenciales]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
OBSERVACIÓN: Esta propiedad, aplicada al campo de velocidades, es la utilizada para definir las líneas de corriente del mismo.&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
.&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4339</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4339"/>
				<updated>2013-12-08T10:57:59Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  Ω\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\existsΨ: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4336</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4336"/>
				<updated>2013-12-08T10:54:13Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  Ω\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\existsΨ: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Del sistema de ecuaciones diferenciales se deduce el potencial Ψ&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;Ψ=(1-x)(y-y^2)\frac{p_1-p_2}{2μ}+C&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4333</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4333"/>
				<updated>2013-12-08T10:47:53Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  Ω\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\existsΨ: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\left . &lt;br /&gt;
      \begin{matrix} &lt;br /&gt;
         \frac{\partial Ψ}{\partial x}=u_1(x,y) \\&lt;br /&gt;
         \frac{\partial Ψ}{\partial y}=u_2(x,y)&lt;br /&gt;
      \end{matrix} &lt;br /&gt;
   \right \}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4269</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4269"/>
				<updated>2013-12-07T21:56:45Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  Ω\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\existsΨ: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\{\begin{array} derivada1 \\derivada2 \end{array}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4266</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4266"/>
				<updated>2013-12-07T21:36:13Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  Ω\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\existsΨ: \mathbb{R^2}\longrightarrow\mathbb{R}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\nablaΨ\longrightarrow\vec{v}(x,y)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4262</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4262"/>
				<updated>2013-12-07T21:28:07Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Considerando&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{v}:  Ω\subset\mathbb{R^2}\longrightarrow\mathbb{R^2}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;(x,y)\longrightarrow\vec{v}(x,y)=\displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4256</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4256"/>
				<updated>2013-12-07T21:18:03Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec{v}=\vec{k}\times \vec{u} = \displaystyle\frac{y(1-y)(p_1-p_2)}{n}\vec{j}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4255</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4255"/>
				<updated>2013-12-07T21:05:55Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  $\vec{u}$ un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente $\vec{v}$, que son tangentes al campo $\vec{u}$, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4254</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4254"/>
				<updated>2013-12-07T21:05:14Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo  \vec{u} un campo con potencial escalar Ψ, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en $\mathbb{R^2}$ , las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
Las líneas de corriente \vec{v}, que son tangentes al campo \vec{u}, se pueden definir como las líneas equipotenciales de un campo ortogonal al mismo&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4251</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4251"/>
				<updated>2013-12-07T20:45:50Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: /* Líneas de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
Siendo U un campo con potencial escalar PHI, el campo es ortogonal a las superficies equipotenciales en cada punto, es decir, el campo es ortogonal al plano tangente a las superficies equipotenciales.&lt;br /&gt;
En el caso tratado, al estar en R2, las superficies equipotenciales pasarán a ser líneas equipotenciales y se definirán como la intersección entre la superficie equipotencial y el plano en el que se trabaja.&lt;br /&gt;
&lt;br /&gt;
(...ESTÁ SIENDO MODIFICADO)&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4033</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4033"/>
				<updated>2013-12-07T13:03:56Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4032</id>
		<title>Visualización de campos en fluidos (Grupo C12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_fluidos_(Grupo_C12)&amp;diff=4032"/>
				<updated>2013-12-07T13:02:54Z</updated>
		
		<summary type="html">&lt;p&gt;Javier Fabón: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de Campos en fluidos(Grupo C12)|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Introducción. Ecuación de Navier-Stokes. Cumplimiento. ==&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes son un conjunto de ecuaciones que describen el movimiento de fluidos. Con ellas se pueden analizar corrientes oceánicas, flujo alrededor de aviones o vehículos o cualquier otro fluido newtoniano presente en la atmósfera de la Tierra.&lt;br /&gt;
Estas ecuaciones son en derivadas parciales no lineales, y por ello no se tiene solución para las mismas. La mayoría de las veces no se pueden usar analíticamente y se tiene que llevar a cabo un análisis numérico para obtener su solución.&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones de Navier-Stokes para un fluido son la estacionaria y la  condición de incompresibilidad, que se comprueban a continuación&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u} \cdot \nabla \vec{u} + \nabla p=μ \Delta\vec{u} &amp;lt;/math&amp;gt; &amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\nabla \cdot \vec{u}=0 &amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Campos de velocidades, presiones y temperatura ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Vamos a considerar el flujo de un fluido incompresible a través de un canal con paredes rectas. Trabajaremos en el plano con coordenadas cartesianas.&lt;br /&gt;
Para empezar definimos un mallado de ejes [0,4]x[-1,2] y dentro de ellos el fluido que ocupa el rectángulo [0,4]x[0,1]&lt;br /&gt;
El codigo matlab para realizarlo es el siguiente&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);     %Hacemos el mallado&lt;br /&gt;
mesh(xx,yy,xx*0) &lt;br /&gt;
axis([0,4,-1,2])  %Definimos los ejes  }}&lt;br /&gt;
[[Archivo:C-12-1.jpg|400px|thumb|left|Mallado de puntos]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
mesh(xx,yy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
%Sólido después de desplazarse&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy));&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
mesh(xx+ux,yy+uy,0*xx)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
 }}&lt;br /&gt;
[[Archivo:C-12-21.jpg|400px|thumb|right|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt; p_{1}=2&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt; p_{2}=1&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; \mu=1&amp;lt;/math&amp;gt; los campos de presiones y velocidades que resultan:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujo del campo&lt;br /&gt;
x=0:0.1:4;    %Mallado en el intervalo [0,4]x[0,1] con longitud de paso de 0,1&lt;br /&gt;
y=0:0.1:1;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);   &lt;br /&gt;
%Sólido antes de desplazarse&lt;br /&gt;
figure(1);&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p= 3 - xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
%axis([0,4,-1,2])&lt;br /&gt;
figure(2)&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
p=3-xx;&lt;br /&gt;
surf(xx,yy,p)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
figure(3)&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
ux=(1/2)*(yy.*(1-yy))&lt;br /&gt;
uy=0*xx;&lt;br /&gt;
quiver(xx,yy,ux,uy)&lt;br /&gt;
axis([0,4,-1,2])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C-12-311.jpg|200px|thumb|left|Campo de presiones]]&lt;br /&gt;
[[Archivo:C-12-321.jpg|200px|thumb|left|Campo de presiones proyectado sobre z=0]]&lt;br /&gt;
[[Archivo:C-12-332.jpg|200px|thumb|right|Campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Líneas de corriente ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Javier Fabón</name></author>	</entry>

	</feed>