<?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=Jes%C3%BAs+Manuel+Ruiz</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=Jes%C3%BAs+Manuel+Ruiz"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Jes%C3%BAs_Manuel_Ruiz"/>
		<updated>2026-04-29T13:27:16Z</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=7909</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=7909"/>
				<updated>2013-12-11T11:14:53Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: /* 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;
&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;
[[Archivo:2Rotacional.jpg|miniaturadeimagen]]&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>Jesús Manuel Ruiz</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:2Rotacional.jpg&amp;diff=7908</id>
		<title>Archivo:2Rotacional.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:2Rotacional.jpg&amp;diff=7908"/>
				<updated>2013-12-11T11:13:29Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jesús Manuel Ruiz</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=6065</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=6065"/>
				<updated>2013-12-09T16:58:52Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: &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 $\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μ}&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;
&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:C-12-21.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&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.&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;
==== 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;
&lt;br /&gt;
Veamos su representación gráfica. &lt;br /&gt;
(FALTA GRÁFICA)&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;
&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;
(falta subir gráfica)&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>Jesús Manuel Ruiz</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=6056</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=6056"/>
				<updated>2013-12-09T16:57:42Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: &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 $\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μ}&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;
&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;
(poner Imagencampodevelocidades)&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:C-12-21.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&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.&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)=v_1(x,y)$\vec{i}+v_2(x,y)$\vec{j}=\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;
==== 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;
(poner Imagenvalorabsolutorotacional)&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;
&lt;br /&gt;
Veamos su representación gráfica. &lt;br /&gt;
(FALTA GRÁFICA)&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;
&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;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;br /&gt;
&lt;br /&gt;
(falta subir gráfica)&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;/div&gt;</summary>
		<author><name>Jesús Manuel Ruiz</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=6040</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=6040"/>
				<updated>2013-12-09T16:52:35Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: &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 $\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μ}&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;
&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;
(poner Imagencampodevelocidades)&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:C-12-21.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&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.&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)=v_1(x,y)*$\vec{i}+v_2(x,y)*$\vec{j}=\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Ψ: \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;
==== 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;
(poner Imagenvalorabsolutorotacional)&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&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;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Jesús Manuel Ruiz</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=5985</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=5985"/>
				<updated>2013-12-09T16:30:22Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: &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 $\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μ}&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;
&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;
(poner Imagencampodevelocidades)&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:C-12-21.jpg|400px|sinmarco|centro|Sólido antes y después de desplazarse]]&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.&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;
==== Rotacional ====&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;
(poner Imagenvalorabsolutorotacional)&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&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;
{{ Beta }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2013-14]]&lt;/div&gt;</summary>
		<author><name>Jesús Manuel Ruiz</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=5958</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=5958"/>
				<updated>2013-12-09T16:15:06Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: &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 $\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μ}&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;
&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|200px|sinmarco|centro|Campo de velocidades]]&lt;br /&gt;
==== Puntos de velocidad nula y velocidad máxima ====&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|sinmarco|centro|Sólido antes y después de desplazarse]]&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;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&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>Jesús Manuel Ruiz</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=5922</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=5922"/>
				<updated>2013-12-09T15:56:27Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: &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 $\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μ}&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;
&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;
{{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|sinmarco|centro|Sólido antes y después de desplazarse]]&lt;br /&gt;
&lt;br /&gt;
El campo de &lt;br /&gt;
=== Campo de velocidades ===&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;
}}&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;
==== Puntos de velocidad nula y velocidad máxima ====&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;
==== Rotacional ====&lt;br /&gt;
&lt;br /&gt;
== Campo de temperatura ==&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>Jesús Manuel Ruiz</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=4399</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=4399"/>
				<updated>2013-12-08T12:52:33Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: /* Campos de velocidades, presiones y 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;
&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;
== 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>Jesús Manuel Ruiz</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=4398</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=4398"/>
				<updated>2013-12-08T12:52:11Z</updated>
		
		<summary type="html">&lt;p&gt;Jesús Manuel Ruiz: /* Campos de velocidades, presiones y 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;
&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]] hfj&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;
== 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>Jesús Manuel Ruiz</name></author>	</entry>

	</feed>