<?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=Sergio+Miguez</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=Sergio+Miguez"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Sergio_Miguez"/>
		<updated>2026-05-01T01:04:15Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54280</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54280"/>
				<updated>2022-12-13T07:45:56Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Calcular |∇ × \vec{u} | en todos los puntos del solido en t = 0 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
El código adjunto describe la forma en que hemos calculado el gradiente del campo escalar ''temperatura''. A la derecha vemos representado dicho campo en sus curvas de nivel con el gradiente siendo perfectamente ortogonal a las curvas isotermas. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente aumentada.png|300px|miniaturadeimagen|centro|Representación del gradiente de la temperatura.]]&lt;br /&gt;
Si aumentamos la imagen se puede apreciar que las flechas que representan el gradiente son ortogonales a sus respectivas líneas de campo. Esto ha de cumplirse por definición del gradiente de un campo y muestra la dirección de máximo aumento de temperatura en cada punto.&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Este gráfico muestra la dirección e intensidad de las deformaciones, en el podremos apreciar zonas de convergencia y divergencia.&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;|∇ × \vec{u}|&amp;lt;/math&amp;gt; el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna rotación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises==&lt;br /&gt;
&lt;br /&gt;
La tensión de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' es una magnitud física proporcional a la energía de distorsión, la teoría expone que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión. En la mayoría de los casos, el límite elástico se utiliza como el límite de tensión. En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=\sqrt{\frac {(σ_1-σ_2)^2+(σ_2-σ_3)^2+(σ_3-σ_1)^2}{2}}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Donde &amp;lt;math&amp;gt;σ_1,σ_2,σ_3&amp;lt;/math&amp;gt; son los autovalores de &amp;lt;math&amp;gt;σ=\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y todo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;F = 0&amp;lt;/math&amp;gt; solo es posible de dos maneras, siendo '''v''' un número imaginario que cumpla que &amp;lt;math&amp;gt;-\frac{2}{5}v^{2}-2=0&amp;lt;/math&amp;gt; o un valor que dependa de &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, el cual cumpla que &amp;lt;math&amp;gt;sin(x-vt) = 0&amp;lt;/math&amp;gt;;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;math&amp;gt;sin(x-vt) = 0&amp;lt;/math&amp;gt; la solución de esta ecuación es &amp;lt;math&amp;gt;v=\frac{x}{t}&amp;lt;/math&amp;gt; resultado imposible para &amp;lt;math&amp;gt;t=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;math&amp;gt;-\frac{2}{5}v^{2}-2=0&amp;lt;/math&amp;gt; esta ecuación nos presenta la siguiente solución imaginaria: &amp;lt;math&amp;gt;v=\sqrt{5} i&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto &amp;lt;math&amp;gt;(x,y)=(1/2,1)&amp;lt;/math&amp;gt; se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec i = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que la dirección de propagación es la misma que la amplitud, se producen desplazamientos en el eje &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt; y no en la dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt;, demostrando así lo dicho arriba.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54277</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54277"/>
				<updated>2022-12-13T07:31:52Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Gradiente de la temperatura. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
El código adjunto describe la forma en que hemos calculado el gradiente del campo escalar ''temperatura''. A la derecha vemos representado dicho campo en sus curvas de nivel con el gradiente siendo perfectamente ortogonal a las curvas isotermas. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente aumentada.png|300px|miniaturadeimagen|centro|Representación del gradiente de la temperatura.]]&lt;br /&gt;
Si aumentamos la imagen se puede apreciar que las flechas que representan el gradiente son ortogonales a sus respectivas líneas de campo. Esto ha de cumplirse por definición del gradiente de un campo y muestra la dirección de máximo aumento de temperatura en cada punto.&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Este gráfico muestra la dirección e intensidad de las deformaciones, en el podremos apreciar zonas de convergencia y divergencia.&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;|∇ × \vec{u}|&amp;lt;/math&amp;gt; el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises==&lt;br /&gt;
&lt;br /&gt;
La tensión de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' es una magnitud física proporcional a la energía de distorsión, la teoría expone que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión. En la mayoría de los casos, el límite elástico se utiliza como el límite de tensión. En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=\sqrt{\frac {(σ_1-σ_2)^2+(σ_2-σ_3)^2+(σ_3-σ_1)^2}{2}}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Donde &amp;lt;math&amp;gt;σ_1,σ_2,σ_3&amp;lt;/math&amp;gt; son los autovalores de &amp;lt;math&amp;gt;σ=\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y todo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;F = 0&amp;lt;/math&amp;gt; solo es posible de dos maneras, siendo '''v''' un número imaginario que cumpla que &amp;lt;math&amp;gt;-\frac{2}{5}v^{2}-2=0&amp;lt;/math&amp;gt; o un valor que dependa de &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, el cual cumpla que &amp;lt;math&amp;gt;sin(x-vt) = 0&amp;lt;/math&amp;gt;;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;math&amp;gt;sin(x-vt) = 0&amp;lt;/math&amp;gt; la solución de esta ecuación es &amp;lt;math&amp;gt;v=\frac{x}{t}&amp;lt;/math&amp;gt; resultado imposible para &amp;lt;math&amp;gt;t=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;math&amp;gt;-\frac{2}{5}v^{2}-2=0&amp;lt;/math&amp;gt; esta ecuación nos presenta la siguiente solución imaginaria: &amp;lt;math&amp;gt;v=\sqrt{5} i&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto &amp;lt;math&amp;gt;(x,y)=(1/2,1)&amp;lt;/math&amp;gt; se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec i = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que la dirección de propagación es la misma que la amplitud, se producen desplazamientos en el eje &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt; y no en la dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt;, demostrando así lo dicho arriba.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54252</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54252"/>
				<updated>2022-12-12T18:38:52Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Velocidad de propagación v en términos de Lamé */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
El código adjunto describe la forma en que hemos calculado el gradiente del campo escalar ''temperatura''. A la derecha vemos representado dicho campo en sus curvas de nivel con el gradiente siendo perfectamente ortogonal a las curvas de nivel. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente aumentada.png|300px|miniaturadeimagen|centro|Representación del gradiente de la temperatura.]]&lt;br /&gt;
Si aumentamos la imagen se puede apreciar que las flechas que representan el gradiente son ortogonales a sus respectivas líneas de campo. Esto ha de cumplirse por definición del gradiente de un campo y muestra la dirección de máximo aumento de temperatura en cada punto.&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Este gráfico muestra la dirección e intensidad de las deformaciones, en el podremos apreciar zonas de convergencia y divergencia.&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;|∇ × \vec{u}|&amp;lt;/math&amp;gt; el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises==&lt;br /&gt;
&lt;br /&gt;
La tensión de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' es una magnitud física proporcional a la energía de distorsión, la teoría expone que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión. En la mayoría de los casos, el límite elástico se utiliza como el límite de tensión. En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=\sqrt{\frac {(σ_1-σ_2)^2+(σ_2-σ_3)^2+(σ_3-σ_1)^2}{2}}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Donde &amp;lt;math&amp;gt;σ_1,σ_2,σ_3&amp;lt;/math&amp;gt; son los autovalores de &amp;lt;math&amp;gt;σ=\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y todo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;F = 0&amp;lt;/math&amp;gt; solo es posible de dos maneras, siendo '''v''' un número imaginario que cumpla que &amp;lt;math&amp;gt;-\frac{2}{5}v^{2}-2=0&amp;lt;/math&amp;gt; o un valor que dependa de &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, el cual cumpla que &amp;lt;math&amp;gt;sin(x-vt) = 0&amp;lt;/math&amp;gt;;&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;math&amp;gt;sin(x-vt) = 0&amp;lt;/math&amp;gt; la solución de esta ecuación es &amp;lt;math&amp;gt;v=\frac{x}{t}&amp;lt;/math&amp;gt; resultado imposible para &amp;lt;math&amp;gt;t=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
* &amp;lt;math&amp;gt;-\frac{2}{5}v^{2}-2=0&amp;lt;/math&amp;gt; esta ecuación nos presenta la siguiente solución imaginaria: &amp;lt;math&amp;gt;v=\sqrt{5} i&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto &amp;lt;math&amp;gt;(x,y)=(1/2,1)&amp;lt;/math&amp;gt; se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec i = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que la dirección de propagación es la misma que la amplitud, se producen desplazamientos en el eje &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt; y no en la dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt;, demostrando así lo dicho arriba.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54251</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54251"/>
				<updated>2022-12-12T18:22:50Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Campo de deformaciones para el instante inicial. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
El código adjunto describe la forma en que hemos calculado el gradiente del campo escalar ''temperatura''. A la derecha vemos representado dicho campo en sus curvas de nivel con el gradiente siendo perfectamente ortogonal a las curvas de nivel. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente aumentada.png|300px|miniaturadeimagen|centro|Representación del gradiente de la temperatura.]]&lt;br /&gt;
Si aumentamos la imagen se puede apreciar que las flechas que representan el gradiente son ortogonales a sus respectivas líneas de campo. Esto ha de cumplirse por definición del gradiente de un campo y muestra la dirección de máximo aumento de temperatura en cada punto.&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Este gráfico muestra la dirección e intensidad de las deformaciones, en el podremos apreciar zonas de convergencia y divergencia.&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;|∇ × \vec{u}|&amp;lt;/math&amp;gt; el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises==&lt;br /&gt;
&lt;br /&gt;
La tensión de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' es una magnitud física proporcional a la energía de distorsión, la teoría expone que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión. En la mayoría de los casos, el límite elástico se utiliza como el límite de tensión. En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=\sqrt{\frac {(σ_1-σ_2)^2+(σ_2-σ_3)^2+(σ_3-σ_1)^2}{2}}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Donde &amp;lt;math&amp;gt;σ_1,σ_2,σ_3&amp;lt;/math&amp;gt; son los autovalores de &amp;lt;math&amp;gt;σ=\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y todo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;\vec{F} = 0&amp;lt;/math&amp;gt; tenemos que  &amp;lt;math&amp;gt;v = \sqrt{5}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto &amp;lt;math&amp;gt;(x,y)=(1/2,1)&amp;lt;/math&amp;gt; se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec i = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que la dirección de propagación es la misma que la amplitud, se producen desplazamientos en el eje &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt; y no en la dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt;, demostrando así lo dicho arriba.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54250</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54250"/>
				<updated>2022-12-12T18:21:35Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Gradiente de la temperatura. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
El código adjunto describe la forma en que hemos calculado el gradiente del campo escalar ''temperatura''. A la derecha vemos representado dicho campo en sus curvas de nivel con el gradiente siendo perfectamente ortogonal a las curvas de nivel. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente aumentada.png|300px|miniaturadeimagen|centro|Representación del gradiente de la temperatura.]]&lt;br /&gt;
Si aumentamos la imagen se puede apreciar que las flechas que representan el gradiente son ortogonales a sus respectivas líneas de campo. Esto ha de cumplirse por definición del gradiente de un campo y muestra la dirección de máximo aumento de temperatura en cada punto.&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;|∇ × \vec{u}|&amp;lt;/math&amp;gt; el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises==&lt;br /&gt;
&lt;br /&gt;
La tensión de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' es una magnitud física proporcional a la energía de distorsión, la teoría expone que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión. En la mayoría de los casos, el límite elástico se utiliza como el límite de tensión. En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=\sqrt{\frac {(σ_1-σ_2)^2+(σ_2-σ_3)^2+(σ_3-σ_1)^2}{2}}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Donde &amp;lt;math&amp;gt;σ_1,σ_2,σ_3&amp;lt;/math&amp;gt; son los autovalores de &amp;lt;math&amp;gt;σ=\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y todo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;\vec{F} = 0&amp;lt;/math&amp;gt; tenemos que  &amp;lt;math&amp;gt;v = \sqrt{5}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto &amp;lt;math&amp;gt;(x,y)=(1/2,1)&amp;lt;/math&amp;gt; se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec i = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que la dirección de propagación es la misma que la amplitud, se producen desplazamientos en el eje &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt; y no en la dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt;, demostrando así lo dicho arriba.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54249</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=54249"/>
				<updated>2022-12-12T18:20:44Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Gradiente de la temperatura. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
El código adjunto describe la forma en que hemos calculado el gradiente del campo escalar ''temperatura''. A la derecha vemos representado dicho campo en sus curvas de nivel con el gradiente siendo perfectamente ortogonal a las curvas de nivel. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente aumentada.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
Si aumentamos la imagen se puede apreciar que las flechas que representan el gradiente son ortogonales a sus respectivas líneas de campo. Esto ha de cumplirse por definición del gradiente de un campo y muestra la dirección de máximo aumento de temperatura en cada punto.&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;|∇ × \vec{u}|&amp;lt;/math&amp;gt; el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises==&lt;br /&gt;
&lt;br /&gt;
La tensión de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' es una magnitud física proporcional a la energía de distorsión, la teoría expone que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión. En la mayoría de los casos, el límite elástico se utiliza como el límite de tensión. En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;σ=\sqrt{\frac {(σ_1-σ_2)^2+(σ_2-σ_3)^2+(σ_3-σ_1)^2}{2}}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Donde &amp;lt;math&amp;gt;σ_1,σ_2,σ_3&amp;lt;/math&amp;gt; son los autovalores de &amp;lt;math&amp;gt;σ=\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; y todo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;\vec{F} = 0&amp;lt;/math&amp;gt; tenemos que  &amp;lt;math&amp;gt;v = \sqrt{5}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto &amp;lt;math&amp;gt;(x,y)=(1/2,1)&amp;lt;/math&amp;gt; se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt; se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec i = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que la dirección de propagación es la misma que la amplitud, se producen desplazamientos en el eje &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt; y no en la dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt;, demostrando así lo dicho arriba.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Gradiente_aumentada.png&amp;diff=54248</id>
		<title>Archivo:Gradiente aumentada.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Gradiente_aumentada.png&amp;diff=54248"/>
				<updated>2022-12-12T18:19:23Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53572</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53572"/>
				<updated>2022-12-09T16:31:50Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea |∇ × \vec{u}| el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ~u conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises==&lt;br /&gt;
&lt;br /&gt;
El criterio de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' dice que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión.  En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;σ=\sqrt{frac {(σ_1-σ_2)^2+(σ_2-σ_3)^2+(σ_3-σ_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo x y todo t &amp;lt;math&amp;gt;\vec{F} = 0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v = \sqrt{5}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es una onda longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto (x,y)=(1/2,1) se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que su dirección de propagación es el mismo que la amplitud, se producen desplazamientos horizontales y no verticales.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53569</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53569"/>
				<updated>2022-12-09T16:29:59Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea |∇ × \vec{u}| el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ~u conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises=&lt;br /&gt;
&lt;br /&gt;
El criterio de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' dice que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión.  En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;σ=\sqrt{σ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
(σ_1+σ_2)^2&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo x y todo t &amp;lt;math&amp;gt;\vec{F} = 0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v = \sqrt{5}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La onda es una onda longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto (x,y)=(1/2,1) se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que su dirección de propagación es el mismo que la amplitud, se producen desplazamientos horizontales y no verticales.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53563</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53563"/>
				<updated>2022-12-09T16:27:12Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Velocidad de propagación v en términos de Lamé */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea |∇ × \vec{u}| el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ~u conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
::* &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tensión de Von Mises=&lt;br /&gt;
&lt;br /&gt;
El criterio de '''[https://es.wikipedia.org/wiki/Tensi%C3%B3n_de_Von_Mises Von Mises]''' dice que un material dúctil comienza a ceder en una ubicación cuando la tensión de Von Mises es igual al límite de tensión.  En este caso podemos observar que el punto máximo de tensión  es 0,9791.&amp;lt;br /&amp;gt;&lt;br /&gt;
La tensión de Von Mises puede calcularse fácilmente a partir de las tensiones principales del tensor tensión en un punto de un sólido deformable, mediante la expresión:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;σ=sqrt{x}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                     % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                      % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                     % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
siendo '''v''' la velocidad de propagación de las deformaciones y como hemos calculado en el apartado 8, &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x-vt)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x-vt)\vec{k}) = -\frac{6}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)-\frac{2}{5}sin(x-vt)=-2 sin(x-vt)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Así nos quedaría que:&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d}{dt}(-\frac{2}{5}v cos(x-vt)) -2 sin(x-vt) = -\frac{2}{5}v^2 sin(x-vt) -2 sin(x-vt) = 0&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para que se cumpla que para todo x y todo t &amp;lt;math&amp;gt;\vec{F} = 0&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;v = \sqrt{5}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
La onda es una onda longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto (x,y)=(1/2,1) se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que su dirección de propagación es el mismo que la amplitud, se producen desplazamientos horizontales y no verticales.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53476</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=53476"/>
				<updated>2022-12-09T15:42:14Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Velocidad de propagación v en términos de Lamé */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|370px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación de la temperatura y sus correspondientes curvas de nivel.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
En la gráfica anterior, podemos apreciar como en la parte inferior de la placa el más caliente, y cuanto más nos acercamos a la líneas de temperatura circulares la cual vemos en el centro de la parte superior, más se enfría esta. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|500px|miniaturadeimagen|derecha|Representación del gradiente de la temperatura.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|480px|miniaturadeimagen|derecha|Representación de la divergencia del campo vectorial sobre la capa.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
%Discretizamos valores de x e y&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
%representamos de tal forma que solo se vean las líneas&lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea |∇ × \vec{u}| el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Dirección de los vectores de deformacion.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
&lt;br /&gt;
Definiendo &amp;lt;math&amp;gt;ε(\vec u)=\frac {\nabla \vec u + \nabla \vec u ^t}{2}&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ~u conocido como tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos&lt;br /&gt;
permiten escribir el tensor de tensiones a través de la fórmula &amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;ε(\vec u)=\nabla \vec u=&lt;br /&gt;
\begin{pmatrix}&lt;br /&gt;
\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;σ=λ\nabla·\vec u 1+2με = λ\frac{2cosx}{5}·\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} + 2μ\begin{pmatrix}\frac{2cosx}{5} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} = 2λ\frac{cosx}{5}·I+2μ·\frac{2cosx}{5}\begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix} = &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;= \frac{2cosx}{5} (\begin{pmatrix} λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix} + \begin{pmatrix} 2μ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}) = \frac{2cosx}{5}\begin{pmatrix} 2μ+λ &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; λ &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; λ \end{pmatrix}→{λ=μ=1}→\frac{2cosx}{5}\begin{pmatrix} 3 &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; 1 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Tomando &amp;lt;math&amp;gt;λ = µ = 1&amp;lt;/math&amp;gt;, calculamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec i · σ ·\vec i&amp;lt;/math&amp;gt;, las tensiones normales en la dirección que marca el eje&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec j · σ · \vec j &amp;lt;/math&amp;gt; y las correspondientes al eje &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec k · σ ·\vec k&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
Proseguimos con el cálculo de las tensiones normales:&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
- &amp;lt;math&amp;gt;\vec i · σ ·\vec i = \begin{pmatrix} 1 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 1 \\0 \\ 0 \end{pmatrix} = \frac{6cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
- &amp;lt;math&amp;gt;\vec j · σ ·\vec j = \begin{pmatrix} 0 &amp;amp; 1 &amp;amp; 0 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\1 \\ 0 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
- &amp;lt;math&amp;gt;\vec k · σ ·\vec k = \begin{pmatrix} 0 &amp;amp; 0 &amp;amp; 1 \end{pmatrix}·\begin{pmatrix} \frac{6cosx}{5} &amp;amp; 0 &amp;amp; 0\\ 0 &amp;amp; \frac{2cosx}{5} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2cosx}{5} \end{pmatrix}·\begin{pmatrix} 0 \\0 \\ 1 \end{pmatrix} = \frac{2cosx}{5}&amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[ Archivo:codigo8.jpg|600px|miniaturadeimagen|derecha|Tensor de deformaciones.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 %____Tensor de deformaciones____&lt;br /&gt;
x=linspace(0,10,50);      &lt;br /&gt;
y=linspace(0,2,10);     &lt;br /&gt;
[Mx,My]= meshgrid(x,y); &lt;br /&gt;
Ti=(6/5).*cos(Mx);       % Tension normal en i&lt;br /&gt;
Tj=(2/5).*cos(Mx);       % Tension normal en j&lt;br /&gt;
Tk=(2/5).*cos(Mx);       % Tension normal en k&lt;br /&gt;
figure&lt;br /&gt;
subplot(1,3,1)           &lt;br /&gt;
pcolor(Mx,My,Ti)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en i')  &lt;br /&gt;
subplot(1,3,2) &lt;br /&gt;
pcolor(Mx,My,Tj)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en j')&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
pcolor(Mx,My,Tk)&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y') &lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title('Tensiones normales en k')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tension de Von Mises==&lt;br /&gt;
[[ Archivo:Imagen_Von_Mises.jpg|380px|miniaturadeimagen|derecha|Tensión de Von Mises en 3D.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                      % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                       % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                      % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
plot(X,Z,'*r')                                  % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES EN 2D')             % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Z')                                 % Título del eje y&lt;br /&gt;
&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Además ahora para nosotros &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma = \begin{pmatrix} \frac{6}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; \frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt; &lt;br /&gt;
&lt;br /&gt;
De esta forma la divergencia &amp;lt;math&amp;gt;\nabla \cdot \sigma&amp;lt;/math&amp;gt; nos quedaría de la siguiente forma:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt; \nabla \cdot \sigma = \nabla \cdot (\frac{6}{5}cos(x)\vec{i}) + \nabla \cdot (\frac{2}{5}cos(x)\vec{j}) + \nabla \cdot (\frac{2}{5}cos(x)\vec{k}) = -\frac{6}{5}sin(x)-\frac{2}{5}sin(x)-\frac{2}{5}sin(x)=-2 sin(x)&amp;lt;/math&amp;gt; &amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
La onda es una onda longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto (x,y)=(1/2,1) se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, al ser una onda longitudinal en la que su dirección de propagación es el mismo que la amplitud, se producen desplazamientos horizontales y no verticales.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=52998</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=52998"/>
				<updated>2022-12-09T10:57:13Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|520px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
En las gráficas representadas en este apartado apreciamos como la arte inferior es la más caliente y cuanto más nos acercamos a la líneas de temperatura circulares que vemos en el centro de la parte superior, más se enfría la placa. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Diverg.jpg|280px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.2;&lt;br /&gt;
%Discretizamos valores de x e y&lt;br /&gt;
x=0:h:10;           &lt;br /&gt;
y=0:h:2;&lt;br /&gt;
%Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
%la z es cero por ser una placa sin espesor&lt;br /&gt;
z=zeros(size(Mx)); &lt;br /&gt;
%representamos de tal forma que solo se vean las líneas&lt;br /&gt;
mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
g=(2/5)*cos(Mx);        &lt;br /&gt;
&lt;br /&gt;
pcolor(Mx,My,g)&lt;br /&gt;
%para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
shading flat             &lt;br /&gt;
contour(Mx,My,t,30,'r') &lt;br /&gt;
colorbar&lt;br /&gt;
hold on&lt;br /&gt;
%dibujamos                 &lt;br /&gt;
quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
Sea |∇ × \vec{u}| el rotacional de un campo de desplazamientos &amp;lt;math&amp;gt; \vec u = (ux, uy, uz)&amp;lt;/math&amp;gt; expresado en un sistema de coordenadas de vectores unitarios ortogonales &amp;lt;math&amp;gt;\vec{a}, \vec{b}, \vec{c}&amp;lt;/math&amp;gt;, aplicado a una superficie bidimensional expresado en dicho sistema de coordenadas, se cumple que:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{u} &amp;amp; \vec{v} &amp;amp;\vec{w} \\ d/da &amp;amp; d/db &amp;amp; d/dc\\ ux &amp;amp; uy &amp;amp; uz \end{vmatrix}&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por ello, para calcular el rotacional de un campo de desplazamientos, se aplica la fórmula del producto vectorial en los ejes del sistema de coordenadas.&lt;br /&gt;
&lt;br /&gt;
Para el caso del sistema de coordenadas cartesiano, con ejes &amp;lt;math&amp;gt;[ x, y, z ]&amp;lt;/math&amp;gt;, y vectores respectivos &amp;lt;math&amp;gt;\vec{i}, \vec{j}, \vec{k}&amp;lt;/math&amp;gt;, se procede a calcular el rotacional. &lt;br /&gt;
&lt;br /&gt;
Usando el campo &amp;lt;math&amp;gt;\vec{u} = (\vec{ux}, \vec{uy}, \vec{uz}) = (2/5sin(x), 0, 0)&amp;lt;/math&amp;gt; previo, procedemos a hacer los cálculos:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \bigtriangledown \times \vec{u} = \begin{vmatrix}\vec{i} &amp;amp; \vec{j} &amp;amp;\vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz\\ ux &amp;amp; uy  &amp;amp; uz\end{vmatrix}= \begin{vmatrix}\vec{i} &amp;amp; \vec{j}  &amp;amp; \vec{k} \\ d/dx &amp;amp; d/dy &amp;amp; d/dz \\ 2/5sin(x) &amp;amp;  0 &amp;amp; 0\end{vmatrix}=(0-0)\vec{i}+(0-0)\vec{j}+(0-0)\vec{k}=0 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Por lo tanto, se trata de un campo conservativo es decir, el rotacional en todos los puntos de la placa es nulo, lo que implica:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \left | \bigtriangledown \times \vec{u} \right | = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|centro|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
Además este resultado tiene un significado gráfico. Al representar los vectores de deformación apreciamos que no aparece ninguna deformación, en su lugar solo aparecen zonas de divergencia y convergencia (divergencia negativa).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
[[ Archivo:Tensor de deformaciones.png|320px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%____Tensor de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);  %mallado&lt;br /&gt;
[Mx,My]= meshgrid(r,t);&lt;br /&gt;
&lt;br /&gt;
Ten=6/5*cos(x);&lt;br /&gt;
surf(Mx,My,Ten)&lt;br /&gt;
view(2);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title ('Tensor de deformaciones');&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&lt;br /&gt;
&lt;br /&gt;
Sea &amp;lt;math&amp;gt;\vec{T}&amp;lt;/math&amp;gt; la tensión tangencial respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec{i}&amp;lt;/math&amp;gt;, que viene dado por la siguiente expresión:&amp;lt;math&amp;gt;\ \left| \sigma ·\vec i -(\vec i·\sigma·\vec i)\vec i \right| &amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Particularizando para nuestros datos obtenemos:  &amp;lt;math&amp;gt;\frac{6}{5}\cos (x)\vec{i}-\frac{6}{5}\cos (x)\vec{i}=\vec{0}&amp;lt;/math&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
Por lo tanto la tensión tangencial respecto al plano que contiene a los vectores &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec{k}&amp;lt;/math&amp;gt; es nula.&lt;br /&gt;
&lt;br /&gt;
==Tension de Von Mises==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                      % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                       % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                      % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Además ahora para nosotros &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\lambda\bigtriangledown \cdot \vec{u}I+2\mu\epsilon&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\lambda\cdot \frac{2}{5}cos(x-vt)\cdot I+2\mu\frac{2}{5}cos(x-vt)&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;(\lambda+2\mu)\frac{2}{5}cos(x-vt)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si calculamos el otro término, la divergencia de &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; quedaría:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\bigtriangledown \cdot \sigma = \begin{pmatrix} (\lambda+2\mu)\frac{2}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;(\lambda+2\mu)\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; (\lambda+2\mu)\frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\begin{pmatrix}-(\lambda+2\mu)\frac{2}{5}sen(x-vt)\\ 0\\ 0\end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===Velocidad en ondas transversales y longitudinales===&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
La onda es una onda longitudinal, es decir, que se desplaza en el mismo sentido que la amplitud, por tanto no habrá desplazamiento en otro eje distinto al eje en el que se transmite dicha onda, de aquí la demostración:&lt;br /&gt;
&lt;br /&gt;
Adoptando el campo de desplazamientos: &amp;lt;math&amp;gt;\vec u (x,y,t)=\frac{2}{5}\vec i sen(x-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Fijando el punto (x,y)=(1/2,1) se tiene: &amp;lt;math&amp;gt;\vec u (1/2,1,t)=\frac{2}{5}\vec i sen(1/2-vt)&amp;lt;/math&amp;gt; donde el parámetro &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, tiempo, pertence al intervalo &amp;lt;math&amp;gt;[0,10]&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec j = 0&amp;lt;/math&amp;gt; como se esperaba por tratarse de una onda longitudinal.&lt;br /&gt;
&lt;br /&gt;
En la dirección de &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;se obtiene que: &amp;lt;math&amp;gt;\vec u \cdot \vec j = \frac{2}{5}sen(1/2-vt)\vec i \cdot \vec i = \frac{2}{5}sen(1/2-vt)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Es decir, como conclusión se obtiene lo esperado, al ser una onda longitudinal en la que su dirección de propagación es el mismo que la amplitud, se producen desplazamientos horizontales y no verticales.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=52935</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=52935"/>
				<updated>2022-12-09T10:29:55Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | &lt;br /&gt;
*David Astorga Trejos&lt;br /&gt;
*Abdelali Zariohi Boutaleb&lt;br /&gt;
*Sergio Míguez González&lt;br /&gt;
*Nacira Faraji Bahja&lt;br /&gt;
*Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (''en 2D'') que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|520px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
En las gráficas representadas en este apartado apreciamos como la arte inferior es la más caliente y cuanto más nos acercamos a la líneas de temperatura circulares que vemos en el centro de la parte superior, más se enfría la placa. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después del desplazamiento==&lt;br /&gt;
[[Archivo:placa antes y despues del desplazamiento.jpeg|550px|miniaturadeimagen|derecha|Placa antes y después del desplazamiento]]&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Posición de la placa deformada:&lt;br /&gt;
  rx=Mx+(2/5).*sin(Mx);&lt;br /&gt;
  ry=0.*My; &lt;br /&gt;
  %Representación de la placa antes del desplazamiento: &lt;br /&gt;
  subplot(1,2,1)&lt;br /&gt;
  surf(Mx,My,0*Mx)&lt;br /&gt;
  title('Posición original')&lt;br /&gt;
  axis equal&lt;br /&gt;
  axis([-3,3,-1,5])&lt;br /&gt;
 view(2) &lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y') &lt;br /&gt;
 zlabel('Eje Z')&lt;br /&gt;
 %Representación de la placa después del desplazamiento:&lt;br /&gt;
 subplot(1,2,2)&lt;br /&gt;
 surf(rx,ry,0*rx)&lt;br /&gt;
 title('Después del desplazamiento')&lt;br /&gt;
 axis equal&lt;br /&gt;
 axis([-3,3,-1,5])&lt;br /&gt;
 xlabel('Eje X')&lt;br /&gt;
 ylabel('Eje Y')  &lt;br /&gt;
 zlabel('Eje Z') &lt;br /&gt;
 view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
Para el cálculo de la divergencia en coordenadas cartesianas, se procede a derivar el campo de desplazamientos hallado anteriormente:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \vec u (x, y, z)= \frac{2}{5} \sin (x) \vec i &amp;lt;/math&amp;gt;&amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
y por tanto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\ \nabla \cdot \vec u =\frac{\partial \vec u_1}{\partial x} + \frac{\partial \vec u_2}{\partial y} + \frac{\partial \vec u_3}{\partial z} = \frac{\partial (\frac{2}{5}\sin (x))}{\partial x} + \frac{\partial 0}{\partial y} + \frac{\partial 0}{\partial z} = \frac{2}{5} \cos(x) &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|520px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear&lt;br /&gt;
clc&lt;br /&gt;
h=0.2;&lt;br /&gt;
 %Discretizamos valores de x e y&lt;br /&gt;
 x=-0.5:h:10.5;           &lt;br /&gt;
 y=-0.5:h:2.5;&lt;br /&gt;
 %Creamos el mallado&lt;br /&gt;
[Mx,My]=meshgrid(x,y);  &lt;br /&gt;
 %la z es cero por ser una placa sin espesor&lt;br /&gt;
 z=zeros(size(Mx)); &lt;br /&gt;
 %representamos de tal forma que solo se vean las líneas&lt;br /&gt;
 mesh(Mx,My,z)         &lt;br /&gt;
%Pintamos las curvas de nivel correspondientes a la temperatura&lt;br /&gt;
 g=(2/5)*cos(Mx);        &lt;br /&gt;
&lt;br /&gt;
 pcolor(Mx,My,g)&lt;br /&gt;
  %para quitar las líneas de cuadrícula y que no se superpongan con las de nivel&lt;br /&gt;
 shading flat             &lt;br /&gt;
 contour(Mx,My,t,30,'r') &lt;br /&gt;
 colorbar&lt;br /&gt;
 hold on&lt;br /&gt;
  %dibujamos                 &lt;br /&gt;
 quiver3(Mx,My,z,u,v,w)             &lt;br /&gt;
 axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
 axis equal                        &lt;br /&gt;
 view(2)&lt;br /&gt;
 hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Calcular |∇ × &amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; | en todos los puntos del solido en t = 0==&lt;br /&gt;
&lt;br /&gt;
==Tensor de deformaciones==&lt;br /&gt;
[[ Archivo:Tensor de deformaciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%____Tensor de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);  %mallado&lt;br /&gt;
[Mx,My]= meshgrid(r,t);&lt;br /&gt;
&lt;br /&gt;
Ten=6/5*cos(x);&lt;br /&gt;
surf(Mx,My,Ten)&lt;br /&gt;
view(2);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5]);&lt;br /&gt;
title ('Tensor de deformaciones');&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
shading flat&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales==&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;
==Tension de Von Mises==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
x=linspace(0,10,50);                      % Vector x con valores entre 0 y 10    &lt;br /&gt;
y=linspace(0,2,50);                       % Vector x con valores entre 0 y 2      &lt;br /&gt;
[X,Y]=meshgrid(x,y);                      % Obtención del mallado      &lt;br /&gt;
% Definimos nuestra función                                               &lt;br /&gt;
fx=inline('(6/5)*cos(x)','x','y');        &lt;br /&gt;
fy=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
fz=inline('(2/5)*cos(x)','x','y');&lt;br /&gt;
% Inicio del bucle&lt;br /&gt;
for i= 1:length(x)                              &lt;br /&gt;
   for j= 1:length(y)                             &lt;br /&gt;
% Asignación de valores para cada componente del mallado                                                                    &lt;br /&gt;
xx=fx(X(i,j),Y(i,j));                    % Respecto a fx&lt;br /&gt;
yy=fy(X(i,j),Y(i,j));                    % Respecto a fy&lt;br /&gt;
zz=fz(X(i,j),Y(i,j));                    % Respecto a fz&lt;br /&gt;
% Creación de un vector con las componentes [xx, yy, zz]&lt;br /&gt;
v=[xx yy zz];                            &lt;br /&gt;
M=diag(v);                               % Diagonalización del vector       &lt;br /&gt;
autov=eig(M);                            % Obtención de los autovalores      &lt;br /&gt;
&lt;br /&gt;
% Cálculo de la tensión de Von Mises para cada componente                                                &lt;br /&gt;
VonM=sqrt(((autov(1)-autov(2))^2+((autov(2)-autov(3))^2+((autov(3)-autov(1))^2))*1/2));  &lt;br /&gt;
Z(i,j)=VonM;&lt;br /&gt;
   end&lt;br /&gt;
end&lt;br /&gt;
% Fin del bucle                                             &lt;br /&gt;
&lt;br /&gt;
mesh(X,Y,Z)                                     % Representación superficial con líneas entrecruzadas&lt;br /&gt;
title('TENSIÓN DE VON MISES')                   % Título del gráfico&lt;br /&gt;
xlabel('Eje X')                                 % Título del eje x&lt;br /&gt;
ylabel('Eje Y')                                 % Título del eje y&lt;br /&gt;
zlabel('Eje Z')                                 % Título del eje z&lt;br /&gt;
maximo=max(max(Z))                           % Obtención del valor máximo&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Velocidad de propagación '''''v''''' en términos de '''Lamé'''==&lt;br /&gt;
Queremos calcular la velocidad de propagación de las ondas '''''v''''' en términos de las constantes de [https://es.wikipedia.org/wiki/Constante_el%C3%A1stica '''Lamé''' ], por lo cual tendremos que suponer &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt;=0.&lt;br /&gt;
&lt;br /&gt;
El desplazamiento en la placa viene dado por las fuerzas &amp;lt;math&amp;gt;\vec{F}&amp;lt;/math&amp;gt; que actúan sobre dicha placa, las cuales se pueden aproximar con la siguiente función de elasticidad:  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{F} = \frac{d^2\vec{u}}{dt^2} - \bigtriangledown \cdot \sigma&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
definimos en nuestro caso que: &lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\frac{2}{5}\sin(x-vt)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Además ahora para nosotros &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; será :&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\lambda\bigtriangledown \cdot \vec{u}I+2\mu\epsilon&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\lambda\cdot \frac{2}{5}cos(x-vt)\cdot I+2\mu\frac{2}{5}cos(x-vt)&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;(\lambda+2\mu)\frac{2}{5}cos(x-vt)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Si calculamos el otro término, la divergencia de &amp;lt;math&amp;gt;\sigma&amp;lt;/math&amp;gt; quedaría:&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\bigtriangledown \cdot \sigma = \begin{pmatrix} (\lambda+2\mu)\frac{2}{5}cos(x-vt) &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp;(\lambda+2\mu)\frac{2}{5}cos(x-vt) &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; (\lambda+2\mu)\frac{2}{5}cos(x-vt)\end{pmatrix}&amp;lt;/math&amp;gt; = &amp;lt;math&amp;gt;\begin{pmatrix}-(\lambda+2\mu)\frac{2}{5}sen(x-vt)\\ 0\\ 0\end{pmatrix}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===Velocidad en ondas transversales y longitudinales===&lt;br /&gt;
&lt;br /&gt;
==Módulo de desplazamiento en dirección &amp;lt;math&amp;gt;\vec{j}&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=51539</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=51539"/>
				<updated>2022-12-08T00:24:07Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja, Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Enunciado.==&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|520px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
En las gráficas representadas en este apartado apreciamos como la arte inferior es la más caliente y cuanto más nos acercamos a la líneas de temperatura circulares que vemos en el centro de la parte superior, más se enfría la placa. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antes y después de las deformaciones==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Divergencia del campo vectorial sobre la capa.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de deformanciones.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&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;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Campo_de_deformanciones.png&amp;diff=51538</id>
		<title>Archivo:Campo de deformanciones.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Campo_de_deformanciones.png&amp;diff=51538"/>
				<updated>2022-12-08T00:22:09Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Campo_deformanciones.png&amp;diff=51536</id>
		<title>Archivo:Campo deformanciones.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Campo_deformanciones.png&amp;diff=51536"/>
				<updated>2022-12-08T00:16:09Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=51077</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=51077"/>
				<updated>2022-12-07T15:24:32Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja, Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Enunciado.==&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|520px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
En las gráficas representadas en este apartado apreciamos como la arte inferior es la más caliente y cuanto más nos acercamos a la líneas de temperatura circulares que vemos en el centro de la parte superior, más se enfría la placa. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Placa antees y después de las deformaciones==&lt;br /&gt;
&lt;br /&gt;
Al analizar el campo de deformaciones del apartado anterior, podemos suponer que se formaran ondas a lo largo de la placa. Es por eso que para ver bien la variación tendremos que comprobar en una representación tridimensional.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=51051</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=51051"/>
				<updated>2022-12-07T14:58:15Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja, Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Enunciado.==&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Mallado de la placa.==&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|520px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Temperatura de la placa.==&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
En las gráficas representadas en este apartado apreciamos como la arte inferior es la más caliente y cuanto más nos acercamos a la líneas de temperatura circulares que vemos en el centro de la parte superior, más se enfría la placa. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==Gradiente de la temperatura.==&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Gradiente Temp.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%---Divergencia del campo de temperaturas---&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      %hasta aquí es lo mismo que el resto de apartados.&lt;br /&gt;
&lt;br /&gt;
u=2.*(x-6) ;      %componente i&lt;br /&gt;
v=20.*(y-3/2);   %componente j&lt;br /&gt;
&lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
 contour(x,y,T,30)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
w=quiver(x,y,u,v);&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Campo de deformaciones para el instante inicial.==&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%----Campo de deformaciones____&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
%mallado&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);&lt;br /&gt;
hold on&lt;br /&gt;
surf(x,y,Z)&lt;br /&gt;
u=(2/5).*sin(x) ;      %componente i&lt;br /&gt;
v=0.*y;   %componente j&lt;br /&gt;
w=quiver(x,y,u,v,'r');&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Gradiente_Temp.png&amp;diff=51028</id>
		<title>Archivo:Gradiente Temp.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Gradiente_Temp.png&amp;diff=51028"/>
				<updated>2022-12-07T14:26:04Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: Gradiente del campo escalar que representa la temperatura de nuestro trabajo.&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Gradiente del campo escalar que representa la temperatura de nuestro trabajo.&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=50975</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=50975"/>
				<updated>2022-12-07T11:22:25Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja, Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-\frac{3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=Mallado de la placa=&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|520px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
%nombramos los ejes&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Temperatura de la placa=&lt;br /&gt;
&lt;br /&gt;
En este apartado realizaremos un diagrama de temperaturas de la placa que represente por colores la variación de la temperatura y otro para dibujar las líneas de dicho campo escalar.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Temperatura placa.png|550px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
[x,y]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
T=((x-6).^2)+(10.*(y-3/2)).^2;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
%División de la ventana en dos&lt;br /&gt;
subplot(1,2,1)              &lt;br /&gt;
 %Representamos el campo escalar de temperaturas&lt;br /&gt;
surf(x,y,T)                  &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Trabajamos en la segunda ventana&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
En las gráficas representadas en este apartado apreciamos como la arte inferior es la más caliente y cuanto más nos acercamos a la líneas de temperatura circulares que vemos en el centro de la parte superior, más se enfría la placa. Esto podría coincidir con una placa de metal calentado al cual le está cayendo un chorro de agua (o viento frío) en el centro de dicho círculo.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Temperatura_placa.png&amp;diff=50243</id>
		<title>Archivo:Temperatura placa.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Temperatura_placa.png&amp;diff=50243"/>
				<updated>2022-12-05T17:33:47Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: Representación de la temperatura a lo largo de la placa.&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Representación de la temperatura a lo largo de la placa.&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=50203</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=50203"/>
				<updated>2022-12-05T16:35:56Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Mallado de la placa */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja, Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(\frac{y-3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=Mallado de la placa=&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mallado placa.png|300px|miniaturadeimagen|derecha|Representación del mallado.]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Mallado_placa.png&amp;diff=50200</id>
		<title>Archivo:Mallado placa.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Mallado_placa.png&amp;diff=50200"/>
				<updated>2022-12-05T16:33:12Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: Mallado de la placa requerida en el trabajo del grupo 2B&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Mallado de la placa requerida en el trabajo del grupo 2B&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=48921</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=48921"/>
				<updated>2022-11-30T20:39:06Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja, Luis David Sánchez Pérez }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(\frac{y-3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=Mallado de la placa=&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=48687</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=48687"/>
				<updated>2022-11-28T22:43:17Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja }}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(\frac{y-3}{2})^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(\vec{d}*\vec{r}-vt))\vec{i},&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
Para nuestro trabajo, tendremos los siguientes valores: &amp;lt;math&amp;gt; \vec{a}=\frac{2}{5}\vec{i}&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\vec{d}=\vec{i}&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;k=1 &amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
Operando con estos valores obtenemos el siguiente vector &amp;lt;math&amp;gt;\vec{u}(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x,y,t)=\frac{2}{5} sin(x)\vec{i}&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=Mallado de la placa=&lt;br /&gt;
&lt;br /&gt;
Primero debemos representar el sólido definido en el enunciado acorde a los parámetros especificados en el enunciado. Las directrices requeridas son las siguientes: &amp;quot;Tomar los ejes (comando axis) en el rectángulo &amp;lt;math&amp;gt;(x, y) ∈ [−0.5; 10.5] × [−0.5; 2.5]&amp;lt;/math&amp;gt; y como paso de muestreo &amp;lt;math&amp;gt;h = \frac{2}{10}&amp;lt;/math&amp;gt; para las variables x e y.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%parametrización con muestreo h=2/10.&lt;br /&gt;
r=linspace(0,10,50);&lt;br /&gt;
t=linspace(0,2,10);&lt;br /&gt;
&lt;br /&gt;
%mallado&lt;br /&gt;
[R,T]= meshgrid(r,t);      &lt;br /&gt;
          &lt;br /&gt;
Z=zeros(10,50);         &lt;br /&gt;
surf(R,T,Z)&lt;br /&gt;
%ejes&lt;br /&gt;
axis([-0.5,10.5,-0.5,2.5])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=48675</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (Grupo B2)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_B2)&amp;diff=48675"/>
				<updated>2022-11-28T21:52:07Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC22/23|2022-23]] | David Astorga Trejos, Abdelali Zariohi Boutaleb, Sergio Míguez González, Nacira Faraji Bahja }}&lt;br /&gt;
Consideramos una placa rectangular plana (en dimensión 2) que ocupa la región &amp;lt;math&amp;gt;(x, y) ∈ [0, 10] × [0, 2]&amp;lt;/math&amp;gt;. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(x, y)&amp;lt;/math&amp;gt;, que viene dada por,&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;T(x, y)=(x-6)^2+(10(y-3/2)^2&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
y los desplazamientos &amp;lt;math&amp;gt;\vec{u}(x, y)&amp;lt;/math&amp;gt; producidos por la acción de una fuerza determinada. De esta forma, si definimos &amp;lt;math&amp;gt;\vec{r_{0}}(x, y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa antes de la deformación, la posición de cada punto &amp;lt;math&amp;gt;(x, y)&amp;lt;/math&amp;gt; de la placa después de la deformación viene dada por&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{r}(x, y)=\vec{r_{0}}(x, y)+\vec{u}(x, y)&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos de la misma dado por el vector de desplazamientos&lt;br /&gt;
&amp;lt;center&amp;gt;&amp;lt;math&amp;gt;\vec{u}(x, y,t)=\vec{a} sin(k(\vec{d}*\vec{r}-vt)),&amp;lt;/math&amp;gt;&amp;lt;/center&amp;gt;&lt;br /&gt;
donde &amp;lt;math&amp;gt;\vec{a}&amp;lt;/math&amp;gt; se conoce como amplitud, &amp;lt;math&amp;gt;k&amp;gt;0&amp;lt;/math&amp;gt;,es el número de onda, &amp;lt;math&amp;gt;\vec{d}&amp;lt;/math&amp;gt; es un vector unitario que marca la dirección de propagación y v es la velocidad de propagación.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC22/23]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48330</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48330"/>
				<updated>2021-12-14T08:47:30Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensión de Von Mises */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(\vec r\)&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;(x,y) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(\vec r\)(x, y) = ~\(\vec r\)0(x, y) + ~\(\vec u\)(x, y).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ)=\frac{ρ − 1}{5}&lt;br /&gt;
sin(θ)~&amp;lt;/math&amp;gt;\(\vec e\)&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|250px|miniatura|derecha|Representación del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar. Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|550px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del gráfico se deduce que la temperatura aumenta en la dirección negativa de x. Por lo tanto, el valor máximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente consiste en: &lt;br /&gt;
[[Archivo:Formulagradiente.png|200px|miniatura|centro|Fórmula del gradiente de una función]]&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;T=&amp;lt;math&amp;gt;\frac{2(x-3)}{(x-3)^2+2}&amp;lt;/math&amp;gt;\(\vec i\). Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
[[Archivo:Gradiente4-A1.JPG|400px|miniatura|derecha|Gradiente de la temperatura comparado con sus curvas de nivel]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                                                               &lt;br /&gt;
T=log10((x-3).^2 + 2); &lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
contour(x,y,T,60)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
ti=inline('(2.*(x-3))./(log(10).*((x-3).^2)+2)','x','y'); %Derivada parcial con respecto a x&lt;br /&gt;
tj=inline('0.*x','x','y');                                %Derivada parcial con respecto a y   &lt;br /&gt;
Tx=ti(x,y);&lt;br /&gt;
Ty=tj(x,y);&lt;br /&gt;
quiver(x,y,Tx,Ty);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(h,'maxheadsize',0.33)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo \(\vec u\) de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia  e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;=&amp;lt;math&amp;gt;\frac{-x_2}{ρ}&amp;lt;/math&amp;gt;\(\vec i\)+&amp;lt;math&amp;gt;\frac{x_1}{ρ}&amp;lt;/math&amp;gt;\(\vec j\)=-sin(θ)\(\vec i\)+cos(θ)\(\vec j\).&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: \(\vec u\)=-&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;sin&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;(θ)\(\vec i\)+&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;cos(θ)sin(θ)\(\vec j\)&lt;br /&gt;
[[Archivo:Campovectoresxx.png|550Px|miniatura|derecha|Campo de deformaciones sobre los diversos puntos del mallado.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
hold on  &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo \(\vec u\):&lt;br /&gt;
[[Archivo:Desplazamientoss.png|500px|miniatura|derecha|La placa antes y después de la acción del campo de desplazamientos]]&lt;br /&gt;
[[Archivo:Desplazamiento placa.JPG|500px|miniatura|derecha|Comparación antes (verde) y después del desplazamiento (rojo)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
%Comparación de ambas representaciones. &lt;br /&gt;
hold on&lt;br /&gt;
figure                                 &lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
title('Desplazamiento de la placa','Fontsize',16);&lt;br /&gt;
hold on&lt;br /&gt;
i = mesh(x,y,0*x);&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo \(\vec u\) ha creado una ligera torsión radial en la placa y una elongación del extremo derecho.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
A continuación, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento, es decir, que una parte del sólido aumentará de volumen y otra lo perderá (dilatación o contracción).&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del gráfico se puede deducir que la divergencia toma valores máximos en el punto (ρ, θ) = (2,0) y valores mínimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ). Como vemos en la gráfica, la divergencia es positiva cuando θ se encuentra entre 0 y π/2 (se dilata); es negativa con θ entra π/2 y 2π (se contrae) y al ser nula entorno a π/2, esa región del sólido se mantiene constante en volumen.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en '''\(\vec e\)&amp;lt;sub&amp;gt;z&amp;lt;/sub&amp;gt;'''. &lt;br /&gt;
Calculamos su módulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el gráfico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2). Recientemente hemos aprendido a interpretarlo mediante el teorema de Stokes, y viendo la gráfica en 3D, sabemos que la velocidad en θ=0 y en θ=π es nula en cuanto a rotación, y es máxima en el punto mencionado antes, lo que genera una tensión plástica que lo deforma.&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ. Sabemos que σ se puede obtener a partir de la fórmula:&lt;br /&gt;
[[Archivo:Fórmulasigma.JPG|150px|miniatura|centro]]&lt;br /&gt;
Tomamos los coeficientes de Lamé (λ y μ) ambos como iguales a 1, y el tensor de deformaciones como la suma del gradiente de \(\vec u\) con su matriz traspuesta divididos por 2. EL resultado de sigma lo podemos ver incluido en el código del programa.&lt;br /&gt;
&lt;br /&gt;
Después podremos representar las tensiones normales en la dirección que marca el eje i, es decir &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;  = \(\vec g_{i}\) * σ * \(\vec g_{i}\), las tensiones normales en la dirección que marca el eje j, es decir &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;  = \(\vec g_{j}\) * σ * \(\vec g_{j}\) y las correspondientes al eje k, es decir &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;  = \(\vec g_{k}\) * σ * \(\vec g_{k}\). Resultan las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Tensordetensiones3D.JPG|550px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Tensordetensiones2D.JPG|550px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica representa las tensiones superficiales a la placa. Como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
[[Archivo:Tensiones tangenciales al plano ortogonal a i.JPG|450px|miniatura|derecha|Tensiones tangenciales.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(2-rr).*sin(tt)./5;&lt;br /&gt;
b=(2-rr).*sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   &lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tensión de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuándo un material&lt;br /&gt;
inicia un comportamiento plástico. Emplearemos la siguiente fórmula, que toma como valores de σ(1), σ(2) y σ(3) los autovalores de la matriz σ calculada en el apartado 9. En el programa incluimos una calculadora de autovalores.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:VonMises4-A.JPG|350px|miniatura|derecha|Tensión de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%Creación matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(1,2)=(2-r)./5.*sin(t);&lt;br /&gt;
     sigma(2,1)=(2-r)./5.*sin(t);&lt;br /&gt;
     sigma(2,2)=(2.*r.^2-r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(3,3)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Fórmula de Tensión de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                %Pasamos a cartesianas  &lt;br /&gt;
xx=RR.*cos(TT);        &lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (2,0) y en (2,π).&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
El campo de fuerzas que actúa sobre la placa sigue la siguiente fórmula  F = −∇ · σ. En la gráfica podemos apreciar claramente cómo actúa sobre el sólido este campo y podríamos intuir qué desplazamiento y deformación sufriría.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de fuerzas sobre el sólido.JPG|400px|miniatura|derecha|Campo de fuerzas que recibe la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
z=0.*x;  &lt;br /&gt;
hold on&lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])             &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=(2.*RR.^2-RR.^3-1)./(5.*RR.^2).*cos(TT);&lt;br /&gt;
b=-(2.*RR.^2-2.*RR-1)./(5.*RR).*sin(TT);&lt;br /&gt;
c=-1./RR.*cos(TT);&lt;br /&gt;
w=quiver3(x,y,z,a,b,c);&lt;br /&gt;
axis ([-3,3,-1,3,-1,1])&lt;br /&gt;
title('Campo de fuerzas','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48329</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48329"/>
				<updated>2021-12-14T08:38:49Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensión de Von Mises */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(\vec r\)&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;(x,y) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(\vec r\)(x, y) = ~\(\vec r\)0(x, y) + ~\(\vec u\)(x, y).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ)=\frac{ρ − 1}{5}&lt;br /&gt;
sin(θ)~&amp;lt;/math&amp;gt;\(\vec e\)&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|250px|miniatura|derecha|Representación del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar. Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|550px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del gráfico se deduce que la temperatura aumenta en la dirección negativa de x. Por lo tanto, el valor máximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente consiste en: &lt;br /&gt;
[[Archivo:Formulagradiente.png|200px|miniatura|centro|Fórmula del gradiente de una función]]&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;T=&amp;lt;math&amp;gt;\frac{2(x-3)}{(x-3)^2+2}&amp;lt;/math&amp;gt;\(\vec i\). Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
[[Archivo:Gradiente4-A1.JPG|400px|miniatura|derecha|Gradiente de la temperatura comparado con sus curvas de nivel]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                                                               &lt;br /&gt;
T=log10((x-3).^2 + 2); &lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
contour(x,y,T,60)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
ti=inline('(2.*(x-3))./(log(10).*((x-3).^2)+2)','x','y'); %Derivada parcial con respecto a x&lt;br /&gt;
tj=inline('0.*x','x','y');                                %Derivada parcial con respecto a y   &lt;br /&gt;
Tx=ti(x,y);&lt;br /&gt;
Ty=tj(x,y);&lt;br /&gt;
quiver(x,y,Tx,Ty);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(h,'maxheadsize',0.33)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo \(\vec u\) de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia  e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;=&amp;lt;math&amp;gt;\frac{-x_2}{ρ}&amp;lt;/math&amp;gt;\(\vec i\)+&amp;lt;math&amp;gt;\frac{x_1}{ρ}&amp;lt;/math&amp;gt;\(\vec j\)=-sin(θ)\(\vec i\)+cos(θ)\(\vec j\).&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: \(\vec u\)=-&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;sin&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;(θ)\(\vec i\)+&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;cos(θ)sin(θ)\(\vec j\)&lt;br /&gt;
[[Archivo:Campovectoresxx.png|550Px|miniatura|derecha|Campo de deformaciones sobre los diversos puntos del mallado.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
hold on  &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo \(\vec u\):&lt;br /&gt;
[[Archivo:Desplazamientoss.png|500px|miniatura|derecha|La placa antes y después de la acción del campo de desplazamientos]]&lt;br /&gt;
[[Archivo:Desplazamiento placa.JPG|500px|miniatura|derecha|Comparación antes (verde) y después del desplazamiento (rojo)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
%Comparación de ambas representaciones. &lt;br /&gt;
hold on&lt;br /&gt;
figure                                 &lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
title('Desplazamiento de la placa','Fontsize',16);&lt;br /&gt;
hold on&lt;br /&gt;
i = mesh(x,y,0*x);&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo \(\vec u\) ha creado una ligera torsión radial en la placa y una elongación del extremo derecho.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
A continuación, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento, es decir, que una parte del sólido aumentará de volumen y otra lo perderá (dilatación o contracción).&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del gráfico se puede deducir que la divergencia toma valores máximos en el punto (ρ, θ) = (2,0) y valores mínimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ). Como vemos en la gráfica, la divergencia es positiva cuando θ se encuentra entre 0 y π/2 (se dilata); es negativa con θ entra π/2 y 2π (se contrae) y al ser nula entorno a π/2, esa región del sólido se mantiene constante en volumen.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en '''\(\vec e\)&amp;lt;sub&amp;gt;z&amp;lt;/sub&amp;gt;'''. &lt;br /&gt;
Calculamos su módulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el gráfico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2). Recientemente hemos aprendido a interpretarlo mediante el teorema de Stokes, y viendo la gráfica en 3D, sabemos que la velocidad en θ=0 y en θ=π es nula en cuanto a rotación, y es máxima en el punto mencionado antes, lo que genera una tensión plástica que lo deforma.&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ. Sabemos que σ se puede obtener a partir de la fórmula:&lt;br /&gt;
[[Archivo:Fórmulasigma.JPG|150px|miniatura|centro]]&lt;br /&gt;
Tomamos los coeficientes de Lamé (λ y μ) ambos como iguales a 1, y el tensor de deformaciones como la suma del gradiente de \(\vec u\) con su matriz traspuesta divididos por 2. EL resultado de sigma lo podemos ver incluido en el código del programa.&lt;br /&gt;
&lt;br /&gt;
Después podremos representar las tensiones normales en la dirección que marca el eje i, es decir &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;  = \(\vec g_{i}\) * σ * \(\vec g_{i}\), las tensiones normales en la dirección que marca el eje j, es decir &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;  = \(\vec g_{j}\) * σ * \(\vec g_{j}\) y las correspondientes al eje k, es decir &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;  = \(\vec g_{k}\) * σ * \(\vec g_{k}\). Resultan las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Tensordetensiones3D.JPG|550px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Tensordetensiones2D.JPG|550px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica representa las tensiones superficiales a la placa. Como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
[[Archivo:Tensiones tangenciales al plano ortogonal a i.JPG|450px|miniatura|derecha|Tensiones tangenciales.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(2-rr).*sin(tt)./5;&lt;br /&gt;
b=(2-rr).*sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   &lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tensión de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuándo un material&lt;br /&gt;
inicia un comportamiento plástico. Emplearemos la siguiente fórmula, que toma como valores de σ(1), σ(2) y σ(3) los autovalores de la matriz σ calculada en el apartado 9. En el programa incluimos una calculadora de autovalores.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:VonMises4-A.JPG|350px|miniatura|derecha|Tensión de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%Creación matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(1,2)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,1)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,2)=(2.*r.^2-r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(3,3)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Fórmula de Tensión de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                %Pasamos a cartesianas  &lt;br /&gt;
xx=RR.*cos(TT);        &lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (2,0) y en (2,π).&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
El campo de fuerzas que actúa sobre la placa sigue la siguiente fórmula  F = −∇ · σ. En la gráfica podemos apreciar claramente cómo actúa sobre el sólido este campo y podríamos intuir qué desplazamiento y deformación sufriría.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de fuerzas sobre el sólido.JPG|400px|miniatura|derecha|Campo de fuerzas que recibe la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
z=0.*x;  &lt;br /&gt;
hold on&lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])             &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=(2.*RR.^2-RR.^3-1)./(5.*RR.^2).*cos(TT);&lt;br /&gt;
b=-(2.*RR.^2-2.*RR-1)./(5.*RR).*sin(TT);&lt;br /&gt;
c=-1./RR.*cos(TT);&lt;br /&gt;
w=quiver3(x,y,z,a,b,c);&lt;br /&gt;
axis ([-3,3,-1,3,-1,1])&lt;br /&gt;
title('Campo de fuerzas','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48312</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48312"/>
				<updated>2021-12-13T20:22:32Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Representación de la temperatura */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(\vec r\)&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;(x,y) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(\vec r\)(x, y) = ~\(\vec r\)0(x, y) + ~\(\vec u\)(x, y).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~&amp;lt;/math&amp;gt;\(\vec e\)&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|250px|miniatura|derecha|Representación del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|550px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del gráfico se deduce que la temperatura aumenta en la dirección negativa de x. Por lo tanto, el valor máximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
[[Archivo:Formulagradiente.png|200px|miniatura|centro|Fórmula del gradiente de una función]]&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;T=&amp;lt;math&amp;gt;\frac{2(x-3)}{(x-3)^2+2}&amp;lt;/math&amp;gt;\(\vec i\). Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
[[Archivo:Gradiente4-A1.JPG|400px|miniatura|derecha|Gradiente de la temperatura comparado con sus curvas de nivel]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                                                               &lt;br /&gt;
T=log10((x-3).^2 + 2); &lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
contour(x,y,T,60)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
ti=inline('(2.*(x-3))./(log(10).*((x-3).^2)+2)','x','y'); %Derivada parcial con respecto a x&lt;br /&gt;
tj=inline('0.*x','x','y');                                %Derivada parcial con respecto a y   &lt;br /&gt;
Tx=ti(x,y);&lt;br /&gt;
Ty=tj(x,y);&lt;br /&gt;
quiver(x,y,Tx,Ty);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(h,'maxheadsize',0.33)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo \(\vec u\) de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia  e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;=&amp;lt;math&amp;gt;\frac{-x_2}{ρ}&amp;lt;/math&amp;gt;\(\vec i\)+&amp;lt;math&amp;gt;\frac{x_1}{ρ}&amp;lt;/math&amp;gt;\(\vec j\)=-sin(θ)\(\vec i\)+cos(θ)\(\vec j\).&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: \(\vec u\)=-&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;sin&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;(θ)\(\vec i\)+&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;cos(θ)sin(θ)\(\vec j\)&lt;br /&gt;
[[Archivo:Campovectoresxx.png|550Px|miniatura|derecha|Campo de deformaciones sobre los diversos puntos del mallado.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
hold on  &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo \(\vec u\):&lt;br /&gt;
[[Archivo:Desplazamientoss.png|500px|miniatura|derecha|La placa antes y después de la acción del campo de desplazamientos]]&lt;br /&gt;
[[Archivo:Desplazamiento placa.JPG|500px|miniatura|derecha|Comparación antes (verde) y después del desplazamiento (rojo)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
%Comparación de ambas representaciones. &lt;br /&gt;
hold on&lt;br /&gt;
figure                                 &lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
title('Desplazamiento de la placa','Fontsize',16);&lt;br /&gt;
hold on&lt;br /&gt;
i = mesh(x,y,0*x);&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo \(\vec u\) ha creado una ligera torsión radial en la placa y una elongación del extremo izquierdo.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
A continuación, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento, es decir, que una parte del sólido aumentará de volumen y otra lo perderá (dilatación o contracción).&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del gráfico se puede deducir que la divergencia toma valores máximos en el punto (ρ, θ) = (2,0) y valores mínimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ). Como vemos en la gráfica, la divergencia es positiva cuando θ se encuentra entre 0 y π/2 (se dilata); es negativa con θ entra π/2 y 2π (se contrae) y al ser nula entorno a π/2, esa región del sólido se mantiene constante en volumen.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en '''\(\vec e\)&amp;lt;sub&amp;gt;z&amp;lt;/sub&amp;gt;'''. &lt;br /&gt;
Calculamos su módulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el gráfico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2). Recientemente hemos aprendido a interpretarlo mediante el teorema de Stokes, y viendo la gráfica en 3D, sabemos que la velocidad en θ=0 y en θ=π es nula en cuanto a rotación, y es máxima en el punto mencionado antes, lo que genera una tensión plástica que lo deforma.&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ. Sabemos que σ se puede obtener a partir de la fórmula:&lt;br /&gt;
[[Archivo:Fórmulasigma.JPG|150px|miniatura|centro]]&lt;br /&gt;
Tomamos los coeficientes de Lamé (λ y μ) ambos como iguales a 1, y el tensor de deformaciones como la suma del gradiente de \(\vec u\) con su matriz traspuesta divididos por 2. EL resultado de sigma lo podemos ver incluido en el código del programa.&lt;br /&gt;
&lt;br /&gt;
Después podremos representar las tensiones normales en la dirección que marca el eje i, es decir &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;  = \(\vec g_{i}\) * σ * \(\vec g_{i}\), las tensiones normales en la dirección que marca el eje j, es decir &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;  = \(\vec g_{j}\) * σ * \(\vec g_{j}\) y las correspondientes al eje k, es decir &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;  = \(\vec g_{k}\) * σ * \(\vec g_{k}\). Resultan las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Tensordetensiones3D.JPG|550px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Tensordetensiones2D.JPG|550px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica representa las tensiones superficiales a la placa. Como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
[[Archivo:Tensiones tangenciales al plano ortogonal a i.JPG|450px|miniatura|derecha|Tensiones tangenciales.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(2-rr).*sin(tt)./5;&lt;br /&gt;
b=(2-rr).*sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   &lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tensión de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuándo un material&lt;br /&gt;
inicia un comportamiento plástico. Emplearemos la siguiente fórmula, que toma como valores de σ(1), σ(2) y σ(3) los autovalores de la matriz σ calculada en el apartado 9. En el programa incluimos una calculadora de autovalores para una mayor comodidad.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:VonMises4-A.JPG|350px|miniatura|derecha|Tensión de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%Creación matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(1,2)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,1)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,2)=(2.*r.^2-r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(3,3)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Fórmula de Tensión de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                %Pasamos a cartesianas  &lt;br /&gt;
xx=RR.*cos(TT);        &lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (2,0) y en (2,π).&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
El campo de fuerzas que actúa sobre la placa sigue la siguiente fórmula  F = −∇ · σ. En la gráfica podemos apreciar claramente cómo actúa sobre el sólido este campo y podríamos intuir qué desplazamiento y deformación sufriría.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de fuerzas sobre el sólido.JPG|400px|miniatura|derecha|Campo de fuerzas que recibe la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
z=0.*x;  &lt;br /&gt;
hold on&lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])             &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=(2.*RR.^2-RR.^3-1)./(5.*RR.^2).*cos(TT);&lt;br /&gt;
b=-(2.*RR.^2-2.*RR-1)./(5.*RR).*sin(TT);&lt;br /&gt;
c=-1./RR.*cos(TT);&lt;br /&gt;
w=quiver3(x,y,z,a,b,c);&lt;br /&gt;
axis ([-3,3,-1,3,-1,1])&lt;br /&gt;
title('Campo de fuerzas','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48046</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48046"/>
				<updated>2021-12-10T21:01:40Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Campo de fuerzas \(\vec F\) que actúa sobre la placa */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt; e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Ejerc_9_1.png|400px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Ejerc_9_2.png|400px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
%b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
[[Archivo:Ejerc_10.png|140px|miniatura|derecha|Tensiones tangenciales.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
El campo de fuerzas que actúa sobre la placa sigue la siguiente fórmula  F = −∇ · σ &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Ejerc_11.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
z=0.*x;               &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=(cos(TT).*(2+RR.^2-RR)-RR.^2.*sin(TT))./(5.*RR.^3);&lt;br /&gt;
b=(2.*cos(TT)+RR.^2.*sin(TT))./(5.*RR.^3)+(1./(5.*RR)+2/5).*(RR-1).*cos(TT);&lt;br /&gt;
c=((RR-1).*cos(TT))./(5.*RR);&lt;br /&gt;
w=quiver3(x,y,z,a,b,c);&lt;br /&gt;
axis ([-3,3,-1,3,-1,1])&lt;br /&gt;
title('Campo de fuerzas','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_11.png&amp;diff=48045</id>
		<title>Archivo:Ejerc 11.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_11.png&amp;diff=48045"/>
				<updated>2021-12-10T20:54:28Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: Campo de fuerzas.&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Campo de fuerzas.&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47990</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47990"/>
				<updated>2021-12-10T19:01:45Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones tangenciales respecto al plano ortogonal a \(\vec i\) */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt; e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Ejerc_9_1.png|400px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Ejerc_9_2.png|400px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
%b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
[[Archivo:Ejerc_10.png|140px|miniatura|derecha|Tensiones tangenciales.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47984</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47984"/>
				<updated>2021-12-10T18:56:23Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones tangenciales respecto al plano ortogonal a \(\vec i\) */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt; e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Ejerc_9_1.png|400px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Ejerc_9_2.png|400px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
%b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_10.png&amp;diff=47983</id>
		<title>Archivo:Ejerc 10.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_10.png&amp;diff=47983"/>
				<updated>2021-12-10T18:55:57Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: Tensiones tangenciales.&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones tangenciales.&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47971</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47971"/>
				<updated>2021-12-10T18:40:45Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones normales a los ejes coordenados */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt; e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Ejerc_9_1.png|400px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Ejerc_9_2.png|400px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
%b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_9_2.png&amp;diff=47968</id>
		<title>Archivo:Ejerc 9 2.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_9_2.png&amp;diff=47968"/>
				<updated>2021-12-10T18:36:32Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: Vista ejes X e Y del ejercicio 9.&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Vista ejes X e Y del ejercicio 9.&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_9_1.png&amp;diff=47966</id>
		<title>Archivo:Ejerc 9 1.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Ejerc_9_1.png&amp;diff=47966"/>
				<updated>2021-12-10T18:35:40Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: Tensiones normales en la dirección de cada eje.&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones normales en la dirección de cada eje.&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47964</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47964"/>
				<updated>2021-12-10T18:30:33Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones normales a los ejes coordenados */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt; e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
%b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47956</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47956"/>
				<updated>2021-12-10T17:26:45Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones tangenciales respecto al plano ortogonal a \(\vec i\) */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt; e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1)./(5.*rr).*cos(tt); %Elemento (1,1) de la matriz sigma&lt;br /&gt;
b=(rr-1).*cos(tt).*(2/5-1./5.*rr);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
c=(rr-1)./5.*cos(tt);            %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47955</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47955"/>
				<updated>2021-12-10T17:17:20Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Representación del campo vectorial de deformaciones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt; e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1)./(5.*rr).*cos(tt); %Elemento (1,1) de la matriz sigma&lt;br /&gt;
b=(rr-1).*cos(tt).*(2/5-1./5.*rr);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
c=(rr-1)./5.*cos(tt);            %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado. estas incrementan cuando tetha tiende a pi/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47954</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47954"/>
				<updated>2021-12-10T17:16:34Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Representación del campo vectorial de deformaciones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1)./(5.*rr).*cos(tt); %Elemento (1,1) de la matriz sigma&lt;br /&gt;
b=(rr-1).*cos(tt).*(2/5-1./5.*rr);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
c=(rr-1)./5.*cos(tt);            %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado. estas incrementan cuando tetha tiende a pi/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47950</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47950"/>
				<updated>2021-12-10T17:12:03Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones normales a los ejes coordenados */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1)./(5.*rr).*cos(tt); %Elemento (1,1) de la matriz sigma&lt;br /&gt;
b=(rr-1).*cos(tt).*(2/5-1./5.*rr);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
c=(rr-1)./5.*cos(tt);            %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado. estas incrementan cuando tetha tiende a pi/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47949</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47949"/>
				<updated>2021-12-10T17:10:39Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones tangenciales respecto al plano ortogonal a \(\vec i\) */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este épsilon (u). Entonces conoceremos el tensor de tensiones definido como sigma.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1)./(5.*rr).*cos(tt); %Elemento (1,1) de la matriz sigma&lt;br /&gt;
b=(rr-1).*cos(tt).*(2/5-1./5.*rr);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
c=(rr-1)./5.*cos(tt);            %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica pinta las tensiones superficiales a la placa y como se ve en el resultado. estas incrementan cuando tetha tiende a pi/2.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=sin(tt)./5;&lt;br /&gt;
b=sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47941</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47941"/>
				<updated>2021-12-10T17:00:25Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones normales a los ejes coordenados */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este épsilon (u). Entonces conoceremos el tensor de tensiones definido como sigma.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1)./(5.*rr).*cos(tt); %Elemento (1,1) de la matriz sigma&lt;br /&gt;
b=(rr-1).*cos(tt).*(2/5-1./5.*rr);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
c=(rr-1)./5.*cos(tt);            %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,c)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47934</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47934"/>
				<updated>2021-12-10T16:58:40Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Tensiones normales a los ejes coordenados */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este épsilon (u). Entonces conoceremos el tensor de tensiones definido como sigma.&lt;br /&gt;
&lt;br /&gt;
Entonces podremos representar las tensiones normales en la dirección que marca el eje i, es decir i · σ · i, las tensiones normales en la direccón que marca el eje j, es decir j · σ · j y las correspondientes al eje k, es decir k · σ · k. Dándonos las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47903</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47903"/>
				<updated>2021-12-10T16:12:54Z</updated>
		
		<summary type="html">&lt;p&gt;Sergio Miguez: /* Desplazamiento del mallado producido por el campo vectorial */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo u ha creado una ligera torsión radial en la placa.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Sergio Miguez</name></author>	</entry>

	</feed>