<?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=David+Perez</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=David+Perez"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/David_Perez"/>
		<updated>2026-04-23T06:20:37Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100656</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100656"/>
				<updated>2025-12-05T11:40:26Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Determinación de la circulación y visualizacion del flujo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% TORNADO EF4: ISOBARAS 2D (PLANTA) + SUPERFICIES ISOBÁRICAS 3D&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
%% Parámetros del modelo (vórtice de Rankine, tornado EF4)&lt;br /&gt;
R_core = 250;          % radio núcleo [m]&lt;br /&gt;
v_max  = 90;           % vel. tangencial máx [m/s]&lt;br /&gt;
P_c    = 920e2;        % presión núcleo [Pa]&lt;br /&gt;
P_inf  = 1013e2;       % presión ambiente [Pa]&lt;br /&gt;
rho    = 1.225;        % densidad aire [kg/m^3]&lt;br /&gt;
g      = 9.81;         % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).*(Gamma./(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos a representar (en mbar)&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%figura 1&lt;br /&gt;
z0 = 0;   % altura de la sección horizontal [m]&lt;br /&gt;
&lt;br /&gt;
% Mallado horizontal&lt;br /&gt;
x = linspace(-600,600,251);&lt;br /&gt;
y = linspace(-600,600,251);&lt;br /&gt;
[X2D,Y2D] = meshgrid(x,y);&lt;br /&gt;
R2D = sqrt(X2D.^2 + Y2D.^2);&lt;br /&gt;
&lt;br /&gt;
% Presión en ese plano (en mbar)&lt;br /&gt;
V2D = vtheta(R2D);&lt;br /&gt;
p2D = (R2D&amp;lt;=R_core).*( P_c + 0.5*rho*V2D.^2 - rho*g*z0 ) + ...&lt;br /&gt;
      (R2D&amp;gt; R_core).*( P_inf - 0.5*rho*V2D.^2 - rho*g*z0 );&lt;br /&gt;
p2D = p2D/100;   % Pa -&amp;gt; mbar&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
contourf(x,y,p2D,40,'LineColor','none'); hold on;&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb1 = colorbar; cb1.Label.String = 'Presión (mbar)';&lt;br /&gt;
&lt;br /&gt;
% Isobaras y etiquetas&lt;br /&gt;
[C,h] = contour(x,y,p2D,niveles,'k','LineWidth',1.6);&lt;br /&gt;
clabel(C,h,'FontSize',9,'FontWeight','bold','Color','k');&lt;br /&gt;
&lt;br /&gt;
% Círculo del núcleo&lt;br /&gt;
th = linspace(0,2*pi,300);&lt;br /&gt;
plot(R_core*cos(th),R_core*sin(th),'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
axis equal; grid on;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Vista superior isobaras p = 950, 970, 990, 1000 mbar');&lt;br /&gt;
&lt;br /&gt;
%figura 2&lt;br /&gt;
&lt;br /&gt;
% Mallado 3D (x,y,z)&lt;br /&gt;
x3 = linspace(-600,600,60);&lt;br /&gt;
y3 = linspace(-600,600,60);&lt;br /&gt;
z3 = linspace(0,1000,40);&lt;br /&gt;
[X3,Y3,Z3] = meshgrid(x3,y3,z3);&lt;br /&gt;
R3 = sqrt(X3.^2 + Y3.^2);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión 3D en Pa -&amp;gt; mbar&lt;br /&gt;
V3 = vtheta(R3);&lt;br /&gt;
p3 = (R3&amp;lt;=R_core).*( P_c + 0.5*rho.*V3.^2 - rho*g.*Z3 ) + ...&lt;br /&gt;
     (R3&amp;gt; R_core).*( P_inf - 0.5*rho.*V3.^2 - rho*g.*Z3 );&lt;br /&gt;
p3 = p3/100;  % mbar&lt;br /&gt;
&lt;br /&gt;
figure(2);&lt;br /&gt;
hold on;&lt;br /&gt;
col = lines(numel(niveles));&lt;br /&gt;
&lt;br /&gt;
for k = 1:numel(niveles)&lt;br /&gt;
    iso_val = niveles(k);&lt;br /&gt;
    s = isosurface(X3,Y3,Z3,p3,iso_val);&lt;br /&gt;
    if ~isempty(s.vertices)&lt;br /&gt;
        pch = patch(s);&lt;br /&gt;
        set(pch,'FaceColor',col(k,:), ...&lt;br /&gt;
                'EdgeColor','none', ...&lt;br /&gt;
                'FaceAlpha',0.4);&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Eje del tornado&lt;br /&gt;
plot3(0,0,[min(z3) max(z3)],'k--','LineWidth',1.5);&lt;br /&gt;
&lt;br /&gt;
axis equal;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
zlabel('z (m)');&lt;br /&gt;
grid on;&lt;br /&gt;
view(35,25);&lt;br /&gt;
camlight; lighting gouraud;&lt;br /&gt;
title('Superficies isobáricas en dimension del tornado EF4 (p = 950, 970, 990, 1000 mbar)');&lt;br /&gt;
legend(arrayfun(@(v) sprintf('p = %d mbar',v),niveles,'UniformOutput',false), ...&lt;br /&gt;
       'Location','northeastoutside');&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:Vsuperiorisobaras.png|500px]]&lt;br /&gt;
[[Archivo:SuperficieIsobaras.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100655</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100655"/>
				<updated>2025-12-05T11:40:00Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Determinación de la circulación y visualizacion del flujo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
matlab_1.jpg|Perfil de velocidad tangencial&lt;br /&gt;
matlab_2.jpg|Campo de velocidad tangencial&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% TORNADO EF4: ISOBARAS 2D (PLANTA) + SUPERFICIES ISOBÁRICAS 3D&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
%% Parámetros del modelo (vórtice de Rankine, tornado EF4)&lt;br /&gt;
R_core = 250;          % radio núcleo [m]&lt;br /&gt;
v_max  = 90;           % vel. tangencial máx [m/s]&lt;br /&gt;
P_c    = 920e2;        % presión núcleo [Pa]&lt;br /&gt;
P_inf  = 1013e2;       % presión ambiente [Pa]&lt;br /&gt;
rho    = 1.225;        % densidad aire [kg/m^3]&lt;br /&gt;
g      = 9.81;         % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).*(Gamma./(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos a representar (en mbar)&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%figura 1&lt;br /&gt;
z0 = 0;   % altura de la sección horizontal [m]&lt;br /&gt;
&lt;br /&gt;
% Mallado horizontal&lt;br /&gt;
x = linspace(-600,600,251);&lt;br /&gt;
y = linspace(-600,600,251);&lt;br /&gt;
[X2D,Y2D] = meshgrid(x,y);&lt;br /&gt;
R2D = sqrt(X2D.^2 + Y2D.^2);&lt;br /&gt;
&lt;br /&gt;
% Presión en ese plano (en mbar)&lt;br /&gt;
V2D = vtheta(R2D);&lt;br /&gt;
p2D = (R2D&amp;lt;=R_core).*( P_c + 0.5*rho*V2D.^2 - rho*g*z0 ) + ...&lt;br /&gt;
      (R2D&amp;gt; R_core).*( P_inf - 0.5*rho*V2D.^2 - rho*g*z0 );&lt;br /&gt;
p2D = p2D/100;   % Pa -&amp;gt; mbar&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
contourf(x,y,p2D,40,'LineColor','none'); hold on;&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb1 = colorbar; cb1.Label.String = 'Presión (mbar)';&lt;br /&gt;
&lt;br /&gt;
% Isobaras y etiquetas&lt;br /&gt;
[C,h] = contour(x,y,p2D,niveles,'k','LineWidth',1.6);&lt;br /&gt;
clabel(C,h,'FontSize',9,'FontWeight','bold','Color','k');&lt;br /&gt;
&lt;br /&gt;
% Círculo del núcleo&lt;br /&gt;
th = linspace(0,2*pi,300);&lt;br /&gt;
plot(R_core*cos(th),R_core*sin(th),'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
axis equal; grid on;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Vista superior isobaras p = 950, 970, 990, 1000 mbar');&lt;br /&gt;
&lt;br /&gt;
%figura 2&lt;br /&gt;
&lt;br /&gt;
% Mallado 3D (x,y,z)&lt;br /&gt;
x3 = linspace(-600,600,60);&lt;br /&gt;
y3 = linspace(-600,600,60);&lt;br /&gt;
z3 = linspace(0,1000,40);&lt;br /&gt;
[X3,Y3,Z3] = meshgrid(x3,y3,z3);&lt;br /&gt;
R3 = sqrt(X3.^2 + Y3.^2);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión 3D en Pa -&amp;gt; mbar&lt;br /&gt;
V3 = vtheta(R3);&lt;br /&gt;
p3 = (R3&amp;lt;=R_core).*( P_c + 0.5*rho.*V3.^2 - rho*g.*Z3 ) + ...&lt;br /&gt;
     (R3&amp;gt; R_core).*( P_inf - 0.5*rho.*V3.^2 - rho*g.*Z3 );&lt;br /&gt;
p3 = p3/100;  % mbar&lt;br /&gt;
&lt;br /&gt;
figure(2);&lt;br /&gt;
hold on;&lt;br /&gt;
col = lines(numel(niveles));&lt;br /&gt;
&lt;br /&gt;
for k = 1:numel(niveles)&lt;br /&gt;
    iso_val = niveles(k);&lt;br /&gt;
    s = isosurface(X3,Y3,Z3,p3,iso_val);&lt;br /&gt;
    if ~isempty(s.vertices)&lt;br /&gt;
        pch = patch(s);&lt;br /&gt;
        set(pch,'FaceColor',col(k,:), ...&lt;br /&gt;
                'EdgeColor','none', ...&lt;br /&gt;
                'FaceAlpha',0.4);&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Eje del tornado&lt;br /&gt;
plot3(0,0,[min(z3) max(z3)],'k--','LineWidth',1.5);&lt;br /&gt;
&lt;br /&gt;
axis equal;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
zlabel('z (m)');&lt;br /&gt;
grid on;&lt;br /&gt;
view(35,25);&lt;br /&gt;
camlight; lighting gouraud;&lt;br /&gt;
title('Superficies isobáricas en dimension del tornado EF4 (p = 950, 970, 990, 1000 mbar)');&lt;br /&gt;
legend(arrayfun(@(v) sprintf('p = %d mbar',v),niveles,'UniformOutput',false), ...&lt;br /&gt;
       'Location','northeastoutside');&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:Vsuperiorisobaras.png|500px]]&lt;br /&gt;
[[Archivo:SuperficieIsobaras.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100648</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100648"/>
				<updated>2025-12-05T11:36:30Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Determinación de la circulación y visualizacion del flujo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% TORNADO EF4: ISOBARAS 2D (PLANTA) + SUPERFICIES ISOBÁRICAS 3D&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
%% Parámetros del modelo (vórtice de Rankine, tornado EF4)&lt;br /&gt;
R_core = 250;          % radio núcleo [m]&lt;br /&gt;
v_max  = 90;           % vel. tangencial máx [m/s]&lt;br /&gt;
P_c    = 920e2;        % presión núcleo [Pa]&lt;br /&gt;
P_inf  = 1013e2;       % presión ambiente [Pa]&lt;br /&gt;
rho    = 1.225;        % densidad aire [kg/m^3]&lt;br /&gt;
g      = 9.81;         % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).*(Gamma./(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos a representar (en mbar)&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%figura 1&lt;br /&gt;
z0 = 0;   % altura de la sección horizontal [m]&lt;br /&gt;
&lt;br /&gt;
% Mallado horizontal&lt;br /&gt;
x = linspace(-600,600,251);&lt;br /&gt;
y = linspace(-600,600,251);&lt;br /&gt;
[X2D,Y2D] = meshgrid(x,y);&lt;br /&gt;
R2D = sqrt(X2D.^2 + Y2D.^2);&lt;br /&gt;
&lt;br /&gt;
% Presión en ese plano (en mbar)&lt;br /&gt;
V2D = vtheta(R2D);&lt;br /&gt;
p2D = (R2D&amp;lt;=R_core).*( P_c + 0.5*rho*V2D.^2 - rho*g*z0 ) + ...&lt;br /&gt;
      (R2D&amp;gt; R_core).*( P_inf - 0.5*rho*V2D.^2 - rho*g*z0 );&lt;br /&gt;
p2D = p2D/100;   % Pa -&amp;gt; mbar&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
contourf(x,y,p2D,40,'LineColor','none'); hold on;&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb1 = colorbar; cb1.Label.String = 'Presión (mbar)';&lt;br /&gt;
&lt;br /&gt;
% Isobaras y etiquetas&lt;br /&gt;
[C,h] = contour(x,y,p2D,niveles,'k','LineWidth',1.6);&lt;br /&gt;
clabel(C,h,'FontSize',9,'FontWeight','bold','Color','k');&lt;br /&gt;
&lt;br /&gt;
% Círculo del núcleo&lt;br /&gt;
th = linspace(0,2*pi,300);&lt;br /&gt;
plot(R_core*cos(th),R_core*sin(th),'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
axis equal; grid on;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Vista superior isobaras p = 950, 970, 990, 1000 mbar');&lt;br /&gt;
&lt;br /&gt;
%figura 2&lt;br /&gt;
&lt;br /&gt;
% Mallado 3D (x,y,z)&lt;br /&gt;
x3 = linspace(-600,600,60);&lt;br /&gt;
y3 = linspace(-600,600,60);&lt;br /&gt;
z3 = linspace(0,1000,40);&lt;br /&gt;
[X3,Y3,Z3] = meshgrid(x3,y3,z3);&lt;br /&gt;
R3 = sqrt(X3.^2 + Y3.^2);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión 3D en Pa -&amp;gt; mbar&lt;br /&gt;
V3 = vtheta(R3);&lt;br /&gt;
p3 = (R3&amp;lt;=R_core).*( P_c + 0.5*rho.*V3.^2 - rho*g.*Z3 ) + ...&lt;br /&gt;
     (R3&amp;gt; R_core).*( P_inf - 0.5*rho.*V3.^2 - rho*g.*Z3 );&lt;br /&gt;
p3 = p3/100;  % mbar&lt;br /&gt;
&lt;br /&gt;
figure(2);&lt;br /&gt;
hold on;&lt;br /&gt;
col = lines(numel(niveles));&lt;br /&gt;
&lt;br /&gt;
for k = 1:numel(niveles)&lt;br /&gt;
    iso_val = niveles(k);&lt;br /&gt;
    s = isosurface(X3,Y3,Z3,p3,iso_val);&lt;br /&gt;
    if ~isempty(s.vertices)&lt;br /&gt;
        pch = patch(s);&lt;br /&gt;
        set(pch,'FaceColor',col(k,:), ...&lt;br /&gt;
                'EdgeColor','none', ...&lt;br /&gt;
                'FaceAlpha',0.4);&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Eje del tornado&lt;br /&gt;
plot3(0,0,[min(z3) max(z3)],'k--','LineWidth',1.5);&lt;br /&gt;
&lt;br /&gt;
axis equal;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
zlabel('z (m)');&lt;br /&gt;
grid on;&lt;br /&gt;
view(35,25);&lt;br /&gt;
camlight; lighting gouraud;&lt;br /&gt;
title('Superficies isobáricas en dimension del tornado EF4 (p = 950, 970, 990, 1000 mbar)');&lt;br /&gt;
legend(arrayfun(@(v) sprintf('p = %d mbar',v),niveles,'UniformOutput',false), ...&lt;br /&gt;
       'Location','northeastoutside');&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:Vsuperiorisobaras.png|500px]]&lt;br /&gt;
[[Archivo:SuperficieIsobaras.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100640</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=100640"/>
				<updated>2025-12-05T11:35:19Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Determinación de la circulación y visualizacion del flujo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
[[File:matlab_1.jpg|thumb|right|250px|Vórtice]]&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% TORNADO EF4: ISOBARAS 2D (PLANTA) + SUPERFICIES ISOBÁRICAS 3D&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
%% Parámetros del modelo (vórtice de Rankine, tornado EF4)&lt;br /&gt;
R_core = 250;          % radio núcleo [m]&lt;br /&gt;
v_max  = 90;           % vel. tangencial máx [m/s]&lt;br /&gt;
P_c    = 920e2;        % presión núcleo [Pa]&lt;br /&gt;
P_inf  = 1013e2;       % presión ambiente [Pa]&lt;br /&gt;
rho    = 1.225;        % densidad aire [kg/m^3]&lt;br /&gt;
g      = 9.81;         % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).*(Gamma./(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos a representar (en mbar)&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%figura 1&lt;br /&gt;
z0 = 0;   % altura de la sección horizontal [m]&lt;br /&gt;
&lt;br /&gt;
% Mallado horizontal&lt;br /&gt;
x = linspace(-600,600,251);&lt;br /&gt;
y = linspace(-600,600,251);&lt;br /&gt;
[X2D,Y2D] = meshgrid(x,y);&lt;br /&gt;
R2D = sqrt(X2D.^2 + Y2D.^2);&lt;br /&gt;
&lt;br /&gt;
% Presión en ese plano (en mbar)&lt;br /&gt;
V2D = vtheta(R2D);&lt;br /&gt;
p2D = (R2D&amp;lt;=R_core).*( P_c + 0.5*rho*V2D.^2 - rho*g*z0 ) + ...&lt;br /&gt;
      (R2D&amp;gt; R_core).*( P_inf - 0.5*rho*V2D.^2 - rho*g*z0 );&lt;br /&gt;
p2D = p2D/100;   % Pa -&amp;gt; mbar&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
contourf(x,y,p2D,40,'LineColor','none'); hold on;&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb1 = colorbar; cb1.Label.String = 'Presión (mbar)';&lt;br /&gt;
&lt;br /&gt;
% Isobaras y etiquetas&lt;br /&gt;
[C,h] = contour(x,y,p2D,niveles,'k','LineWidth',1.6);&lt;br /&gt;
clabel(C,h,'FontSize',9,'FontWeight','bold','Color','k');&lt;br /&gt;
&lt;br /&gt;
% Círculo del núcleo&lt;br /&gt;
th = linspace(0,2*pi,300);&lt;br /&gt;
plot(R_core*cos(th),R_core*sin(th),'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
axis equal; grid on;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Vista superior isobaras p = 950, 970, 990, 1000 mbar');&lt;br /&gt;
&lt;br /&gt;
%figura 2&lt;br /&gt;
&lt;br /&gt;
% Mallado 3D (x,y,z)&lt;br /&gt;
x3 = linspace(-600,600,60);&lt;br /&gt;
y3 = linspace(-600,600,60);&lt;br /&gt;
z3 = linspace(0,1000,40);&lt;br /&gt;
[X3,Y3,Z3] = meshgrid(x3,y3,z3);&lt;br /&gt;
R3 = sqrt(X3.^2 + Y3.^2);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión 3D en Pa -&amp;gt; mbar&lt;br /&gt;
V3 = vtheta(R3);&lt;br /&gt;
p3 = (R3&amp;lt;=R_core).*( P_c + 0.5*rho.*V3.^2 - rho*g.*Z3 ) + ...&lt;br /&gt;
     (R3&amp;gt; R_core).*( P_inf - 0.5*rho.*V3.^2 - rho*g.*Z3 );&lt;br /&gt;
p3 = p3/100;  % mbar&lt;br /&gt;
&lt;br /&gt;
figure(2);&lt;br /&gt;
hold on;&lt;br /&gt;
col = lines(numel(niveles));&lt;br /&gt;
&lt;br /&gt;
for k = 1:numel(niveles)&lt;br /&gt;
    iso_val = niveles(k);&lt;br /&gt;
    s = isosurface(X3,Y3,Z3,p3,iso_val);&lt;br /&gt;
    if ~isempty(s.vertices)&lt;br /&gt;
        pch = patch(s);&lt;br /&gt;
        set(pch,'FaceColor',col(k,:), ...&lt;br /&gt;
                'EdgeColor','none', ...&lt;br /&gt;
                'FaceAlpha',0.4);&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Eje del tornado&lt;br /&gt;
plot3(0,0,[min(z3) max(z3)],'k--','LineWidth',1.5);&lt;br /&gt;
&lt;br /&gt;
axis equal;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
zlabel('z (m)');&lt;br /&gt;
grid on;&lt;br /&gt;
view(35,25);&lt;br /&gt;
camlight; lighting gouraud;&lt;br /&gt;
title('Superficies isobáricas en dimension del tornado EF4 (p = 950, 970, 990, 1000 mbar)');&lt;br /&gt;
legend(arrayfun(@(v) sprintf('p = %d mbar',v),niveles,'UniformOutput',false), ...&lt;br /&gt;
       'Location','northeastoutside');&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:Vsuperiorisobaras.png|500px]]&lt;br /&gt;
[[Archivo:SuperficieIsobaras.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Matlab_1.jpg&amp;diff=100607</id>
		<title>Archivo:Matlab 1.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Matlab_1.jpg&amp;diff=100607"/>
				<updated>2025-12-05T11:21:19Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95957</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95957"/>
				<updated>2025-12-03T11:03:23Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación completa por tramos */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95956</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95956"/>
				<updated>2025-12-03T11:03:15Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Región exterior (flujo irrotacional) */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95955</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95955"/>
				<updated>2025-12-03T11:03:06Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Núcleo interior (rotación sólida) */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95953</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=95953"/>
				<updated>2025-12-03T11:02:55Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Variables y definiciones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r \le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
===  Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado  ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
''' 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo '''&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
=== Fuerza neta sobre una fachada situada a &amp;lt;math&amp;gt;\rho = \tfrac{3}{4}R&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
La presión en la región exterior del vórtice de Rankine viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; p(\rho) = p_\infty + \tfrac{1}{2}\rho_{\text{aire}}\,v_\theta^2(\rho) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde la velocidad tangencial se modela como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(\rho)=\frac{\Gamma}{2\pi\rho}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La circulación se obtiene imponiendo la condición:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta(R)=90\ \mathrm{m/s}, &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
así:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Gamma =2\pi R\, v_\theta(R) =2\pi(250)(90) =141\,372\ \mathrm{m^2/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La posición requerida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \rho=\tfrac{3}{4}R = 187.5\ \mathrm{m}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Velocidad tangencial en dicha ubicación:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; v_\theta\!\left(\tfrac{3}{4}R\right) =\frac{141\,372}{2\pi(187.5)} \approx 120\ \mathrm{m/s}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El descenso de presión es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \Delta P = \tfrac{1}{2}\rho_{\text{aire}} v_\theta^2 = \tfrac{1}{2}(1.225)(120^2) = 8820\ \mathrm{Pa}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La fuerza sobre la fachada (&amp;lt;math&amp;gt;A=50\ \mathrm{m^2}&amp;lt;/math&amp;gt;) vale:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F = \Delta P\, A = 8820 \cdot 50 = 441\,000\ \mathrm{N}. &amp;lt;/math&amp;gt;&lt;br /&gt;
===  Conversión a toneladas-fuerza ===&lt;br /&gt;
&lt;br /&gt;
Conversión utilizada:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;1\ \mathrm{tf} \approx 10\ \mathrm{kN}.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fuerza en kN:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; 441\,000\ \mathrm{N} = 441\ \mathrm{kN}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Conversión final:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; F_{\mathrm{tf}}=\frac{441}{10}=44.1\ \mathrm{tf}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\boxed{F\approx 44\ \mathrm{toneladas!-!fuerza}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Implicaciones sobre la destrucción estructural ===&lt;br /&gt;
&lt;br /&gt;
Una carga lateral de aproximadamente 44 tf aplicada de forma brusca puede producir:&lt;br /&gt;
&lt;br /&gt;
Pandeo y rotura frágil de muros ligeros.&lt;br /&gt;
&lt;br /&gt;
Arrancamiento de anclajes, uniones y tornillería estructural.&lt;br /&gt;
&lt;br /&gt;
Presurización interna repentina tras la perforación de la fachada, lo que incrementa la acción sobre la estructura.&lt;br /&gt;
&lt;br /&gt;
Desplazamiento o vuelco parcial de la edificación por fallo de la cimentación ante cargas horizontales excesivas.&lt;br /&gt;
&lt;br /&gt;
Incluso sin incluir efectos turbulentos adicionales, esta fuerza es suficiente para causar daños severos e incluso el colapso total de estructuras ligeras.&lt;br /&gt;
&lt;br /&gt;
=== Referencias del apartado  ===&lt;br /&gt;
&lt;br /&gt;
NOAA – dinámica general de tornados y rangos de presión.&lt;br /&gt;
https://www.nssl.noaa.gov&lt;br /&gt;
&lt;br /&gt;
Engineering Toolbox – valor de &amp;lt;math&amp;gt;\rho_{\text{aire}}&amp;lt;/math&amp;gt; empleado.&lt;br /&gt;
https://www.engineeringtoolbox.com&lt;br /&gt;
&lt;br /&gt;
UCAR – formulación conceptual del vórtice de Rankine.&lt;br /&gt;
https://scied.ucar.edu&lt;br /&gt;
&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94444</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94444"/>
				<updated>2025-12-02T12:51:12Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación matemática del vórtice de Rankine */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
=== Variables y definiciones ===&lt;br /&gt;
* &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt;: distancia radial al eje del vórtice  &lt;br /&gt;
* &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;: radio del núcleo (zona de rotación sólida)  &lt;br /&gt;
* &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt;: velocidad tangencial en función del radio  &lt;br /&gt;
* &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;: circulación total del vórtice, definida como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = \oint \mathbf{v} \cdot d\mathbf{s} = \int_0^{2\pi} v_\theta(r) \, r \, d\theta&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Núcleo interior (rotación sólida) ===&lt;br /&gt;
Dentro del núcleo, &amp;lt;math&amp;gt;r \le R&amp;lt;/math&amp;gt;, las partículas giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \Omega \, r&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que la circulación sea continua en &amp;lt;math&amp;gt;r=R&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(R) \cdot 2 \pi R = (\Omega R) \cdot 2\pi R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2 \pi R^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, la velocidad tangencial en el núcleo es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r) = \frac{\Gamma}{2 \pi R^2} \, r, \quad r \le R&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Región exterior (flujo irrotacional) ===&lt;br /&gt;
En la región exterior, &amp;lt;math&amp;gt;r &amp;gt; R&amp;lt;/math&amp;gt;, la vorticidad es prácticamente nula, por lo que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r) \cdot 2 \pi r \quad \Rightarrow \quad v_\theta(r) = \frac{\Gamma}{2 \pi r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Formulación completa por tramos ===&lt;br /&gt;
\[&lt;br /&gt;
v_\theta(r) =&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2 \pi R^2} \, r, &amp;amp; r \le R \\&lt;br /&gt;
\dfrac{\Gamma}{2 \pi r}, &amp;amp; r &amp;gt; R&lt;br /&gt;
\end{cases}&lt;br /&gt;
\]&lt;br /&gt;
&lt;br /&gt;
Características:&lt;br /&gt;
* La velocidad crece linealmente en el núcleo.  &lt;br /&gt;
* La velocidad decrece como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt; en la región exterior.  &lt;br /&gt;
* La circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; se conserva para cualquier radio.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación en coordenadas cartesianas ===&lt;br /&gt;
Para representar el flujo en el plano &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
r = \sqrt{x^2 + y^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta(r) \frac{y}{r}, \quad u_y = v_\theta(r) \frac{x}{r}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Esto genera un campo vectorial tangencial al eje del vórtice, útil para simulaciones y visualizaciones.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94443</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94443"/>
				<updated>2025-12-02T12:36:29Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Comparación entre vórtices reales y modelos matemáticos */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
=== Vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
Los '''vórtices atmosféricos''' son estructuras de rotación del aire que aparecen en múltiples escalas, desde remolinos de unos pocos metros hasta sistemas ciclónicos de miles de kilómetros. Su formación, dinámica e intensidad dependen de factores como la estabilidad atmosférica, el gradiente de presión, la humedad o la interacción con la superficie terrestre o marina. Entre los vórtices más comunes se encuentran los tornados, los huracanes (o ciclones tropicales), las trombas marinas y los ''dust devils''.&lt;br /&gt;
&lt;br /&gt;
=== Tipos de vórtices atmosféricos ===&lt;br /&gt;
&lt;br /&gt;
==== Tornados ====&lt;br /&gt;
Los '''tornados''' son vórtices de escala relativamente pequeña (diámetros típicos entre 50 y 500 metros) pero extremadamente intensos. Se originan normalmente en supercélulas, donde la cizalladura vertical del viento induce la formación de un mesociclón que, bajo determinadas condiciones de inestabilidad y humedad, puede extenderse hasta la superficie. Las velocidades del viento pueden superar los 100 m/s en los casos más severos, y el daño asociado se clasifica mediante la escala EF (Enhanced Fujita).&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' muy alta; vientos extremos  &lt;br /&gt;
* '''Formación:''' supercélulas y fuerte cizalladura vertical  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Huracanes (ciclones tropicales) ====&lt;br /&gt;
Los '''huracanes''' son vórtices de gran escala (100–1000 km) caracterizados por un núcleo cálido y un mínimo de presión central. Su energía proviene de la evaporación sobre aguas oceánicas cálidas y de la liberación de calor latente durante la condensación. La estructura incluye un ojo, una pared del ojo y bandas espirales de lluvia.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' cientos a miles de kilómetros  &lt;br /&gt;
* '''Intensidad:''' alta, aunque con vientos menores que en tornados  &lt;br /&gt;
* '''Formación:''' océanos cálidos (≥ 26 °C), convección profunda y baja cizalladura  &lt;br /&gt;
* '''Duración:''' días o semanas  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Trombas marinas ====&lt;br /&gt;
Las '''trombas marinas''' son vórtices que se forman sobre cuerpos de agua. Aunque algunas proceden de supercélulas, la mayoría son no tornádicas y se generan por convección local en condiciones de fuerte humedad y gradiente térmico entre la superficie del agua y el aire.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' decenas a cientos de metros  &lt;br /&gt;
* '''Intensidad:''' moderada (≈ EF0–EF1)  &lt;br /&gt;
* '''Formación:''' convección húmeda sobre agua cálida  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== ''Dust devils'' ====&lt;br /&gt;
Los '''''dust devils''''' son vórtices térmicos de pequeña escala formados en condiciones de fuerte insolación. Aparecen cuando el calentamiento del suelo produce columnas ascendentes de aire que pueden adquirir rotación por pequeñas irregularidades del flujo.&lt;br /&gt;
&lt;br /&gt;
* '''Escala:''' pocos metros a decenas de metros  &lt;br /&gt;
* '''Intensidad:''' baja (&amp;lt; 25 m/s)  &lt;br /&gt;
* '''Formación:''' convección térmica sobre suelo caliente  &lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Comparación de escalas e intensidades ====&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot; style=&amp;quot;text-align:center&amp;quot;&lt;br /&gt;
! Tipo de vórtice&lt;br /&gt;
! Escala horizontal&lt;br /&gt;
! Velocidad típica&lt;br /&gt;
! Mecanismo dominante&lt;br /&gt;
|-&lt;br /&gt;
| Tornado&lt;br /&gt;
| 10² m&lt;br /&gt;
| 60–120 m/s&lt;br /&gt;
| Cizalladura + supercélula&lt;br /&gt;
|-&lt;br /&gt;
| Huracán&lt;br /&gt;
| 10⁵ m&lt;br /&gt;
| 30–70 m/s&lt;br /&gt;
| Energía oceánica + convección&lt;br /&gt;
|-&lt;br /&gt;
| Tromba marina&lt;br /&gt;
| 10² m&lt;br /&gt;
| 20–40 m/s&lt;br /&gt;
| Convección húmeda local&lt;br /&gt;
|-&lt;br /&gt;
| ''Dust devil''&lt;br /&gt;
| 10¹–10² m&lt;br /&gt;
| 5–20 m/s&lt;br /&gt;
| Convección térmica seca&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Modelos de vórtice: Rankine y Burgers–Rott ===&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Rankine ====&lt;br /&gt;
El '''vórtice de Rankine''' es un modelo clásico que combina dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
; Núcleo sólido rotante (ρ ≤ R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
; Exterior de vórtice potencial (ρ &amp;gt; R)&lt;br /&gt;
:&amp;lt;math&amp;gt; v_\theta(\rho) = \frac{\Gamma}{2\pi\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El modelo es simple y útil, pero la transición entre regiones no es suave y no incluye efectos viscosos.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
==== Vórtice de Burgers–Rott ====&lt;br /&gt;
El '''vórtice de Burgers–Rott''' es un modelo más realista para vórtices estacionarios en fluidos viscosos. Resulta del equilibrio entre la difusión viscosa de la vorticidad y la compresión inducida por un flujo axial convergente.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi\rho}\left(1 - e^{- \rho^2 / (4\nu t)} \right)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\nu&amp;lt;/math&amp;gt; es la viscosidad cinemática y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; un parámetro temporal relacionado con la difusión de vorticidad.&lt;br /&gt;
&lt;br /&gt;
==== Ventajas respecto al vórtice de Rankine ====&lt;br /&gt;
* Perfil de velocidades suave y continuo  &lt;br /&gt;
* Representación realista de la difusión viscosa  &lt;br /&gt;
* Aproxima un núcleo gaussiano cerca del centro  &lt;br /&gt;
* Coincide con el vórtice potencial en región exterior&lt;br /&gt;
&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94428</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94428"/>
				<updated>2025-12-02T12:17:46Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Conversión de velocidad tangencial a componentes Ux y Uy */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94427</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94427"/>
				<updated>2025-12-02T12:17:37Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Construcción del campo de velocidades en el plano XY */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94426</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94426"/>
				<updated>2025-12-02T12:17:28Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Perfil radial de la velocidad tangencial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94425</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94425"/>
				<updated>2025-12-02T12:17:18Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Función de velocidad tangencial por tramos */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94424</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94424"/>
				<updated>2025-12-02T12:17:07Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Definición de parámetros y cálculo de la circulación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94419</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94419"/>
				<updated>2025-12-02T12:13:55Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Representación del campo vectorial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Representación del campo vectorial ===&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94418</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94418"/>
				<updated>2025-12-02T12:13:41Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Conversión de velocidad tangencial a componentes Ux y Uy */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Conversión de velocidad tangencial a componentes Ux y Uy ===&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94417</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94417"/>
				<updated>2025-12-02T12:13:29Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Construcción del campo de velocidades en el plano XY */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Construcción del campo de velocidades en el plano XY ===&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94409</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94409"/>
				<updated>2025-12-02T12:10:47Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Perfil radial de la velocidad tangencial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Perfil radial de la velocidad tangencial ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94407</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94407"/>
				<updated>2025-12-02T12:10:26Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Función de velocidad tangencial por tramos */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
=== Función de velocidad tangencial por tramos ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Interior del núcleo (ρ ≤ R): rotación sólida ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ====&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Perfil radial de la velocidad tangencial ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94406</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94406"/>
				<updated>2025-12-02T12:10:01Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Definición de parámetros y cálculo de la circulación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Definición de parámetros y cálculo de la circulación ===&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Función de velocidad tangencial por tramos ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Interior del núcleo (ρ ≤ R): rotación sólida ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Perfil radial de la velocidad tangencial ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94403</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94403"/>
				<updated>2025-12-02T12:09:11Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Determinación de la circulación y visualizacion del flujo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Definición de parámetros y cálculo de la circulación ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Función de velocidad tangencial por tramos ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Interior del núcleo (ρ ≤ R): rotación sólida ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Perfil radial de la velocidad tangencial ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94399</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94399"/>
				<updated>2025-12-02T11:59:16Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Determinación de la circulación y visualizacion del flujo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94398</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94398"/>
				<updated>2025-12-02T11:58:57Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* 6. Representación del campo vectorial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94397</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94397"/>
				<updated>2025-12-02T11:58:24Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* 5. Conversión de velocidad tangencial a componentes Ux y Uy */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
== 6. Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94396</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94396"/>
				<updated>2025-12-02T11:58:13Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* 4. Construcción del campo de velocidades en el plano XY */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
== 5. Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 6. Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94395</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94395"/>
				<updated>2025-12-02T11:58:02Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* 3. Perfil radial de la velocidad tangencial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
== 4. Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 5. Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 6. Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94394</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94394"/>
				<updated>2025-12-02T11:57:52Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* 2. Función de velocidad tangencial por tramos */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
== 3. Perfil radial de la velocidad tangencial ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 4. Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 5. Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 6. Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94392</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94392"/>
				<updated>2025-12-02T11:57:35Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* 1. Definición de parámetros y cálculo de la circulación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
== 2. Función de velocidad tangencial por tramos ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Interior del núcleo (ρ ≤ R): rotación sólida ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 3. Perfil radial de la velocidad tangencial ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 4. Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 5. Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 6. Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94378</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94378"/>
				<updated>2025-12-02T11:53:52Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Determinación de la circulación y visualizacion del flujo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se describe el funcionamiento del código utilizado para calcular la circulación de un vórtice tipo Rankine y representar el campo de velocidades asociado. El caso se ha parametrizado como un tornado de intensidad EF4, usando valores típicos de radio del ojo y velocidad en el borde.&lt;br /&gt;
&lt;br /&gt;
== 1. Definición de parámetros y cálculo de la circulación ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
R = 250; &lt;br /&gt;
vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se fija un radio del núcleo del tornado &amp;lt;math&amp;gt;R = 250\,\text{m}&amp;lt;/math&amp;gt; y una velocidad tangencial medida en ese radio de &amp;lt;math&amp;gt;v_R = 90\,\text{m/s}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Usando la relación básica del vórtice potencial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = 2\pi R\, v_\theta(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
se obtiene directamente la circulación total &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que es la magnitud fundamental del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
Esta circulación se mantiene tanto en la región interior como en la exterior.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 2. Función de velocidad tangencial por tramos ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se define una función anónima &amp;lt;code&amp;gt;vtheta_fun(rho)&amp;lt;/code&amp;gt; que implementa la expresión por tramos del vórtice de Rankine.&lt;br /&gt;
&lt;br /&gt;
=== Interior del núcleo (ρ ≤ R): rotación sólida ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi R^2}\,\rho&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Exterior del núcleo (ρ &amp;gt; R): flujo irrotacional ===&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(\rho) = \frac{\Gamma}{2\pi \rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Matlab evalúa cada tramo usando multiplicación lógica &amp;lt;code&amp;gt;(rho&amp;lt;=R).* ...&amp;lt;/code&amp;gt;, lo que permite expresar la función completa de forma compacta.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 3. Perfil radial de la velocidad tangencial ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Se genera un vector de radios desde 0 hasta 1000 m y se calcula en cada punto la velocidad tangencial.  &lt;br /&gt;
La figura resultante se obtiene con:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* En rojo se representa la región interior, donde la velocidad crece linealmente.  &lt;br /&gt;
* En azul aparece la región exterior, donde decrece como &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* La línea negra discontinua marca el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Con ello se visualiza claramente la transición entre ambos regímenes del modelo de Rankine.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 4. Construcción del campo de velocidades en el plano XY ==&lt;br /&gt;
&lt;br /&gt;
Para representar el vórtice en 2D, se discretiza el plano en un dominio cuadrado:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  &lt;br /&gt;
rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;code&amp;gt;meshgrid&amp;lt;/code&amp;gt; genera una malla sobre el cuadrado &amp;lt;math&amp;gt;[-800,800]^2&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* &amp;lt;math&amp;gt;\rho = \sqrt{x^2 + y^2}&amp;lt;/math&amp;gt; es la distancia al centro.  &lt;br /&gt;
* &amp;lt;code&amp;gt;rho_safe&amp;lt;/code&amp;gt; evita divisiones por cero en el origen.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial en cada punto se evalúa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 5. Conversión de velocidad tangencial a componentes Ux y Uy ==&lt;br /&gt;
&lt;br /&gt;
En coordenadas polares, la velocidad tangencial es perpendicular al vector radial, lo que lleva a las transformaciones:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
u_x = -v_\theta \frac{y}{\rho}, \qquad&lt;br /&gt;
u_y =  v_\theta \frac{x}{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En Matlab se implementa como:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así se obtiene el campo vectorial completo en coordenadas cartesianas.&lt;br /&gt;
&lt;br /&gt;
---&lt;br /&gt;
&lt;br /&gt;
== 6. Representación del campo vectorial ==&lt;br /&gt;
&lt;br /&gt;
Los vectores del flujo se representan con &amp;lt;code&amp;gt;quiver&amp;lt;/code&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
mask_in  = rho_xy &amp;lt;= R;&lt;br /&gt;
mask_out = rho_xy &amp;gt;  R;&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Los vectores del núcleo (&amp;lt;math&amp;gt;\rho \le R&amp;lt;/math&amp;gt;) se muestran en rojo.  &lt;br /&gt;
* Los vectores exteriores se muestran en azul.&lt;br /&gt;
&lt;br /&gt;
Además, se dibuja el contorno circular del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El resultado permite visualizar:&lt;br /&gt;
&lt;br /&gt;
* Una región interior con rotación casi uniforme.  &lt;br /&gt;
* Una región exterior donde la velocidad decrece con &amp;lt;math&amp;gt;1/\rho&amp;lt;/math&amp;gt;.  &lt;br /&gt;
* Un flujo completamente tangencial en todo el dominio.&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94274</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94274"/>
				<updated>2025-12-02T11:01:21Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación matemática del vórtice de Rankine */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo simple utilizado para describir cómo gira un fluido alrededor de un eje. La idea principal es que un vórtice real no presenta la misma estructura en todas sus regiones: cerca del centro el movimiento es más suave, mientras que en zonas más alejadas el flujo se comporta de manera más “libre”. Por este motivo, el modelo utiliza dos expresiones distintas para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación se explica el origen de cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este modelo la magnitud fijada de antemano es la circulación &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;, que mide la cantidad total de rotación asociada al flujo alrededor del centro. Rankine asume que dicho valor es constante para cualquier radio, lo que permite simplificar el análisis.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si se utilizara directamente la expresión &amp;lt;math&amp;gt;\Gamma/(2\pi r)&amp;lt;/math&amp;gt;, la velocidad tangencial se haría infinita cuando &amp;lt;math&amp;gt;r \to 0&amp;lt;/math&amp;gt;, lo cual no es físicamente razonable. Para evitar esta singularidad, en la región interior se supone que las partículas del fluido giran como un cuerpo rígido:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para determinar su valor se impone que la circulación en el borde del núcleo sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\,(2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
De aquí se obtiene:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Omega = \frac{\Gamma}{2\pi r_c^2}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=\frac{\Gamma}{2\pi r_c^2}\, r.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
3. Parte exterior: &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la zona exterior la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y muestra que la velocidad disminuye cuando aumenta el radio, tal como se observa en vórtices reales fuera del núcleo.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo combina dos comportamientos distintos:&lt;br /&gt;
&lt;br /&gt;
uno suave en la región central, donde la velocidad es proporcional al radio;&lt;br /&gt;
&lt;br /&gt;
y otro típico de flujo irrotacional más alejado del centro, donde la velocidad varía como &amp;lt;math&amp;gt;1/r&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
La transición en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt; se ajusta para que la velocidad sea continua en todo el dominio. Aunque no describe todos los detalles de un vórtice real, el modelo de Rankine es útil porque evita la singularidad en el centro y mantiene la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94263</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94263"/>
				<updated>2025-12-02T10:53:40Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación matemática del vórtice de Rankine */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo muy simple que se usa para describir cómo gira un fluido alrededor de un eje. La idea es que un vórtice real no gira igual en todas partes: cerca del centro el movimiento suele ser suave, y más lejos el giro parece más “libre”. Por eso el modelo usa dos expresiones diferentes para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
Fórmula del vórtice de Rankine&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial &amp;lt;math&amp;gt;v_\theta(r)&amp;lt;/math&amp;gt; viene dada por una función definida por tramos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;r&amp;lt;/math&amp;gt; es la distancia al centro del vórtice y &amp;lt;math&amp;gt;r_c&amp;lt;/math&amp;gt; es el radio del núcleo.&lt;br /&gt;
&lt;br /&gt;
Región interior&lt;br /&gt;
&lt;br /&gt;
En el núcleo (&amp;lt;math&amp;gt;r \le r_c&amp;lt;/math&amp;gt;), el modelo supone un movimiento de rotación sólida. La velocidad tangencial puede escribirse como&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \Omega r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;\Omega&amp;lt;/math&amp;gt; es la velocidad angular. Para asegurar que la circulación sea igual a &amp;lt;math&amp;gt;\Gamma&amp;lt;/math&amp;gt; en &amp;lt;math&amp;gt;r = r_c&amp;lt;/math&amp;gt;, se impone&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Gamma = v_\theta(r_c)\, (2\pi r_c)&lt;br /&gt;
       = (\Omega r_c)(2\pi r_c),&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
de donde se obtiene&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = \frac{\Gamma}{2\pi r_c^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
y por tanto&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r_c^2} \, r&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Región exterior&lt;br /&gt;
&lt;br /&gt;
Para &amp;lt;math&amp;gt;r &amp;gt; r_c&amp;lt;/math&amp;gt;, la vorticidad se considera despreciable y el flujo se aproxima como irrotacional. En este caso, la relación entre circulación y velocidad tangencial es&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi r\, v_\theta(r)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
lo que conduce a&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;v_\theta(r) = \frac{\Gamma}{2\pi r}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta expresión corresponde al vórtice potencial clásico y describe la disminución de la velocidad con el radio.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94234</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=94234"/>
				<updated>2025-12-02T10:45:34Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación matemática del vórtice de Rankine */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo muy simple que se usa para describir cómo gira un fluido alrededor de un eje. La idea es que un vórtice real no gira igual en todas partes: cerca del centro el movimiento suele ser suave, y más lejos el giro parece más “libre”. Por eso el modelo usa dos expresiones diferentes para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\dfrac{\Gamma}{2\pi r_c^2}\, r, &amp;amp; r \le r_c \\[6pt]&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r &amp;gt; r_c&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación explico de dónde sale cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ&lt;br /&gt;
&lt;br /&gt;
En este modelo lo único que se fija de antemano es la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ, que básicamente mide cuánto “gira” el fluido alrededor del centro. Es como la cantidad total de rotación del vórtice. Rankine supone que este valor es el mismo en cualquier radio, lo cual simplifica mucho las cuentas.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &lt;br /&gt;
𝑟&lt;br /&gt;
≤&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r≤r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El primer problema que tendría un vórtice ideal es que, si dejamos que la velocidad tangencial sea &lt;br /&gt;
Γ&lt;br /&gt;
/&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ/(2πr), entonces cuando &lt;br /&gt;
𝑟&lt;br /&gt;
→&lt;br /&gt;
0&lt;br /&gt;
r→0 la velocidad se hace infinita. Esto no tiene sentido físicamente, porque el fluido no puede moverse cada vez más rápido cuanto más se acerca al centro.&lt;br /&gt;
&lt;br /&gt;
Para evitar eso, en el interior del vórtice se supone que las partículas giran como un cuerpo rígido, es decir:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Ω&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=Ωr&lt;br /&gt;
&lt;br /&gt;
Eso significa que todas las partículas comparten la misma velocidad angular. Es la manera más simple de evitar la singularidad.&lt;br /&gt;
&lt;br /&gt;
Lo único que falta es determinar qué valor debe tener &lt;br /&gt;
Ω&lt;br /&gt;
Ω. Para eso se usa que en el borde del núcleo, en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
, la circulación debe ser precisamente &lt;br /&gt;
Γ&lt;br /&gt;
Γ:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
 &lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
(&lt;br /&gt;
Ω&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
Γ=v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)=(Ωr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)&lt;br /&gt;
&lt;br /&gt;
De aquí sale:&lt;br /&gt;
&lt;br /&gt;
Ω&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
Ω=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la expresión de antes queda:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
r&lt;br /&gt;
3. Parte exterior: &lt;br /&gt;
𝑟&lt;br /&gt;
&amp;gt;&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r&amp;gt;r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Más allá del núcleo el comportamiento cambia. Aquí el fluido se considera prácticamente irrotacional, es decir, no hay vorticidad apreciable. En un flujo así la relación entre circulación y velocidad es muy simple:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
 &lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ=2πrv&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)&lt;br /&gt;
&lt;br /&gt;
Y despejando:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta es la fórmula del vórtice potencial, que tiene la característica de que la velocidad decrece cuando aumenta el radio. Es lo que suele observarse en vórtices reales a cierta distancia del centro.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo mezcla dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
uno suave en el centro (proporcional a &lt;br /&gt;
𝑟&lt;br /&gt;
r),&lt;br /&gt;
&lt;br /&gt;
y otro típico de vórtice irrotacional fuera (proporcional a &lt;br /&gt;
1&lt;br /&gt;
/&lt;br /&gt;
𝑟&lt;br /&gt;
1/r).&lt;br /&gt;
&lt;br /&gt;
La transición se hace en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
 y está ajustada de manera que la velocidad sea continua. No es una descripción perfecta de un vórtice real, pero es muy útil porque evita problemas matemáticos en el núcleo y sigue respetando la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=93823</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=93823"/>
				<updated>2025-12-01T22:21:19Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación matemática del vórtice de Rankine */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo muy simple que se usa para describir cómo gira un fluido alrededor de un eje. La idea es que un vórtice real no gira igual en todas partes: cerca del centro el movimiento suele ser suave, y más lejos el giro parece más “libre”. Por eso el modelo usa dos expresiones diferentes para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial es:&lt;br /&gt;
&lt;br /&gt;
vθ​(r)=⎩&lt;br /&gt;
⎨&lt;br /&gt;
⎧​2πrc2​Γ​r,2πrΓ​,​r≤rc​r&amp;gt;rc​​&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación explico de dónde sale cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ&lt;br /&gt;
&lt;br /&gt;
En este modelo lo único que se fija de antemano es la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ, que básicamente mide cuánto “gira” el fluido alrededor del centro. Es como la cantidad total de rotación del vórtice. Rankine supone que este valor es el mismo en cualquier radio, lo cual simplifica mucho las cuentas.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &lt;br /&gt;
𝑟&lt;br /&gt;
≤&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r≤r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El primer problema que tendría un vórtice ideal es que, si dejamos que la velocidad tangencial sea &lt;br /&gt;
Γ&lt;br /&gt;
/&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ/(2πr), entonces cuando &lt;br /&gt;
𝑟&lt;br /&gt;
→&lt;br /&gt;
0&lt;br /&gt;
r→0 la velocidad se hace infinita. Esto no tiene sentido físicamente, porque el fluido no puede moverse cada vez más rápido cuanto más se acerca al centro.&lt;br /&gt;
&lt;br /&gt;
Para evitar eso, en el interior del vórtice se supone que las partículas giran como un cuerpo rígido, es decir:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Ω&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=Ωr&lt;br /&gt;
&lt;br /&gt;
Eso significa que todas las partículas comparten la misma velocidad angular. Es la manera más simple de evitar la singularidad.&lt;br /&gt;
&lt;br /&gt;
Lo único que falta es determinar qué valor debe tener &lt;br /&gt;
Ω&lt;br /&gt;
Ω. Para eso se usa que en el borde del núcleo, en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
, la circulación debe ser precisamente &lt;br /&gt;
Γ&lt;br /&gt;
Γ:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
 &lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
(&lt;br /&gt;
Ω&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
Γ=v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)=(Ωr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)&lt;br /&gt;
&lt;br /&gt;
De aquí sale:&lt;br /&gt;
&lt;br /&gt;
Ω&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
Ω=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la expresión de antes queda:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
r&lt;br /&gt;
3. Parte exterior: &lt;br /&gt;
𝑟&lt;br /&gt;
&amp;gt;&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r&amp;gt;r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Más allá del núcleo el comportamiento cambia. Aquí el fluido se considera prácticamente irrotacional, es decir, no hay vorticidad apreciable. En un flujo así la relación entre circulación y velocidad es muy simple:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
 &lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ=2πrv&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)&lt;br /&gt;
&lt;br /&gt;
Y despejando:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta es la fórmula del vórtice potencial, que tiene la característica de que la velocidad decrece cuando aumenta el radio. Es lo que suele observarse en vórtices reales a cierta distancia del centro.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo mezcla dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
uno suave en el centro (proporcional a &lt;br /&gt;
𝑟&lt;br /&gt;
r),&lt;br /&gt;
&lt;br /&gt;
y otro típico de vórtice irrotacional fuera (proporcional a &lt;br /&gt;
1&lt;br /&gt;
/&lt;br /&gt;
𝑟&lt;br /&gt;
1/r).&lt;br /&gt;
&lt;br /&gt;
La transición se hace en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
 y está ajustada de manera que la velocidad sea continua. No es una descripción perfecta de un vórtice real, pero es muy útil porque evita problemas matemáticos en el núcleo y sigue respetando la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=93821</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=93821"/>
				<updated>2025-12-01T22:20:20Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación matemática del vórtice de Rankine */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo muy simple que se usa para describir cómo gira un fluido alrededor de un eje. La idea es que un vórtice real no gira igual en todas partes: cerca del centro el movimiento suele ser suave, y más lejos el giro parece más “libre”. Por eso el modelo usa dos expresiones diferentes para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial es:&lt;br /&gt;
&lt;br /&gt;
vθ​(r)=⎩&lt;br /&gt;
⎨&lt;br /&gt;
⎧​2πrc2​Γ​r,2πrΓ​,​r≤rc​r&amp;gt;rc​​&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación explico de dónde sale cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ&lt;br /&gt;
&lt;br /&gt;
En este modelo lo único que se fija de antemano es la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ, que básicamente mide cuánto “gira” el fluido alrededor del centro. Es como la cantidad total de rotación del vórtice. Rankine supone que este valor es el mismo en cualquier radio, lo cual simplifica mucho las cuentas.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &lt;br /&gt;
𝑟&lt;br /&gt;
≤&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r≤r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El primer problema que tendría un vórtice ideal es que, si dejamos que la velocidad tangencial sea &lt;br /&gt;
Γ&lt;br /&gt;
/&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ/(2πr), entonces cuando &lt;br /&gt;
𝑟&lt;br /&gt;
→&lt;br /&gt;
0&lt;br /&gt;
r→0 la velocidad se hace infinita. Esto no tiene sentido físicamente, porque el fluido no puede moverse cada vez más rápido cuanto más se acerca al centro.&lt;br /&gt;
&lt;br /&gt;
Para evitar eso, en el interior del vórtice se supone que las partículas giran como un cuerpo rígido, es decir:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Ω&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=Ωr&lt;br /&gt;
&lt;br /&gt;
Eso significa que todas las partículas comparten la misma velocidad angular. Es la manera más simple de evitar la singularidad.&lt;br /&gt;
&lt;br /&gt;
Lo único que falta es determinar qué valor debe tener &lt;br /&gt;
Ω&lt;br /&gt;
Ω. Para eso se usa que en el borde del núcleo, en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
, la circulación debe ser precisamente &lt;br /&gt;
Γ&lt;br /&gt;
Γ:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
 &lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
(&lt;br /&gt;
Ω&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
Γ=v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)=(Ωr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)&lt;br /&gt;
&lt;br /&gt;
De aquí sale:&lt;br /&gt;
&lt;br /&gt;
Ω&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
Ω=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la expresión de antes queda:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
r&lt;br /&gt;
3. Parte exterior: &lt;br /&gt;
𝑟&lt;br /&gt;
&amp;gt;&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r&amp;gt;r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Más allá del núcleo el comportamiento cambia. Aquí el fluido se considera prácticamente irrotacional, es decir, no hay vorticidad apreciable. En un flujo así la relación entre circulación y velocidad es muy simple:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
 &lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ=2πrv&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)&lt;br /&gt;
&lt;br /&gt;
Y despejando:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta es la fórmula del vórtice potencial, que tiene la característica de que la velocidad decrece cuando aumenta el radio. Es lo que suele observarse en vórtices reales a cierta distancia del centro.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo mezcla dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
uno suave en el centro (proporcional a &lt;br /&gt;
𝑟&lt;br /&gt;
r),&lt;br /&gt;
&lt;br /&gt;
y otro típico de vórtice irrotacional fuera (proporcional a &lt;br /&gt;
1&lt;br /&gt;
/&lt;br /&gt;
𝑟&lt;br /&gt;
1/r).&lt;br /&gt;
&lt;br /&gt;
La transición se hace en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
 y está ajustada de manera que la velocidad sea continua. No es una descripción perfecta de un vórtice real, pero es muy útil porque evita problemas matemáticos en el núcleo y sigue respetando la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=93818</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=93818"/>
				<updated>2025-12-01T22:19:34Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Formulación matemática del vórtice de Rankine */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
El vórtice de Rankine es un modelo muy simple que se usa para describir cómo gira un fluido alrededor de un eje. La idea es que un vórtice real no gira igual en todas partes: cerca del centro el movimiento suele ser suave, y más lejos el giro parece más “libre”. Por eso el modelo usa dos expresiones diferentes para la velocidad en función del radio.&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial es:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
{&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
,&lt;br /&gt;
	&lt;br /&gt;
𝑟&lt;br /&gt;
≤&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
,&lt;br /&gt;
	&lt;br /&gt;
𝑟&lt;br /&gt;
&amp;gt;&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
⎩&lt;br /&gt;
⎨&lt;br /&gt;
⎧&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
r,&lt;br /&gt;
2πr&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
,&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
r≤r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
r&amp;gt;r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A continuación explico de dónde sale cada parte.&lt;br /&gt;
&lt;br /&gt;
1. El papel de la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ&lt;br /&gt;
&lt;br /&gt;
En este modelo lo único que se fija de antemano es la circulación &lt;br /&gt;
Γ&lt;br /&gt;
Γ, que básicamente mide cuánto “gira” el fluido alrededor del centro. Es como la cantidad total de rotación del vórtice. Rankine supone que este valor es el mismo en cualquier radio, lo cual simplifica mucho las cuentas.&lt;br /&gt;
&lt;br /&gt;
2. Parte interior: &lt;br /&gt;
𝑟&lt;br /&gt;
≤&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r≤r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
El primer problema que tendría un vórtice ideal es que, si dejamos que la velocidad tangencial sea &lt;br /&gt;
Γ&lt;br /&gt;
/&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ/(2πr), entonces cuando &lt;br /&gt;
𝑟&lt;br /&gt;
→&lt;br /&gt;
0&lt;br /&gt;
r→0 la velocidad se hace infinita. Esto no tiene sentido físicamente, porque el fluido no puede moverse cada vez más rápido cuanto más se acerca al centro.&lt;br /&gt;
&lt;br /&gt;
Para evitar eso, en el interior del vórtice se supone que las partículas giran como un cuerpo rígido, es decir:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Ω&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=Ωr&lt;br /&gt;
&lt;br /&gt;
Eso significa que todas las partículas comparten la misma velocidad angular. Es la manera más simple de evitar la singularidad.&lt;br /&gt;
&lt;br /&gt;
Lo único que falta es determinar qué valor debe tener &lt;br /&gt;
Ω&lt;br /&gt;
Ω. Para eso se usa que en el borde del núcleo, en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
, la circulación debe ser precisamente &lt;br /&gt;
Γ&lt;br /&gt;
Γ:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
 &lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
(&lt;br /&gt;
Ω&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
(&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
)&lt;br /&gt;
Γ=v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)=(Ωr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)(2πr&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
)&lt;br /&gt;
&lt;br /&gt;
De aquí sale:&lt;br /&gt;
&lt;br /&gt;
Ω&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
Ω=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la expresión de antes queda:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
2&lt;br /&gt;
 &lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
c&lt;br /&gt;
2&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
r&lt;br /&gt;
3. Parte exterior: &lt;br /&gt;
𝑟&lt;br /&gt;
&amp;gt;&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r&amp;gt;r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Más allá del núcleo el comportamiento cambia. Aquí el fluido se considera prácticamente irrotacional, es decir, no hay vorticidad apreciable. En un flujo así la relación entre circulación y velocidad es muy simple:&lt;br /&gt;
&lt;br /&gt;
Γ&lt;br /&gt;
=&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
 &lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
Γ=2πrv&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)&lt;br /&gt;
&lt;br /&gt;
Y despejando:&lt;br /&gt;
&lt;br /&gt;
𝑣&lt;br /&gt;
𝜃&lt;br /&gt;
(&lt;br /&gt;
𝑟&lt;br /&gt;
)&lt;br /&gt;
=&lt;br /&gt;
Γ&lt;br /&gt;
2&lt;br /&gt;
𝜋&lt;br /&gt;
𝑟&lt;br /&gt;
v&lt;br /&gt;
θ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
(r)=&lt;br /&gt;
2πr&lt;br /&gt;
Γ&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Esta es la fórmula del vórtice potencial, que tiene la característica de que la velocidad decrece cuando aumenta el radio. Es lo que suele observarse en vórtices reales a cierta distancia del centro.&lt;br /&gt;
&lt;br /&gt;
4. Por qué la fórmula es por tramos&lt;br /&gt;
&lt;br /&gt;
El modelo mezcla dos comportamientos:&lt;br /&gt;
&lt;br /&gt;
uno suave en el centro (proporcional a &lt;br /&gt;
𝑟&lt;br /&gt;
r),&lt;br /&gt;
&lt;br /&gt;
y otro típico de vórtice irrotacional fuera (proporcional a &lt;br /&gt;
1&lt;br /&gt;
/&lt;br /&gt;
𝑟&lt;br /&gt;
1/r).&lt;br /&gt;
&lt;br /&gt;
La transición se hace en &lt;br /&gt;
𝑟&lt;br /&gt;
=&lt;br /&gt;
𝑟&lt;br /&gt;
𝑐&lt;br /&gt;
r=r&lt;br /&gt;
c&lt;br /&gt;
	​&lt;br /&gt;
&lt;br /&gt;
 y está ajustada de manera que la velocidad sea continua. No es una descripción perfecta de un vórtice real, pero es muy útil porque evita problemas matemáticos en el núcleo y sigue respetando la circulación total.&lt;br /&gt;
&lt;br /&gt;
== Determinación de la circulación y visualizacion del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Pregunta 1 - Vórtice de Rankine (versión simplificada)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros EF4&lt;br /&gt;
R = 250; vR = 90;&lt;br /&gt;
Gamma = 2*pi*R*vR;&lt;br /&gt;
fprintf('Circulacion Gamma = %.3e m^2/s\n', Gamma);&lt;br /&gt;
&lt;br /&gt;
% ===== FUNCIÓN VELOCIDAD TANGENCIAL =====&lt;br /&gt;
vtheta_fun = @(rho) (rho&amp;lt;=R).* (Gamma/(2*pi*R^2).*rho) + ...&lt;br /&gt;
                    (rho&amp;gt; R).* (Gamma./(2*pi*rho));&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 1: Perfil v_theta(rho)&lt;br /&gt;
rho = linspace(0,1000,1000);&lt;br /&gt;
vtheta = vtheta_fun(rho);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on;&lt;br /&gt;
plot(rho(rho&amp;lt;=R), vtheta(rho&amp;lt;=R), 'r', 'LineWidth',2);&lt;br /&gt;
plot(rho(rho&amp;gt; R), vtheta(rho&amp;gt; R), 'b', 'LineWidth',2);&lt;br /&gt;
yl = ylim; plot([R R],[yl(1) yl(2)],'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)'); ylabel('v_\theta(m/s)');&lt;br /&gt;
title('Perfil de velocidad tangencial del Tornado categoria EF4');&lt;br /&gt;
leg1 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg1,'FontSize',7);&lt;br /&gt;
&lt;br /&gt;
%% FIGURA 2: Campo vectorial (vista superior) en x,y ∈ [-800,800]&lt;br /&gt;
L = 800; N = 25;&lt;br /&gt;
[x,y] = meshgrid(linspace(-L,L,N));&lt;br /&gt;
rho_xy = sqrt(x.^2+y.^2);  rho_safe = max(rho_xy,1e-6);&lt;br /&gt;
&lt;br /&gt;
v_xy = vtheta_fun(rho_xy);&lt;br /&gt;
Ux = -v_xy .* (y ./ rho_safe);&lt;br /&gt;
Uy =  v_xy .* (x ./ rho_safe);&lt;br /&gt;
&lt;br /&gt;
mask     = rho_xy &amp;lt;= L;      % dominio circular dentro del cuadrado [-L,L]^2&lt;br /&gt;
mask_in  = mask &amp;amp; (rho_xy &amp;lt;= R);&lt;br /&gt;
mask_out = mask &amp;amp; (rho_xy &amp;gt;  R);&lt;br /&gt;
&lt;br /&gt;
figure; hold on; grid on; axis equal;&lt;br /&gt;
axis([-L L -L L]);   % &amp;lt;- aquí fuerzas el dominio x,y ∈ [-800,800]&lt;br /&gt;
&lt;br /&gt;
quiver(x(mask_in),  y(mask_in),  Ux(mask_in),  Uy(mask_in), 0.7, 'r');&lt;br /&gt;
quiver(x(mask_out), y(mask_out), Ux(mask_out), Uy(mask_out), 0.7, 'b');&lt;br /&gt;
&lt;br /&gt;
theta = linspace(0,2*pi,200);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta),'k--','LineWidth',1.3);&lt;br /&gt;
&lt;br /&gt;
xlabel('x (m)'); ylabel('y (m)');&lt;br /&gt;
title('Campo de velocidad tangencial del Tornado categoria EF4 (plano horizontal)');&lt;br /&gt;
leg2 = legend('Núcleo EF4','Exterior EF4','Radio del ojo R','Location','northeast');&lt;br /&gt;
set(leg2,'FontSize',7);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:perfil1_EF4.png|500px]]&lt;br /&gt;
[[Archivo:horizontal1.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia, rotacional y vorticidad ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Rotacional y magnitud de la vorticidad del vórtice de Rankine&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R    = 250;        % radio del núcleo (m)&lt;br /&gt;
vR   = 90;         % velocidad tangencial en rho = R (m/s)&lt;br /&gt;
Gamma = 2*pi*R*vR; % circulación (m^2/s)&lt;br /&gt;
&lt;br /&gt;
% Dominio horizontal&lt;br /&gt;
L = 800;           % extensión máxima (m)&lt;br /&gt;
N = 200;           % puntos por dirección&lt;br /&gt;
[x,y] = meshgrid(linspace(-L, L, N));&lt;br /&gt;
rho   = sqrt(x.^2 + y.^2);&lt;br /&gt;
&lt;br /&gt;
% Rotacional analítico (solo componente vertical):&lt;br /&gt;
%   (nabla x v)_z = Gamma/(pi*R^2) si rho &amp;lt;= R, y 0 si rho &amp;gt; R&lt;br /&gt;
wz = (rho &amp;lt;= R) .* (Gamma/(pi*R^2));   % campo escalar del rotacional&lt;br /&gt;
&lt;br /&gt;
%% FIGURA Rotacional &lt;br /&gt;
&lt;br /&gt;
figure;&lt;br /&gt;
imagesc(linspace(-L,L,N), linspace(-L,L,N), wz);&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
axis equal tight;&lt;br /&gt;
colorbar;&lt;br /&gt;
xlabel('x (m)');&lt;br /&gt;
ylabel('y (m)');&lt;br /&gt;
title('Rotacional del campo de velocidad');&lt;br /&gt;
&lt;br /&gt;
hold on;&lt;br /&gt;
theta = linspace(0,2*pi,300);&lt;br /&gt;
plot(R*cos(theta), R*sin(theta), 'k--', 'LineWidth', 1.5);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:RotacionalEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Efecto de la vorticidad sobre el movimiento de un objeto flotante ==&lt;br /&gt;
== Distribución vertical de la presión en el vórtice ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Campo de presión del vórtice (versión mínima con unidad en colorbar)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros&lt;br /&gt;
R=250; vR=90; z0=2800;&lt;br /&gt;
P0=920e2; Pinf=1013e2;&lt;br /&gt;
rho=1.225; g=9.81;&lt;br /&gt;
&lt;br /&gt;
Gamma=2*pi*R*vR;&lt;br /&gt;
v=@(r) (r&amp;lt;=R).*(Gamma/(2*pi*R^2).*r)+(r&amp;gt;R).*(Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado y presión&lt;br /&gt;
[x,z]=meshgrid(linspace(0,1000,200), linspace(0,z0,200));&lt;br /&gt;
p = (x&amp;lt;=R).*(P0+0.5*rho*v(x).^2 - rho*g.*z) + ...&lt;br /&gt;
    (x&amp;gt; R).*(Pinf-0.5*rho*v(x).^2 - rho*g.*z);&lt;br /&gt;
&lt;br /&gt;
% Gráfica&lt;br /&gt;
figure;&lt;br /&gt;
[~,h]=contourf(x(1,:), z(:,1), p/100, 20);&lt;br /&gt;
set(h,'LineColor','k'); set(gca,'YDir','normal');&lt;br /&gt;
&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Campo de presión sobre el sección vertical');&lt;br /&gt;
&lt;br /&gt;
c = colorbar;&lt;br /&gt;
c.Label.String = 'Presión (mbar)';   % ← UNIDAD AÑADIDA AQUÍ&lt;br /&gt;
&lt;br /&gt;
axis tight;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:CampoPresion.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=== 7. Distribución vertical de la presión en el vórtice: estructura interna y representación ===&lt;br /&gt;
&lt;br /&gt;
=== Datos y constantes empleadas ===&lt;br /&gt;
Se emplean los parámetros del vórtice proporcionados en el enunciado:&lt;br /&gt;
&lt;br /&gt;
* Radio del núcleo: &amp;lt;math&amp;gt;R = 250\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Velocidad tangencial en &amp;lt;math&amp;gt;r = R&amp;lt;/math&amp;gt;: &amp;lt;math&amp;gt;v_\theta(R) = 90\ \mathrm{m/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Presión mínima central: &amp;lt;math&amp;gt;P_0 = 920\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Altura del vórtice: &amp;lt;math&amp;gt;z_0 = 2800\ \mathrm{m}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Densidad del aire: &amp;lt;math&amp;gt;\rho = 1.225\ \mathrm{kg/m^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
* Gravedad: &amp;lt;math&amp;gt;g = 9.81\ \mathrm{m/s^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Circulación:&lt;br /&gt;
&amp;lt;math&amp;gt;\Gamma = 2\pi R v_\theta(R) = 1.4137\times10^5\ \mathrm{m^2/s}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Rotación sólida interior:&lt;br /&gt;
&amp;lt;math&amp;gt;\Omega = v_\theta(R)/R = 0.36\ \mathrm{s^{-1}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== Cálculo del campo de presión p(\rho,z) en todo el dominio ===&lt;br /&gt;
&lt;br /&gt;
La velocidad tangencial del vórtice de Rankine es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
v_\theta(r)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
\Omega r, &amp;amp; r\le R,\\&lt;br /&gt;
\dfrac{\Gamma}{2\pi r}, &amp;amp; r&amp;gt;R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La presión, obtenida a partir de las ecuaciones de Euler para flujo estacionario, es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(\rho,z)=&lt;br /&gt;
\begin{cases}&lt;br /&gt;
P_0 + \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho \le R,\\[6pt]&lt;br /&gt;
P_\infty - \tfrac12 \rho\, v_\theta^2(\rho)\; -\; \rho g z, &amp;amp; \rho &amp;gt; R.&lt;br /&gt;
\end{cases}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Exigiendo continuidad en la frontera del núcleo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho\, v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Cálculo numérico:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho\, v_\theta^2(R) = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por tanto:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty = 1019.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El término hidrostático hasta &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt; vale:&lt;br /&gt;
&amp;lt;math&amp;gt;\rho g z_0 = 336.48\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Interpretación de la figura:'''  &lt;br /&gt;
El mapa de presión presenta una depresión central profunda que aumenta radialmente hasta &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt;. Con la altura, la presión disminuye casi linealmente debido al término hidrostático. Esto coincide con la gráfica mostrada en el código MATLAB del enunciado.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado ====&lt;br /&gt;
* Expresiones de velocidad y presión tomadas del modelo clásico de vórtice de Rankine del enunciado proporcionado.  &lt;br /&gt;
* Los valores numéricos (&amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v_\theta(R)&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;z_0&amp;lt;/math&amp;gt;) proceden de la tabla de parámetros incluida en la imagen del PDF.  &lt;br /&gt;
* La expresión hidrostática &amp;lt;math&amp;gt;\rho g z&amp;lt;/math&amp;gt; aparece explícitamente en el código MATLAB mostrado en la figura adjunta en el enunciado.  &lt;br /&gt;
* El cálculo de &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; se obtiene de la condición de continuidad indicada en el texto del enunciado.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (9) Caída de presión entre el exterior y el centro del ojo ===&lt;br /&gt;
&lt;br /&gt;
La caída pedida es:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = p(R^+,0) - p(0,0)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Dado que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_\infty - \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
P_\infty = P_0 + \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
p(R^+,0)=P_0 + \tfrac12 \rho v_\theta^2(R)&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Entonces:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\Delta p = \tfrac12 \rho v_\theta^2(R) = 49.6125\ \mathrm{mbar}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comparación con:&lt;br /&gt;
&amp;lt;math&amp;gt;P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Conclusión:'''  &lt;br /&gt;
Los valores no coinciden. El modelo de Rankine reparte el incremento total de presión entre dos regiones: la transición entre el centro y &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt;, y entre &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; y el exterior lejano. Esto introduce un factor 2 entre ambas magnitudes. Es una consecuencia directa de la idealización del vórtice (flujo inviscido, eje perfectamente recto, simetría cilíndrica exacta).&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (9) ====&lt;br /&gt;
* La expresión de continuidad para obtener &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; está en el desarrollo matemático del enunciado.  &lt;br /&gt;
* La fórmula para &amp;lt;math&amp;gt;p(R^+)&amp;lt;/math&amp;gt; procede directamente del código MATLAB proporcionado y de la pieza exterior del vórtice de Rankine.  &lt;br /&gt;
* Las operaciones numéricas usan los valores del propio PDF.  &lt;br /&gt;
* La interpretación del factor 2 está documentada en la teoría del vórtice de Rankine (distribución distinta de energía entre interior y exterior).&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
=== (10) Diferencia de presión estándar &amp;lt;math&amp;gt;\Delta P = P_\infty - P_0&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
'''Modelo teórico:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{teórico}} = P_\infty - P_0 = 99.225\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Datos atmosféricos estándar:'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\Delta P_{\text{datos}} = 1013.25 - 920 = 93.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
La diferencia entre ambos valores es de unos 6 mbar (~6.7%).&lt;br /&gt;
&lt;br /&gt;
==== ¿Es aceptable la discrepancia? ====&lt;br /&gt;
Sí, teniendo en cuenta que el modelo:&lt;br /&gt;
&lt;br /&gt;
* no considera variación de densidad con la altura,&lt;br /&gt;
* no incluye fricción ni capa límite,&lt;br /&gt;
* no incorpora termodinámica (humedad, condensación),&lt;br /&gt;
* supone simetría perfecta y flujo inviscido.&lt;br /&gt;
&lt;br /&gt;
Por tanto, un error del orden del 5–10% es completamente razonable para un modelo idealizado como el de Rankine.&lt;br /&gt;
&lt;br /&gt;
==== Referencias del apartado (10) ====&lt;br /&gt;
* Los valores de &amp;lt;math&amp;gt;P_0&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;P_\infty&amp;lt;/math&amp;gt; provienen del cálculo realizado con los parámetros asignados en el enunciado.  &lt;br /&gt;
* La presión atmosférica estándar (&amp;lt;math&amp;gt;1013.25\ \mathrm{mbar}&amp;lt;/math&amp;gt;) es la que aparece indicada en el texto del problema.  &lt;br /&gt;
* La discusión de limitaciones procede de la formulación teórica del vórtice de Rankine mostrada en la captura aportada.&lt;br /&gt;
&lt;br /&gt;
== Gradiente de presión y dirección de las fuerzas impulsoras del flujo ==&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Gradiente de presión en sección vertical de un tornado EF4&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros básicos&lt;br /&gt;
R_core   = 250;        % radio núcleo [m]&lt;br /&gt;
v_max    = 90;         % vel. tangencial máx [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máx [m]&lt;br /&gt;
P_centro = 920e2;      % presión núcleo [Pa]&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]&lt;br /&gt;
rho_air  = 1.225;      % densidad aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Vórtice de Rankine (velocidad tangencial)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r&amp;lt;=R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r&amp;gt; R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado (rho,z)&lt;br /&gt;
rho_vec = linspace(0,1000,200);&lt;br /&gt;
z_vec   = linspace(0,z_top,120);&lt;br /&gt;
[RH,Z]  = meshgrid(rho_vec,z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Presión p(rho,z)&lt;br /&gt;
p = (RH&amp;lt;=R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH&amp;gt; R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Gradiente de presión ∇p por diferencias finitas&lt;br /&gt;
dr = rho_vec(2) - rho_vec(1);&lt;br /&gt;
dz = z_vec(2)   - z_vec(1);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:GradienteEF4.png|500px]]&lt;br /&gt;
|}&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
dp_drho = zeros(size(p)); &lt;br /&gt;
dp_dz   = zeros(size(p));&lt;br /&gt;
&lt;br /&gt;
dp_drho(:,2:end-1) = (p(:,3:end) - p(:,1:end-2))/(2*dr);&lt;br /&gt;
dp_drho(:,1)       = (p(:,2)     - p(:,1))/dr;&lt;br /&gt;
dp_drho(:,end)     = (p(:,end)   - p(:,end-1))/dr;&lt;br /&gt;
&lt;br /&gt;
dp_dz(2:end-1,:) = (p(3:end,:) - p(1:end-2,:))/(2*dz);&lt;br /&gt;
dp_dz(1,:)       = (p(2,:)     - p(1,:))/dz;&lt;br /&gt;
dp_dz(end,:)     = (p(end,:)   - p(end-1,:))/dz;&lt;br /&gt;
&lt;br /&gt;
% Campo de fuerza ~ -∇p&lt;br /&gt;
U = -dp_drho;   % radial&lt;br /&gt;
W = -dp_dz;     % vertical&lt;br /&gt;
&lt;br /&gt;
% Muestreo para quiver&lt;br /&gt;
step_r = 10; step_z = 6;&lt;br /&gt;
RH_q = RH(1:step_z:end,1:step_r:end);&lt;br /&gt;
Z_q  = Z(1:step_z:end,1:step_r:end);&lt;br /&gt;
U_q  = U(1:step_z:end,1:step_r:end);&lt;br /&gt;
W_q  = W(1:step_z:end,1:step_r:end);&lt;br /&gt;
&lt;br /&gt;
% Normalización (solo dirección)&lt;br /&gt;
modF = sqrt(U_q.^2 + W_q.^2); modF(modF==0) = 1;&lt;br /&gt;
U_n = U_q./modF;  W_n = W_q./modF;&lt;br /&gt;
&lt;br /&gt;
% FIGURA&lt;br /&gt;
figure;&lt;br /&gt;
contourf(rho_vec,z_vec,p_mbar,25,'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar; cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Campo -∇p&lt;br /&gt;
quiver(RH_q,Z_q,U_n,W_n,0.7,'k','LineWidth',1.1);&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core],[0 z_top],'w--','LineWidth',1.8);&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Gradiente de presión en seccion vertical del tornado EF4');&lt;br /&gt;
axis([0 1000 0 z_top]);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== 8. Gradiente de presión y dirección de las fuerzas impulsoras del flujo ===&lt;br /&gt;
&lt;br /&gt;
==== El gradiente de presión y su representación ====&lt;br /&gt;
&lt;br /&gt;
En la figura proporcionada (campo quiver ya generado), se observa claramente cómo la presión disminuye hacia el núcleo del vórtice, representada por el mapa de colores donde los tonos cálidos indican mayor presión y los tonos fríos menor presión.&lt;br /&gt;
&lt;br /&gt;
La física del vórtice muestra que el '''gradiente de presión''' es la magnitud que determina la fuerza que impulsa el flujo según la relación:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza por gradiente de presión → –∇p'''&lt;br /&gt;
&lt;br /&gt;
Esto implica que el aire siempre es acelerado desde zonas de mayor presión hacia zonas de menor presión.&lt;br /&gt;
&lt;br /&gt;
En tu representación vertical del vórtice:&lt;br /&gt;
&lt;br /&gt;
Las flechas negras del quiver apuntan hacia la izquierda y hacia arriba cerca del núcleo.&lt;br /&gt;
&lt;br /&gt;
Esto confirma que el '''gradiente de presión horizontal''' domina y dirige el flujo hacia el centro de baja presión.&lt;br /&gt;
&lt;br /&gt;
La disminución vertical de presión es también notable, evidenciada por la transición del campo desde valores cercanos a 1000 mbar en niveles bajos a presiones menores en altura.&lt;br /&gt;
&lt;br /&gt;
En resumen:&lt;br /&gt;
El '''gradiente de presión''' apunta predominantemente hacia el núcleo del vórtice, lo cual coincide con el comportamiento de los flujos intensos en tornados y ciclones mesoescalares.&lt;br /&gt;
&lt;br /&gt;
==== Las direcciones predominantes del campo de fuerzas ====&lt;br /&gt;
&lt;br /&gt;
Las fuerzas que gobiernan el flujo en un vórtice atmosférico son principalmente:&lt;br /&gt;
&lt;br /&gt;
'''Fuerza debida al gradiente de presión'''&lt;br /&gt;
&lt;br /&gt;
'''Fuerza centrífuga''' (importante en el marco en rotación)&lt;br /&gt;
&lt;br /&gt;
'''Fuerza de Coriolis''' (despreciable en tornados por su pequeña escala, relevante solo en ciclones)&lt;br /&gt;
&lt;br /&gt;
A la luz de tu figura:&lt;br /&gt;
&lt;br /&gt;
Las flechas muestran una inclinación ascendente, típica del transporte vertical inducido por la depresión del núcleo.&lt;br /&gt;
&lt;br /&gt;
Horizontalmente, las flechas convergen hacia la zona de baja presión (lado izquierdo del gráfico).&lt;br /&gt;
&lt;br /&gt;
Esto indica que el campo de fuerzas está dominado por la '''fuerza por gradiente de presión''', con una ligera contribución centrífuga que curva el flujo.&lt;br /&gt;
&lt;br /&gt;
Por tanto, las direcciones predominantes del campo de fuerzas son:&lt;br /&gt;
&lt;br /&gt;
'''Horizontales hacia el eje''' del vórtice&lt;br /&gt;
&lt;br /&gt;
'''Verticales ascendentes''', producto del gradiente vertical y del ascenso inducido&lt;br /&gt;
&lt;br /&gt;
==== Las superficies isobáricas y su interpretación física ====&lt;br /&gt;
para graficas&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Código MATLAB !! Gráfica obtenida&lt;br /&gt;
|-&lt;br /&gt;
| &amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
%% Superficies isobáricas en sección vertical (tornado EF4, modelo Rankine)&lt;br /&gt;
clear; clc; close all;&lt;br /&gt;
&lt;br /&gt;
% Parámetros del tornado EF4&lt;br /&gt;
R_core   = 250;        % radio del núcleo [m]&lt;br /&gt;
v_max    = 90;         % velocidad tangencial máxima [m/s]&lt;br /&gt;
z_top    = 2800;       % altura máxima [m]&lt;br /&gt;
&lt;br /&gt;
P_centro = 920e2;      % presión en el núcleo [Pa]  (920 mbar aprox)&lt;br /&gt;
P_amb    = 1013e2;     % presión ambiente [Pa]      (1013 mbar)&lt;br /&gt;
rho_air  = 1.225;      % densidad del aire [kg/m^3]&lt;br /&gt;
g        = 9.81;       % gravedad [m/s^2]&lt;br /&gt;
&lt;br /&gt;
% Campo de velocidad tangencial (vórtice de Rankine)&lt;br /&gt;
Gamma  = 2*pi*R_core*v_max;&lt;br /&gt;
vtheta = @(r) (r &amp;lt;= R_core).* (Gamma/(2*pi*R_core^2).*r) + ...&lt;br /&gt;
              (r &amp;gt;  R_core).* (Gamma./(2*pi*r));&lt;br /&gt;
&lt;br /&gt;
% Mallado en (rho, z)&lt;br /&gt;
rho_vec = linspace(0, 1000, 300);     % radio [m]&lt;br /&gt;
z_vec   = linspace(0, z_top, 200);    % altura [m]&lt;br /&gt;
[RH, Z] = meshgrid(rho_vec, z_vec);&lt;br /&gt;
V       = vtheta(RH);&lt;br /&gt;
&lt;br /&gt;
% Campo de presión p(rho,z) en Pa → mbar&lt;br /&gt;
p = (RH &amp;lt;= R_core).*( P_centro + 0.5*rho_air*V.^2 - rho_air*g.*Z ) + ...&lt;br /&gt;
    (RH &amp;gt;  R_core).*( P_amb    - 0.5*rho_air*V.^2 - rho_air*g.*Z );&lt;br /&gt;
p_mbar = p/100;&lt;br /&gt;
&lt;br /&gt;
% Niveles isobáricos solicitados&lt;br /&gt;
niveles = [950 970 990 1000];&lt;br /&gt;
&lt;br /&gt;
%% FIGURA: fondo de presión + isobaras destacadas&lt;br /&gt;
figure;&lt;br /&gt;
&lt;br /&gt;
% Fondo continuo de presión&lt;br /&gt;
contourf(rho_vec, z_vec, p_mbar, 40, 'LineColor','none');&lt;br /&gt;
colormap turbo;&lt;br /&gt;
cb = colorbar;&lt;br /&gt;
cb.Label.String = 'Presión (mbar)';&lt;br /&gt;
hold on;&lt;br /&gt;
&lt;br /&gt;
% Isobaras p = 950, 970, 990, 1000 mbar (más gruesas)&lt;br /&gt;
[C,h] = contour(rho_vec, z_vec, p_mbar, niveles, 'k', 'LineWidth', 2);&lt;br /&gt;
clabel(C, h, 'FontSize', 9, 'Color', 'k', 'FontWeight', 'bold');&lt;br /&gt;
&lt;br /&gt;
% Frontera del núcleo (rho = R_core)&lt;br /&gt;
plot([R_core R_core], [0 z_top], 'w--', 'LineWidth', 1.8);&lt;br /&gt;
text(R_core+10, 300, 'Frontera del núcleo', ...&lt;br /&gt;
     'Color','w', 'FontSize', 9, 'FontWeight','bold');&lt;br /&gt;
&lt;br /&gt;
set(gca,'YDir','normal');&lt;br /&gt;
xlabel('\rho (m)');&lt;br /&gt;
ylabel('z (m)');&lt;br /&gt;
title('Isobaras p = 950, 970, 990 y 1000 mbar en el tornado EF4');&lt;br /&gt;
grid on;&lt;br /&gt;
axis([0 1000 0 z_top]);   % dominio completo&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
| [[Archivo:IsobarasEF4.png|500px]]&lt;br /&gt;
&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
Las superficies isobáricas son superficies tridimensionales donde la presión se mantiene constante. En tu caso, buscamos las correspondientes a:&lt;br /&gt;
&lt;br /&gt;
'''950 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''970 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''990 mbar'''&lt;br /&gt;
&lt;br /&gt;
'''1000 mbar'''&lt;br /&gt;
&lt;br /&gt;
A partir de la figura:&lt;br /&gt;
&lt;br /&gt;
La paleta de colores sirve como guía para identificar dónde se alcanzan esos niveles de presión.&lt;br /&gt;
&lt;br /&gt;
Cerca del núcleo, las superficies isobáricas se curvan hacia abajo debido a la fuerte depresión central.&lt;br /&gt;
&lt;br /&gt;
En niveles exteriores, estas superficies se vuelven más horizontales, reflejando un flujo más estable lejos del vórtice.&lt;br /&gt;
&lt;br /&gt;
Interpretación física:&lt;br /&gt;
&lt;br /&gt;
Las isóbaras comprimidas cerca del núcleo indican un '''gradiente muy intenso''', asociado a velocidades elevadas.&lt;br /&gt;
&lt;br /&gt;
La forma cóncava hacia abajo del centro indica la existencia de un '''núcleo de baja presión''', responsable del ascenso del aire.&lt;br /&gt;
&lt;br /&gt;
Las isóbaras exteriores suavizadas representan zonas donde el flujo pierde intensidad y el gradiente se debilita.&lt;br /&gt;
&lt;br /&gt;
En definitiva, las superficies isobáricas permiten leer visualmente la estructura energética del vórtice, mostrando cómo se distribuye la baja presión en altura y radialmente.&lt;br /&gt;
&lt;br /&gt;
==== Referencias ====&lt;br /&gt;
&lt;br /&gt;
Wallace, J.M. &amp;amp; Hobbs, P.V. (2006). ''Atmospheric Science: An Introductory Survey''.&lt;br /&gt;
Usado para: '''descripción física del gradiente de presión''', '''dinámica del flujo atmosférico''' y '''comportamiento del viento en sistemas rotatorios'''.&lt;br /&gt;
https://doi.org/10.1016/B978-012732951-2/50007-0&lt;br /&gt;
&lt;br /&gt;
Bluestein, H. (1993). ''Tornado Dynamics – Vol. II of Severe Convective Storms''.&lt;br /&gt;
Usado para: '''estructura interna de tornados''', '''interpretación de isóbaras''' y '''gradientes intensos en vórtices'''.&lt;br /&gt;
https://books.google.com/books?id=tNZ0AwAAQBAJ&lt;br /&gt;
&lt;br /&gt;
Emanuel, K. (1994). ''Atmospheric Convection''.&lt;br /&gt;
Usado para: '''campo de fuerzas en vórtices convectivos''' y '''explicación del transporte vertical''' asociado a núcleos de baja presión.&lt;br /&gt;
https://books.google.com/books?id=1eJ7AAAAMAAJ&lt;br /&gt;
&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=88334</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=88334"/>
				<updated>2025-11-26T17:06:17Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Introducción */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
== Determinación de la circulación y estructura de velocidades ==&lt;br /&gt;
== Visualización del flujo: representación vectorial en un plano horizontal ==&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia y rotacional ==&lt;br /&gt;
== Distribución espacial de la vorticidad ==&lt;br /&gt;
== Campo de presión en el vórtice: teoría y simulación numérica ==&lt;br /&gt;
== Caída de presión, continuidad y limitaciones del modelo ==&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;br /&gt;
== Conclusiones ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=88331</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=88331"/>
				<updated>2025-11-26T17:04:50Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Introducción */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
⸻&lt;br /&gt;
&lt;br /&gt;
El vórtice de Rankine es un modelo bastante utilizado en mecánica de fluidos para entender cómo se comporta un fluido cuando gira alrededor de un eje. Lo interesante de este modelo es que evita el problema del vórtice ideal, donde la velocidad se hace infinita en el centro, algo que obviamente no pasa en la realidad. Para solucionarlo, Rankine divide el vórtice en dos zonas: en el núcleo el fluido gira como si fuera un cuerpo sólido, mientras que en la parte exterior el movimiento es irrotacional y la velocidad va disminuyendo a medida que aumenta la distancia al centro.&lt;br /&gt;
&lt;br /&gt;
Aunque es un modelo sencillo, describe bastante bien el comportamiento de muchos vórtices reales, como tornados, ciclones o remolinos. Por eso suele usarse como referencia básica en teoría de campos y en el estudio de flujos rotacionales, ya que permite trabajar con expresiones matemáticas claras sin dejar de tener cierta aproximación física.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática del vórtice de Rankine ==&lt;br /&gt;
== Determinación de la circulación y estructura de velocidades ==&lt;br /&gt;
== Visualización del flujo: representación vectorial en un plano horizontal ==&lt;br /&gt;
== Comparación entre vórtices reales y modelos matemáticos ==&lt;br /&gt;
== Análisis local del flujo: divergencia y rotacional ==&lt;br /&gt;
== Distribución espacial de la vorticidad ==&lt;br /&gt;
== Campo de presión en el vórtice: teoría y simulación numérica ==&lt;br /&gt;
== Caída de presión, continuidad y limitaciones del modelo ==&lt;br /&gt;
== Fuerzas inducidas por el gradiente de presión e impacto estructural ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;br /&gt;
== Conclusiones ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=87158</id>
		<title>El Vortice de Rankine (Grupo 11)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=El_Vortice_de_Rankine_(Grupo_11)&amp;diff=87158"/>
				<updated>2025-11-25T15:20:04Z</updated>
		
		<summary type="html">&lt;p&gt;David Perez: /* Introducción */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | El Vortice de Rankine. Grupo 11 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | &lt;br /&gt;
*Pelayo Rodriguez Maestre&lt;br /&gt;
*Álvaro Calvente Soler&lt;br /&gt;
*David Pérez Romero&lt;br /&gt;
*François Botet de Lacaze }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
El vórtice de Rankine es un modelo matemático simplificado para describir flujos rotatorios&lt;br /&gt;
como tornados, huracanes, y remolinos de polvo. Desarrollado en el siglo XIX, este modelo divide&lt;br /&gt;
el vórtice en dos regiones: un núcleo central donde el flujo rota como un cuerpo sólido, y una&lt;br /&gt;
región exterior donde el flujo es irrotacional. Aunque los vórtices reales son más complejos, el&lt;br /&gt;
modelo de Rankine captura las características esenciales y es ampliamente usado en meteorología&lt;br /&gt;
e ingeniería.&lt;br /&gt;
&lt;br /&gt;
== Formulación matemática ==&lt;br /&gt;
== Cálculo de la circulación Γ ==&lt;br /&gt;
== Representación del campo de velocidades ==&lt;br /&gt;
== Divergencia y rotacional ==&lt;br /&gt;
== Campo de presión ==&lt;br /&gt;
== Caída de presión ==&lt;br /&gt;
== Gradiente de presión ==&lt;br /&gt;
== Superficies isobáricas ==&lt;br /&gt;
== Fuerza sobre una fachada ==&lt;br /&gt;
== Otros vórtices atmosféricos ==&lt;br /&gt;
== Modelo de Burgers–Rott ==&lt;br /&gt;
== Conclusiones ==&lt;/div&gt;</summary>
		<author><name>David Perez</name></author>	</entry>

	</feed>