2Eva_IT2011_T1 Integral con Simpson

2da Evaluación I Término 2011-2012. 30/Agosto/2011. ICM00158

Tema 1. Dada la integral

\int_0^1 \frac{a^x}{(x-1)^{2/5}} \delta x

Determine:
a. Si la integral converge, justifique adecuadamente

b. Su valor aproximado, en caso de que la integral converja, usando Simpson compuesta con n=4

s2Eva_IIT2011_T3 EDP Parabólica, explícito

Ejercicio: 2Eva_IIT2011_T3 EDP Parabólica, explícito

La ecuación a resolver es:

\frac{\delta u}{\delta t} - \frac{\delta^2 u}{\delta x^2} =2

Como el método requerido es explícito se usan las diferencias divididas:

\frac{d^2 u}{dx^2} = \frac{u_{i+1,j} - 2 u_{i,j} + u_{i-1,j}}{(\Delta x)^2} \frac{du}{dt} = \frac{u_{i,j+1} - u_{i,j} }{\Delta t}

edp Parabolica Explicito 02

Reordenando la ecuación al modelo realizado en clase:

\frac{\delta^2 u}{\delta x^2} = \frac{\delta u}{\delta t} - 2 \frac{u_{i+1,j} - 2 u_{i,j} + u_{i-1,j}}{(\Delta x)^2} = \frac{u_{i,j+1} - u_{i,j} }{\Delta t} - 2

multiplicando cada lado por Δt

\frac{\Delta t}{(\Delta x)^2} \Big[u_{i+1,j} - 2 u_{i,j} + u_{i-1,j} \Big]= u_{i,j+1} - u_{i,j} - 2\Delta t

Se establece el valor de

\lambda = \frac{\Delta t}{(\Delta x)^2} \lambda u_{i+1,j} - 2 \lambda u_{i,j} + \lambda u_{i-1,j} = u_{i,j+1} - u_{i,j} - 2\Delta t

obteniendo la ecuación general, ordenada por índices de izquierda a derecha:

\lambda u_{i-1,j} +(1- 2 \lambda)u_{i,j} + \lambda u_{i+1,j} + 2\Delta t = u_{i,j+1}

con valores de:

λ = Δt/(Δx)2 = (0.04)/(0.25)2 = 0.64
P = λ = 0.64
Q = (1-2λ) = -0.28
R = λ = 0.64
0.64 u_{i-1,j} - 0.28 u_{i,j} + 0.64 u_{i+1,j} + 0.08 = u_{i,j+1}

Se realizan 3 iteraciones:

i= 1, j=0

u_{1,1} = 0.64 u_{0,0} -0.28u_{1,0}+0.64 u_{2,0}+0.08 u_{1,1} = 0.64 [\sin(\pi*0)+0*(1-0)]- 0.28[\sin(\pi*0.25)+0.25*(1-0.25)] +0.64[\sin(\pi*0.5)+ 0.5*(1-0.5)]+0.08

u[1,1] =0.89

i = 2, j=0

0.64 u_{1,0} - 0.28 u_{2,0} + 0.64 u_{3,0} + 0.08 = u_{2,1}

u[1,0] = 1.25

i = 3, j=0

0.64 u_{2,0} - 0.28 u_{3,0} + 0.64 u_{4,0} + 0.08 = u_{3,1}

u[3,1] = 0.89

edp Parabolica Exp 2eT2011T3 01

edp Parabolica Exp 2eT2011T3 01


Algoritmo en Python

con los valores y ecuación del problema

# EDP parabólicas d2u/dx2  = K du/dt
# método explícito, usando diferencias finitas
# Referencia: Chapra 30.2 p.888 pdf.912
#       Rodriguez 10.2 p.406
import numpy as np
import matplotlib.pyplot as plt

# INGRESO
# Valores de frontera
Ta = 0
Tb = 0
T0 = lambda x: np.sin(np.pi*x)+x*(1-x)
# longitud en x
a = 0
b = 1
# Constante K
K = 1
# Tamaño de paso
dx = 0.1
dt = dx/10/2
# iteraciones en tiempo
n = 50

# PROCEDIMIENTO
# iteraciones en longitud
xi = np.arange(a,b+dx,dx)
m = len(xi)
ultimox = m-1

# Resultados en tabla u[x,t]
u = np.zeros(shape=(m,n), dtype=float)

# valores iniciales de u[:,j]
j=0
ultimot = n-1
u[0,j]= Ta
u[1:ultimox,j] = T0(xi[1:ultimox])
u[ultimox,j] = Tb

# factores P,Q,R
lamb = dt/(K*dx**2)
P = lamb
Q = 1 - 2*lamb
R = lamb

# Calcula U para cada tiempo + dt
j = 0
while not(j>=ultimot):
    u[0,j+1] = Ta
    for i in range(1,ultimox,1):
        u[i,j+1] = P*u[i-1,j] + Q*u[i,j] + R*u[i+1,j]+2*dt
    u[m-1,j+1] = Tb
    j=j+1

# SALIDA
print('Tabla de resultados')
np.set_printoptions(precision=2)
print(u)

# Gráfica
salto = int(n/10)
if (salto == 0):
    salto = 1
for j in range(0,n,salto):
    vector = u[:,j]
    plt.plot(xi,vector)
    plt.plot(xi,vector, '.r')
plt.xlabel('x[i]')
plt.ylabel('t[j]')
plt.title('Solución EDP parabólica')
plt.show()

3Eva_IIT2010_T4 EDO con Taylor

3ra Evaluación II Término 2010-2011. 15/Febrero/2011. ICM00158

Tema 4. Dada la siguiente expresión con las condiciones:

\frac{\delta y}{\delta x} = \frac{y^3}{1-2xy^2} y(0) = 1, 0 \leq x \leq 1

a. Plantear la solución con el método de Taylor de dos términos.

b. Resolver la ecuación diferencial usando lo planteado para al menos 3 iteraciones. use h=0.2

c. Escribir tabla de resultados

d. Determine T2(ti,wi)

 

3Eva_IIT2010_T3 EDO d2y/dx2 con valor inicial

3ra Evaluación II Término 2010-2011. 15/Febrero/2011. ICM00158

Tema 3. Resolver la ecuación diferencial de valor inicial:

y'' +2y'+5y = 4 e^{-t} \cos (2t) 0\leq t \leq 1 y(0)=1, y'(0) = 0

a. Plantear el sistema de ecuaciones equivalente

b. Desarrollar al menos 3 iteraciones, considerando con h = 0.2

b. Presentar la tabla de resultados

3Eva_IIT2010_T2 Integrar función por intervalos

3ra Evaluación II Término 2010-2011. 15/Febrero/2011. ICM00158

Tema 2. Dada la función

f(x) = \begin{cases} \sin (x) , & 0\leq x \lt \frac{\pi}{2}\\ - \frac{2x}{\pi} +2, & \frac{\pi}{2} \leq x \leq \pi \end{cases}

a. Graficar la función

b. Integrar numéricamente con la fórmula compuesta de Simpson, n=6

c. Determinar el error absoluto del valor determinado en el literal b.

3Eva_IIT2010_T1 Trazador cúbico sujeto

3ra Evaluación II Término 2010-2011. 15/Febrero/2011. ICM00158

Tema 1. Dados los valores de una función y sus derivadas en los extremos,

f(0)= 1.5
f(1/2) = 1.37758
f(1) = 1.0403

f'(0) = 0
f'(1) = – 0.84147

determinar el trazador cúbico sujeto y luego aproximar la función en los puntos x=0.2 y x=0.8


fxi = [[  0, 1.5    ],
       [1/2, 1.37758],
       [  1, 1.0403 ]]

3Eva_IT2010_T4 EDP hiperbólica

3ra Evaluación I Término 2010-2011. 14/Septiembre/2010. ICM00158

Tema 4. Deducir el algoritmo de diferencia finita que aproxima la solución de la ecuación de onda dada:

\frac{\partial^2 u(x,t)}{\partial t^2} = \frac{\partial^2 u(x,t)}{\partial x^2} 0\lt x \lt l, t \gt 0 \begin{cases}u(0,t) = u(l,t) , & t\ge 0 \\u(x,0) = f(x) , & 0\leq x \leq l\\ \frac{\delta u (x,0)}{\delta t} = g(x) , & 0\leq x \leq l\end{cases}

Donde las funciones f y g son del espacio C [0,l], el mismo intervalo para las x.

3Eva_IT2010_T3 Demostrar Simpson

3ra Evaluación I Término 2010-2011. 14/Septiembre/2010. ICM00158

Tema 3. Demostrar la fórmula de Simpson:

\int_{x_0}^{x_2} f(x)dx = \frac{h}{3} \Big[f x_0 + 4 f x_1 + f x_2 \Big] - \frac{h^5}{90} f^4 \xi

Donde h es la distrancia entre los nodos y ξ ∈ x0,x2

3Eva_IT2010_T2 EDO problema con valor inicial dy/dx

3ra Evaluación I Término 2010-2011. 14/Septiembre/2010. ICM00158

Tema 2. Resolver el siguiente problema de valor inicial

(2y^2 + 4x^2)\delta x -xy \delta y =0 1\leq x \leq 2 y(1)=-2

Usando el método de Runge-Kutta de cuarto orden:

a. Escriba el algoritmo para la función específica f(x,y)

b. Escriba la tabla de resultados para h=0.2

3Eva_IT2010_T1 Envase cilíndrico

3ra Evaluación I Término 2010-2011. 14/Septiembre/2010. ICM00158

Tema 1. Un envase de lata con forma de cilindro circular recto, será construido para contener 1000 cm3. envase Cilindro 01

Las partes superior e inferior circulares del envase deben tener un radio de 0.25 mayor que el radio de éste, de manera que el excedente pueda usarse para formar un sello con el cuerpo principal.

La hoja de material con la que se forme dicho cuerpo, debe ser también de 0.25 cm más larga que la circunferencia del envase, de manera que se pueda formar un sello.

Encuentre con un error de 10-4 la cantidad mínima de material para construir dicha lata.


Referencias: Burden Cap2.6 Ejercicio 11 9Ed p101lata abierta 01