<?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=ALBERTO</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=ALBERTO"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/ALBERTO"/>
		<updated>2026-05-02T11:51:25Z</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_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37691</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37691"/>
				<updated>2016-12-05T18:32:49Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Divergencia y rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
[[Archivo:Rotas.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
[[Archivo:Desa.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Obtenemos el resultado de que la circulación es nula. Esto va en contra de la intuición ya que se supone que el fluido deberia ejercer una fuerza sobre el obstáculo, pero aplicando el Teorema de Kutta-Joukowski, que como hemos dicho antes dice que la fuerza es proporcional a la circulación, llegamos a la conclusión de que la fuerza deberia ser nula también. Encontrandonos con la conocida como Paradoja de D'Alembert.&lt;br /&gt;
&lt;br /&gt;
==Curvas de presión==&lt;br /&gt;
En la figura observamos que la presión es mucho más alta en los extremos superior e inferior, siendo esto coherente con lo desarrollado en apartados anteriores.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
contour(X,Y,p,50,'linewidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:Jiji.jpg|1000px|thumb|centro|Curvas de nivel de la presión del fluido]]&lt;br /&gt;
&lt;br /&gt;
==Presión media del fluido==&lt;br /&gt;
Vamos a calcular la presión media del fluido. Para ello se hará un aproximación de la integral de la presión y lo dividiremos entre el área de la región que ocupa el fluido. En este caso es el área de una corona circular de radios 5 y 1.&lt;br /&gt;
El área es igual a π·(25-1)=24π&lt;br /&gt;
&lt;br /&gt;
Con esto, ya podemos calcular la presión media del fluido con el siguiente código&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
h=0.01;&lt;br /&gt;
rho=1:h:5;&lt;br /&gt;
th=0:h:2*pi;&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Presión del fluido&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2+(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
%Integral de la presión&lt;br /&gt;
pres=U.*p;&lt;br /&gt;
%Integral&lt;br /&gt;
volumen=h^2*pres;&lt;br /&gt;
w=sum(sum(volumen));&lt;br /&gt;
%Área de la corona circular&lt;br /&gt;
area=(pi*5^2)-(pi*1^2);&lt;br /&gt;
%Presión media&lt;br /&gt;
presmedia=w/area&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
 '''El resultado de la presión media ha resultado ser P=10.3065'''&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Rotas.png&amp;diff=37690</id>
		<title>Archivo:Rotas.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Rotas.png&amp;diff=37690"/>
				<updated>2016-12-05T18:32:19Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37689</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37689"/>
				<updated>2016-12-05T18:27:09Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Divergencia y rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
[[Archivo:Desa.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Obtenemos el resultado de que la circulación es nula. Esto va en contra de la intuición ya que se supone que el fluido deberia ejercer una fuerza sobre el obstáculo, pero aplicando el Teorema de Kutta-Joukowski, que como hemos dicho antes dice que la fuerza es proporcional a la circulación, llegamos a la conclusión de que la fuerza deberia ser nula también. Encontrandonos con la conocida como Paradoja de D'Alembert.&lt;br /&gt;
&lt;br /&gt;
==Curvas de presión==&lt;br /&gt;
En la figura observamos que la presión es mucho más alta en los extremos superior e inferior, siendo esto coherente con lo desarrollado en apartados anteriores.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
contour(X,Y,p,50,'linewidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:Jiji.jpg|1000px|thumb|centro|Curvas de nivel de la presión del fluido]]&lt;br /&gt;
&lt;br /&gt;
==Presión media del fluido==&lt;br /&gt;
Vamos a calcular la presión media del fluido. Para ello se hará un aproximación de la integral de la presión y lo dividiremos entre el área de la región que ocupa el fluido. En este caso es el área de una corona circular de radios 5 y 1.&lt;br /&gt;
El área es igual a π·(25-1)=24π&lt;br /&gt;
&lt;br /&gt;
Con esto, ya podemos calcular la presión media del fluido con el siguiente código&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
h=0.01;&lt;br /&gt;
rho=1:h:5;&lt;br /&gt;
th=0:h:2*pi;&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Presión del fluido&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2+(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
%Integral de la presión&lt;br /&gt;
pres=U.*p;&lt;br /&gt;
%Integral&lt;br /&gt;
volumen=h^2*pres;&lt;br /&gt;
w=sum(sum(volumen));&lt;br /&gt;
%Área de la corona circular&lt;br /&gt;
area=(pi*5^2)-(pi*1^2);&lt;br /&gt;
%Presión media&lt;br /&gt;
presmedia=w/area&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
 '''El resultado de la presión media ha resultado ser P=10.3065'''&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Desa.png&amp;diff=37688</id>
		<title>Archivo:Desa.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Desa.png&amp;diff=37688"/>
				<updated>2016-12-05T18:26:36Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37687</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37687"/>
				<updated>2016-12-05T18:19:38Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Obtenemos el resultado de que la circulación es nula. Esto va en contra de la intuición ya que se supone que el fluido deberia ejercer una fuerza sobre el obstáculo, pero aplicando el Teorema de Kutta-Joukowski, que como hemos dicho antes dice que la fuerza es proporcional a la circulación, llegamos a la conclusión de que la fuerza deberia ser nula también. Encontrandonos con la conocida como Paradoja de D'Alembert.&lt;br /&gt;
&lt;br /&gt;
==Curvas de presión==&lt;br /&gt;
En la figura observamos que la presión es mucho más alta en los extremos superior e inferior, siendo esto coherente con lo desarrollado en apartados anteriores.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
contour(X,Y,p,50,'linewidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:Jiji.jpg|1000px|thumb|centro|Curvas de nivel de la presión del fluido]]&lt;br /&gt;
&lt;br /&gt;
==Presión media del fluido==&lt;br /&gt;
Vamos a calcular la presión media del fluido. Para ello se hará un aproximación de la integral de la presión y lo dividiremos entre el área de la región que ocupa el fluido. En este caso es el área de una corona circular de radios 5 y 1.&lt;br /&gt;
El área es igual a π·(25-1)=24π&lt;br /&gt;
&lt;br /&gt;
Con esto, ya podemos calcular la presión media del fluido con el siguiente código&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
h=0.01;&lt;br /&gt;
rho=1:h:5;&lt;br /&gt;
th=0:h:2*pi;&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Presión del fluido&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2+(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
%Integral de la presión&lt;br /&gt;
pres=U.*p;&lt;br /&gt;
%Integral&lt;br /&gt;
volumen=h^2*pres;&lt;br /&gt;
w=sum(sum(volumen));&lt;br /&gt;
%Área de la corona circular&lt;br /&gt;
area=(pi*5^2)-(pi*1^2);&lt;br /&gt;
%Presión media&lt;br /&gt;
presmedia=w/area&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
 '''El resultado de la presión media ha resultado ser P=10.3065'''&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37686</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37686"/>
				<updated>2016-12-05T18:15:27Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Curvas de presión */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Obtenemos el resultado de que la circulación es nula. Esto va en contra de la intuición ya que se supone que el fluido deberia ejercer una fuerza sobre el obstáculo, pero aplicando el Teorema de Kutta-Joukowski, que como hemos dicho antes dice que la fuerza es proporcional a la circulación, llegamos a la conclusión de que la fuerza deberia ser nula también. Encontrandonos con la conocida como Paradoja de D'Alembert.&lt;br /&gt;
&lt;br /&gt;
==Curvas de presión==&lt;br /&gt;
En la figura observamos que la presión es mucho más alta en los extremos superior e inferior, siendo esto coherente con lo desarrollado en apartados anteriores.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
contour(X,Y,p,50,'linewidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:Jiji.jpg|1000px|thumb|centro|Curvas de nivel de la presión del fluido]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37685</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37685"/>
				<updated>2016-12-05T18:14:35Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Obtenemos el resultado de que la circulación es nula. Esto va en contra de la intuición ya que se supone que el fluido deberia ejercer una fuerza sobre el obstáculo, pero aplicando el Teorema de Kutta-Joukowski, que como hemos dicho antes dice que la fuerza es proporcional a la circulación, llegamos a la conclusión de que la fuerza deberia ser nula también. Encontrandonos con la conocida como Paradoja de D'Alembert.&lt;br /&gt;
&lt;br /&gt;
==Curvas de presión==&lt;br /&gt;
En la figura observamos que la presión es mucho más alta en los extremos superior e inferior, siendo esto coherente con lo desarrollado en apartados anteriores.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
contour(X,Y,p,50,'linewidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:Jiji.png|1000px|thumb|centro|Curvas de nivel de la presión del fluido]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Jiji.jpg&amp;diff=37684</id>
		<title>Archivo:Jiji.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Jiji.jpg&amp;diff=37684"/>
				<updated>2016-12-05T18:13:51Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37683</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37683"/>
				<updated>2016-12-05T18:10:04Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Teorema de Kutta-Joukowski. Paradoja de D'Alembert */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Obtenemos el resultado de que la circulación es nula. Esto va en contra de la intuición ya que se supone que el fluido deberia ejercer una fuerza sobre el obstáculo, pero aplicando el Teorema de Kutta-Joukowski, que como hemos dicho antes dice que la fuerza es proporcional a la circulación, llegamos a la conclusión de que la fuerza deberia ser nula también. Encontrandonos con la conocida como Paradoja de D'Alembert.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37682</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37682"/>
				<updated>2016-12-05T18:09:34Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Teorema de Kutta-Joukowski. Paradoja de D'Alembert */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|centre]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37681</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37681"/>
				<updated>2016-12-05T18:08:53Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Teorema de Kutta-Joukowski. Paradoja de D'Alembert */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|left]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:Integral.png|600px|sinmarco|left]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37680</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37680"/>
				<updated>2016-12-05T18:08:14Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Interpretación según la velocidad y la presión */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
==Teorema de Kutta-Joukowski. Paradoja de D'Alembert==&lt;br /&gt;
La paradoja de D'Alembert, es una contradicción a la que llegó D'Alembert luego de estudiar matemáticamente el fenómeno de la resistencia producida sobre un cuerpo cuando una corriente de fluido (líquido o gas) circula sobre él.&lt;br /&gt;
D'Alembert aplicó la teoría de flujo potencial para modelar el fenómeno, y concluyó que la fuerza resultante sobre el cuerpo sobre el cual fluye el aire es cero, lo cual se contradice con la observación.&lt;br /&gt;
&lt;br /&gt;
Por otra parte según el Teorema de Kutta-Joukowski la fuerza que ejerce el fluido sobre el obstáculo es proporcional a la circulación.&lt;br /&gt;
&lt;br /&gt;
A continuación comprobaremos cómo la circulación a lo largo de la circunferencia de radio 2 se anula.&lt;br /&gt;
[[Archivo:Kutta.png|600px|sinmarco|left]]&lt;br /&gt;
&lt;br /&gt;
Dada la curva: γ=[(ρ,θ)/ρ=2; θ=t; t€(0,2Π) y parametrizando el campo vectorial y desarrollando, llegamos a la integral:&lt;br /&gt;
[[Archivo:ntegral.png|600px|sinmarco|left]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Integral.png&amp;diff=37679</id>
		<title>Archivo:Integral.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Integral.png&amp;diff=37679"/>
				<updated>2016-12-05T18:07:53Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Kutta.png&amp;diff=37678</id>
		<title>Archivo:Kutta.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Kutta.png&amp;diff=37678"/>
				<updated>2016-12-05T18:03:19Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37671</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37671"/>
				<updated>2016-12-05T17:55:30Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
&lt;br /&gt;
==Interpretación según la velocidad y la presión==&lt;br /&gt;
Analizando los gráficos que hemos obtenido en apartados previos, vamos a calcular ahora las velocidades que tendrían las partículas del fluido en la frontera del obstáculo. Las velocidades menores, las obtenemos en los extremos inferior y superior, y debido a esto, es aquí donde se acumulará un gran número de partículas que es lo que nos supone que la presión sea tan elevada. Por contra, en los extremos izquierdo y derecho, las partículas tendrán una velocidad máxima y por lo tanto la presión aquí será mínima.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37664</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37664"/>
				<updated>2016-12-05T17:39:52Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Ecuación de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|1000px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37663</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37663"/>
				<updated>2016-12-05T17:39:41Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Ecuación de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|600px|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37662</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37662"/>
				<updated>2016-12-05T17:39:03Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Ecuación de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
Las ecuaciones de Navier-Stokes reciben su nombre de Claude-Louis Navier y George Gabriel Stokes. Se trata de un conjunto de ecuaciones en derivadas parciales no lineales que describen el movimiento de un fluido. Estas ecuaciones gobiernan la atmósfera terrestre, las corrientes oceánicas y el flujo alrededor de vehículos o proyectiles y, en general, cualquier fenómeno en el que se involucren fluidos newtonianos.&lt;br /&gt;
&lt;br /&gt;
Estas ecuaciones se obtienen aplicando los principios de conservación de la mecánica y la termodinámica a un volumen fluido. Haciendo esto se obtiene la llamada formulación integral de las ecuaciones. Para llegar a su formulación diferencial se manipulan aplicando ciertas consideraciones, principalmente aquella en la que los esfuerzos tangenciales guardan una relación lineal con el gradiente de velocidad (ley de viscosidad de Newton), obteniendo de esta manera la formulación diferencial que generalmente es más útil para la resolución de los problemas que se plantean en la mecánica de fluidos.&lt;br /&gt;
&lt;br /&gt;
Desarrollando con los cálculos pertinentes obtenemos que:&lt;br /&gt;
[[Archivo:Sd.png|sinmarco|centro]]&lt;br /&gt;
El resultado final equivale al de la ecuación de Navier-Stokes, por lo que si se cumple una, la otra también, y como la de Bernouilli vimos que sí, poodemos afirmar que Navier-Stokes se cumple cuando la viscosidad se considera nula.&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Sd.png&amp;diff=37661</id>
		<title>Archivo:Sd.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Sd.png&amp;diff=37661"/>
				<updated>2016-12-05T17:37:53Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37655</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37655"/>
				<updated>2016-12-05T17:33:49Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Ecuación de Navier-Stokes */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
[[Archivo:Navier.jpg|600px|sinmarco|]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37654</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37654"/>
				<updated>2016-12-05T17:33:27Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Ecuación de Navier-Stokes==&lt;br /&gt;
[[Archivo:Navier.jpg|600px|sinmarco]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Navier.png&amp;diff=37653</id>
		<title>Archivo:Navier.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Navier.png&amp;diff=37653"/>
				<updated>2016-12-05T17:33:05Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37644</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37644"/>
				<updated>2016-12-05T17:28:35Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Presión del fluido para una densidad constante */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualándolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Ppe.png|600px|sinmarco|centro]]&lt;br /&gt;
El código empleado en MATlab para su visualización es:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
&lt;br /&gt;
%hacemos retícula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%describo coordenadas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
 &lt;br /&gt;
%aplicamos funcion presion&lt;br /&gt;
p=10-(sin(V)-(1./(U.^2)).*sin(V)).^2-(U.^2).*(((1./U)+(1./U.^3)).^2).*cos(V).*cos(V);&lt;br /&gt;
&lt;br /&gt;
%dibujo&lt;br /&gt;
surf(X,Y,p)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Presion.jpg|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Presion.jpg&amp;diff=37642</id>
		<title>Archivo:Presion.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Presion.jpg&amp;diff=37642"/>
				<updated>2016-12-05T17:27:50Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Ppe.png&amp;diff=37638</id>
		<title>Archivo:Ppe.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Ppe.png&amp;diff=37638"/>
				<updated>2016-12-05T17:26:02Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:88.png&amp;diff=37633</id>
		<title>Archivo:88.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:88.png&amp;diff=37633"/>
				<updated>2016-12-05T17:22:10Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37627</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37627"/>
				<updated>2016-12-05T17:18:01Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Velocidad máxima y mínima en la frontera del obstáculo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
==Presión del fluido para una densidad constante==&lt;br /&gt;
Como hemos dicho previamente, estamos tratando con fluidos incompresibles, y por tanto, van a tener una densidad constante, que en este caso es 2. Sustituyendo en la fórmula de Bernoulli e igualandolo a la constante de 10, nos queda &lt;br /&gt;
[[Archivo:Pe.png|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Pe.png&amp;diff=37623</id>
		<title>Archivo:Pe.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Pe.png&amp;diff=37623"/>
				<updated>2016-12-05T17:15:15Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37615</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37615"/>
				<updated>2016-12-05T17:11:14Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
==Velocidad máxima y mínima en la frontera del obstáculo==&lt;br /&gt;
En nuestro caso, vamos a calcular cuál es la velocidad máxima y mínima en el entorno del obstáculo. Para ello, dado que estamos en la frontera, suponemos que ρ=1, y el campo u queda&lt;br /&gt;
 |u|=2·cos(θ)&lt;br /&gt;
Dado que el valor del campo vectorial nos queda en función del ángulo θ, podemos afirmar lo siguiente:&lt;br /&gt;
* La velocidad será máxima para los valores de θ que sean iguales a 0 y -Π, alcanzando el valor de 2 unidades.&lt;br /&gt;
* La velocidad será mínima para los valores de θ que sean iguales a Π/2 y -Π/2, alcanzando el valor de 0 unidades. Por tanto, estos puntos además de ser mínimos serán puntos de '''remanso'''.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37603</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37603"/>
				<updated>2016-12-05T16:59:12Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Cálculo de la función de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
En la figura observamos claramente que las de corriente son tangentes a la velocidad y ortogonales al campo equipotencial como bien dice su definición.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37602</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37602"/>
				<updated>2016-12-05T16:56:57Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Cálculo de la función de corriente */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
La representaremos en MATlab mediante el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,25);&lt;br /&gt;
th=linspace(0,2*pi,25);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
&lt;br /&gt;
%Potencial escalar. Lineas de corriente&lt;br /&gt;
chi=log(U).*sin(V)-U.*U.*cos(V);&lt;br /&gt;
&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
 &lt;br /&gt;
%Dibujo lineas de corriente&lt;br /&gt;
contour(X,Y,chi,50,'LineWidth',1.5)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
 &lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6FapartB.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C6FapartB.jpg&amp;diff=37601</id>
		<title>Archivo:C6FapartB.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C6FapartB.jpg&amp;diff=37601"/>
				<updated>2016-12-05T16:56:18Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37600</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37600"/>
				<updated>2016-12-05T16:53:47Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Comprobación gráfica */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
====Cálculo de la función de corriente====&lt;br /&gt;
La función de corriente, será la función potencial del campo v obtenido previamente.&lt;br /&gt;
[[Archivo:Chichi.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Chichi.png&amp;diff=37599</id>
		<title>Archivo:Chichi.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Chichi.png&amp;diff=37599"/>
				<updated>2016-12-05T16:53:05Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37596</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37596"/>
				<updated>2016-12-05T16:49:18Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Comprobación gráfica */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|800px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37594</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37594"/>
				<updated>2016-12-05T16:48:45Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Lineas de corriente del campo de velocidades */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
====Comprobación gráfica====&lt;br /&gt;
*Campo v en coordenadas cartesianas&lt;br /&gt;
*Código [[MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Reticula&lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%Cambio de coordenadas a cartesianas&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Componentes del campo de velocidades en cartesianas&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2); &lt;br /&gt;
%Componentes del campo v en cartesianas&lt;br /&gt;
vx=(-cos(V).*cos(V))./U-U.*sin(V).*sin(V);&lt;br /&gt;
vy=(-cos(V).*sin(V))./U+U.*cos(V).*sin(V);&lt;br /&gt;
%Dibujo campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujo campo v&lt;br /&gt;
quiver(X,Y,vx,vy)&lt;br /&gt;
axis([-5,5,-5,5])&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C6F.jpg|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C6F.jpg&amp;diff=37593</id>
		<title>Archivo:C6F.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C6F.jpg&amp;diff=37593"/>
				<updated>2016-12-05T16:48:13Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37592</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37592"/>
				<updated>2016-12-05T16:46:25Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Lineas de corriente del campo de velocidades */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
Multiplicando vectorialmente el vector k por la velocidad, obtenemos:&lt;br /&gt;
[[Archivo:Vv.png|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Vv.png&amp;diff=37590</id>
		<title>Archivo:Vv.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Vv.png&amp;diff=37590"/>
				<updated>2016-12-05T16:45:11Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37588</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37588"/>
				<updated>2016-12-05T16:41:59Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
&lt;br /&gt;
==Lineas de corriente del campo de velocidades==&lt;br /&gt;
Las líneas de corriente son líneas que representadas en el plano definen la trayectoria del campo, en nuestro caso, de las partículas del fluido.&lt;br /&gt;
Son, a su vez, el potencial de un campo vectorial ortogonal al campo de velocidades. Luego para definir las líneas de corriente se calculará el campo ortogonal y su potencial.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37585</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37585"/>
				<updated>2016-12-05T16:39:12Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Divergencia y rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
y tambien comprobamos que es 0&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37584</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37584"/>
				<updated>2016-12-05T16:38:41Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Divergencia y rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
Resolviendolo, podemos comprobar que es irrotacional.&lt;br /&gt;
&lt;br /&gt;
Así mismo, la divergencia se define como:&lt;br /&gt;
[[Archivo:Divergenciaaa.png|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Divergenciaaa.png&amp;diff=37583</id>
		<title>Archivo:Divergenciaaa.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Divergenciaaa.png&amp;diff=37583"/>
				<updated>2016-12-05T16:38:09Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37581</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37581"/>
				<updated>2016-12-05T16:33:50Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
==Divergencia y rotacional==&lt;br /&gt;
Con el estudio de la divergencia y del rotacional se demuestra la incompresibilidad del fluido. Se trata de una región simplemente conexa y con el campo de velocidades que tiene potencial escalar, podemos afirmar que el rotacional del campo será nulo:&lt;br /&gt;
El rotacional en coordenadas cilíndricas:&lt;br /&gt;
[[Archivo:Rotacionalformula.png|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Rotacionalformula.png&amp;diff=37580</id>
		<title>Archivo:Rotacionalformula.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Rotacionalformula.png&amp;diff=37580"/>
				<updated>2016-12-05T16:33:23Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37574</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37574"/>
				<updated>2016-12-05T16:29:55Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Mallado de la región ocupada por el fluido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C1F.jpg|600px|miniaturadeimagen|centro|Mallado]]&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C1F.jpg&amp;diff=37572</id>
		<title>Archivo:C1F.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C1F.jpg&amp;diff=37572"/>
				<updated>2016-12-05T16:29:31Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37571</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37571"/>
				<updated>2016-12-05T16:29:01Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Función Potencial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:C2F.jpg|600px|miniaturadeimagen|centro|Representación función potencial]]&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C2F.jpg&amp;diff=37570</id>
		<title>Archivo:C2F.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C2F.jpg&amp;diff=37570"/>
				<updated>2016-12-05T16:27:34Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37568</id>
		<title>Visualización de campos escalares y vectoriales en un fluido. Grupo A13</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_un_fluido._Grupo_A13&amp;diff=37568"/>
				<updated>2016-12-05T16:26:46Z</updated>
		
		<summary type="html">&lt;p&gt;ALBERTO: /* Función Potencial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Visualización de campos escalares y vectoriales en un fluido | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC16/17|2016-17]] | Alberto Rodríguez Soto, Ignacio Pérez Abellán, Alejandro Montesinos Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Introducción==&lt;br /&gt;
Nuestro trabajo consiste en el estudio de un fluido incompresible, esto es, que su densidad es constante en el tiempo y que se opone a cualquier fuerza externa de compresión. Para realizar el trabajo hemos sometido al fluido a diversos campos escalares y vectoriales según lo aprendido en la asignatura.&lt;br /&gt;
&lt;br /&gt;
==Mallado de la región ocupada por el fluido==&lt;br /&gt;
El primer paso para la la visualización de campos escalares y vectoriales de un fluido es delimitar la región de estudio. La región de estudio es una corona circular de radio menor 1 y radio mayor 5.&lt;br /&gt;
&lt;br /&gt;
La representamos mediante un mallado que represente los puntos interiores de la corona circular en el intervalo [−5, 5] × [−5, 5]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%rho=u; phi=v;&lt;br /&gt;
%Creamos el mallado.&lt;br /&gt;
rho=linspace(1,5,50);&lt;br /&gt;
th=linspace(0,2*pi,50);&lt;br /&gt;
%generamos la reticula&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%definimos la parametrización&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Dibujamos la malla y definimos los ejes&lt;br /&gt;
mesh(X,Y,0*X)&lt;br /&gt;
axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Función potencial y campo de velocidades==&lt;br /&gt;
La velocidad de un fluido viene dada por el campo de velocidades de este aplicado en cada punto.&lt;br /&gt;
&lt;br /&gt;
El campo de velocidades deriva de un potencial escalar. Vamos a representar primero el campo escalar y después el campo de velocidades. &lt;br /&gt;
===Función Potencial===&lt;br /&gt;
El campo escalar del que deriva es el siguiente:&lt;br /&gt;
[[Archivo:Fi.png|600px|sinmarco|centro]]&lt;br /&gt;
Se aprecia como la función potencial crece de abajo a arriba según el movimiento del fluido&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %Dibujamos la malla &lt;br /&gt;
 rho=linspace(1,5,25);&lt;br /&gt;
 th=linspace(0,2*pi,25);&lt;br /&gt;
 [U,V]=meshgrid(rho,th);&lt;br /&gt;
 %dibujamos la función potencial&lt;br /&gt;
 %primero la superficie&lt;br /&gt;
 X=U.*cos(V);&lt;br /&gt;
 Y=U.*sin(V);&lt;br /&gt;
 %Despues definimos la función&lt;br /&gt;
 phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
 %aplicamos la función&lt;br /&gt;
 Z=phi(U,V);&lt;br /&gt;
 %Dibujamos&lt;br /&gt;
 p=surf(X,Y,Z);&lt;br /&gt;
 axis equal&lt;br /&gt;
 view(2)&lt;br /&gt;
 hold on&lt;br /&gt;
 %por último dibujamos el obstáculo&lt;br /&gt;
 plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
===Campo de velocidades===&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de la función potencial &lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
&lt;br /&gt;
Su representación viene dada por:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Dibujamos la malla &lt;br /&gt;
rho=linspace(1,5,30);&lt;br /&gt;
th=linspace(0,2*pi,30);&lt;br /&gt;
[U,V]=meshgrid(rho,th);&lt;br /&gt;
%dibujamos la función potencial&lt;br /&gt;
%primero la superficie&lt;br /&gt;
X=U.*cos(V);&lt;br /&gt;
Y=U.*sin(V);&lt;br /&gt;
%Despues definimos la función&lt;br /&gt;
phi=inline('(rho+(1./rho)).*sin(th)','rho','th');&lt;br /&gt;
%aplicamos la función&lt;br /&gt;
Z=phi(U,V);&lt;br /&gt;
%Dibujamos las curvas de nivel&lt;br /&gt;
contour(X,Y,Z,40)&lt;br /&gt;
%axis([-5,5,-5,5]);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%Dibujamos el campo de velocidades del fluido:&lt;br /&gt;
ux=sin(V).*cos(V)-(sin(V).*cos(V))./(U.^2)-(sin(V).*cos(V)+(sin(V).*cos(V))./(U.^2));&lt;br /&gt;
uy=(sin(V).*sin(V)-(sin(V).*sin(V))./(U.^2))+cos(V).*cos(V)+(cos(V).*cos(V))./(U.^2);&lt;br /&gt;
%dibujamos el campo de velocidades&lt;br /&gt;
quiver(X,Y,ux,uy);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
hold on&lt;br /&gt;
%por último dibujamos el obstáculo&lt;br /&gt;
plot(cos(th),sin(th),'k','linewidth',2)&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:C2F_velocidades.jpg|600px|miniaturadeimagen|centro|Representación campo de velocidades]]&lt;br /&gt;
&lt;br /&gt;
Se ve perfectamente como el fluido evita el obstáculo rodeándolo. Disminuye de velocidad al chocar contra el obstáculo y aumenta al evitarlo.&lt;br /&gt;
&lt;br /&gt;
También se aprecia la ortogonalidad a las curvas de nivel de la función potencial φ=(ρ+1/ρ)·sen(θ) del que proviene.&lt;br /&gt;
&lt;br /&gt;
Las curvas de nivel de la función potencial representan los puntos del plano en el que esta tiene el mismo valor. Según se ve en el apartado anterior, en la representación gráfica se observa que la función crece de abajo a arriba evitando el obstáculo.&lt;br /&gt;
El campo de velocidades viene dado por el gradiente de esa función. El gradiente representa el valor y la dirección de máximo crecimiento de de la función escalar. Como en las curvas de nivel la función es constante, es decir, en las curvas la variación es 0, la dirección de máximo crecimiento es ortogonal a las curvas de nivel y viene dada por el gradiente, es decir por el campo de velocidades del fluido.&lt;br /&gt;
&lt;br /&gt;
==Vector normal a los puntos del obstáculo==&lt;br /&gt;
Si consideramos nuestro obstáculo como la superficie circular de radio 1 y centro origen, cuyo vector normal a su superficie es &lt;br /&gt;
[[Archivo:Vectornormal.png|600px|sinmarco|centro]]&lt;br /&gt;
y dado nuestro campo de velocidades&lt;br /&gt;
[[Archivo:2_velocidad.jpg|600px|sinmarco|centro]]&lt;br /&gt;
Observamos claramente cómo al hacer el producto escalar entre ambos vectores, el resultado es nulo.&lt;br /&gt;
La interpretación física que podemos dar a esto, es que cuando las partículas del fluido chocan contra el obstáculo, éstas cambian de dirección de modo que siempre van a rodear el obstáculo y nunca pasarlo por encima&lt;br /&gt;
&lt;br /&gt;
==Valor de la velocidad al alejarnos del obstáculo==&lt;br /&gt;
Debido a que estamos muy lejos del obstáculo, podemos despreciar el valor de 1/ρ, nos quedará el campo escalar&lt;br /&gt;
[[Archivo:Filejos.png|600px|sinmarco|centro]]&lt;br /&gt;
 &lt;br /&gt;
El gradiente del campo escalar cuando nos encontramos muy lejos del centro será&lt;br /&gt;
[[Archivo:Ulejos.png|600px|sinmarco|centro]]&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC16/17]]&lt;/div&gt;</summary>
		<author><name>ALBERTO</name></author>	</entry>

	</feed>