m (Zarate moved page Review Rodríguez 2017a to Rodríguez 2017a) |
|||
(30 intermediate revisions by 2 users not shown) | |||
Line 52: | Line 52: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>x' = g(t,x), t_0 \leq t \leq t_f, x(t_0) = x_0 | + | | style="text-align: center;" | <math>x' = g(t,x), t_0 \leq t \leq t_f, x(t_0) = x_0 </math> |
|} | |} | ||
|} | |} | ||
Line 63: | Line 63: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\tilde{x}_0 = t_0, \tilde{x}_{n+1} = \tilde{x}_n + h \phi (t_n, \tilde{x}_n; h) | + | | style="text-align: center;" | <math>\tilde{x}_0 = t_0, \tilde{x}_{n+1} = \tilde{x}_n + h \phi (t_n, \tilde{x}_n; h) </math> |
|} | |} | ||
|} | |} | ||
Line 74: | Line 74: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>F = \{ (t,x,h | t_0 \leq t \leq t_f, -\infty < x < \infty , 0 \leq h \leq h_0 \} | + | | style="text-align: center;" | <math>F = \{ (t,x,h | t_0 \leq t \leq t_f, -\infty < x < \infty , 0 \leq h \leq h_0 \} </math> |
|} | |} | ||
|} | |} | ||
Line 87: | Line 87: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>x''(t) = \frac{dx'}{dt}(t) = \frac{dg}{dt}(t,x(t)) = \frac{\partial g}{\partial t}(t, x(t)) + \frac{\partial g}{\partial x}(t,x(t)) \cdot g(t, x(t)) | + | | style="text-align: center;" | <math>x''(t) = \frac{dx'}{dt}(t) = \frac{dg}{dt}(t,x(t)) = \frac{\partial g}{\partial t}(t, x(t)) + \frac{\partial g}{\partial x}(t,x(t)) \cdot g(t, x(t)) </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (1) | | style="width: 5px;text-align: right;white-space: nowrap;" | (1) | ||
Line 109: | Line 109: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>f(t,x,x') = 0 | + | | style="text-align: center;" | <math>f(t,x,x') = 0 </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (2) | | style="width: 5px;text-align: right;white-space: nowrap;" | (2) | ||
Line 122: | Line 122: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>f(t_0,x_0,x') = 0 | + | | style="text-align: center;" | <math>f(t_0,x_0,x') = 0 </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (3) | | style="width: 5px;text-align: right;white-space: nowrap;" | (3) | ||
Line 148: | Line 148: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\alpha _d - \alpha _i | + | | style="text-align: center;" | <math>\alpha _d - \alpha _i </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (5) | | style="width: 5px;text-align: right;white-space: nowrap;" | (5) | ||
Line 163: | Line 163: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | + | <ol> | |
− | + | <li> '''-''' <math> {\tilde{x}'}_{0} = Biseccion(t_{0},\tilde{x}_{0},\alpha _i,\alpha _d,\tau ) </math></li> | |
− | '''a)''' <math> t_{n+1} = t_n + h </math>'''b)''' <math> \tilde{x}_{n+1} = \tilde{x}_n + {\tilde{x}'}_n h </math> '''c)''' <math> \tau = \tau (h) </math>'''d)''' <math>{\tilde{x}'}_{n+1} = Biseccion(t_{n+1},\tilde{x}_{n+1},\alpha _i,\alpha _d,\tau ) </math> ''' | + | <li> '''-''' para <math> (n = 0 \hbox{ hasta } N-1) </math> </li> |
+ | '''a)''' <math> t_{n+1} = t_n + h </math> | ||
+ | '''b)''' <math> \tilde{x}_{n+1} = \tilde{x}_n + {\tilde{x}'}_n h </math> | ||
+ | '''c)''' <math> \tau = \tau (h) </math> | ||
+ | '''d)''' <math>{\tilde{x}'}_{n+1} = Biseccion(t_{n+1},\tilde{x}_{n+1},\alpha _i,\alpha _d,\tau ) </math> | ||
+ | <li>'''-''' fin</li> | ||
|} | |} | ||
− | | style="width: 5px;text-align: | + | </ol> |
+ | | style="width: 5px;text-align: left;white-space: nowrap;" | (6) | ||
|} | |} | ||
Line 178: | Line 184: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\tau = \tau (h) | + | | style="text-align: center;" | <math>\tau = \tau (h) </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (7) | | style="width: 5px;text-align: right;white-space: nowrap;" | (7) | ||
Line 200: | Line 206: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>t_0 \leq t \leq t_f | + | | style="text-align: center;" | <math>t_0 \leq t \leq t_f </math> |
|- | |- | ||
− | | style="text-align: center;" | <math> - \infty < x < \infty | + | | style="text-align: center;" | <math> - \infty < x < \infty </math> |
|- | |- | ||
− | | style="text-align: center;" | <math> - \infty < x' < \infty | + | | style="text-align: center;" | <math> - \infty < x' < \infty </math> |
|- | |- | ||
| style="text-align: center;" | | | style="text-align: center;" | | ||
Line 228: | Line 234: | ||
| style="text-align: center;" | <math> | | style="text-align: center;" | <math> | ||
− | G = (\beta _i,\beta _d) \times \mathbb{R}^2 | + | G = (\beta _i,\beta _d) \times \mathbb{R}^2 |
</math> | </math> | ||
Line 246: | Line 252: | ||
| style="text-align: center;" | <math> | | style="text-align: center;" | <math> | ||
− | \frac{\partial f}{\partial t}, \frac{\partial f}{\partial x}, \textrm{ y } \frac{\partial f}{\partial x'} | + | \frac{\partial f}{\partial t}, \frac{\partial f}{\partial x}, \textrm{ y } \frac{\partial f}{\partial x'} |
</math> | </math> | ||
Line 264: | Line 270: | ||
| style="text-align: center;" | <math> | | style="text-align: center;" | <math> | ||
− | \frac{\partial f}{\partial x'}|_{t_r,x_r} \neq 0 | + | \frac{\partial f}{\partial x'}|_{t_r,x_r} \neq 0 |
− | </math> | + | </math></li> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (11) | | style="width: 5px;text-align: right;white-space: nowrap;" | (11) | ||
Line 280: | Line 286: | ||
| style="text-align: center;" | <math> | | style="text-align: center;" | <math> | ||
− | u: _{t_r, x_r}\mathbb{R} \rightarrow \mathbb{R}, x' \mapsto u_{t_r, x_r}(x') := f(t_r,x_r,x') | + | u: _{t_r, x_r}\mathbb{R} \rightarrow \mathbb{R}, x' \mapsto u_{t_r, x_r}(x') := f(t_r,x_r,x') |
</math> | </math> | ||
Line 314: | Line 320: | ||
| style="text-align: center;" | <math> | | style="text-align: center;" | <math> | ||
− | \infty {< x'}_{i_r}{ < x'}_{d_r} < \infty | + | \infty {< x'}_{i_r}{ < x'}_{d_r} < \infty |
</math> | </math> | ||
Line 330: | Line 336: | ||
| style="text-align: center;" | <math> | | style="text-align: center;" | <math> | ||
− | {f(t_r,x_r,x'}_{i_r}{) f(t_r,x_r,x'}_{d_r}) < 0 | + | {f(t_r,x_r,x'}_{i_r}{) f(t_r,x_r,x'}_{d_r}) < 0 |
</math> | </math> | ||
Line 346: | Line 352: | ||
| style="text-align: center;" | <math> | | style="text-align: center;" | <math> | ||
− | u_{t_r,x_r}{(x'}_{i_r}) u_{t_r,x_r}{(x'}_{d_r}) < 0 | + | u_{t_r,x_r}{(x'}_{i_r}) u_{t_r,x_r}{(x'}_{d_r}) < 0 |
</math> | </math> | ||
Line 376: | Line 382: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>| \frac{\partial g}{\partial x} | = | \frac{\frac{\partial f}{\partial x}}{\frac{\partial f}{\partial x'}} | \leq L | + | | style="text-align: center;" | <math>| \frac{\partial g}{\partial x} | = | \frac{\frac{\partial f}{\partial x}}{\frac{\partial f}{\partial x'}} | \leq L </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (17) | | style="width: 5px;text-align: right;white-space: nowrap;" | (17) | ||
Line 390: | Line 396: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>x' = g(t,x), t_0 \leq t \leq t_f, x(t_0) = x_0 | + | | style="text-align: center;" | <math>x' = g(t,x), t_0 \leq t \leq t_f, x(t_0) = x_0 </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (18) | | style="width: 5px;text-align: right;white-space: nowrap;" | (18) | ||
Line 409: | Line 415: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>0 \leq |\tilde{x}' - x'| < \frac{t_f - t_0}{2^{N(h)} } =: \delta (h) = \tau (h) - \epsilon (h) \leq \tau (h), \hbox{ con } 0 \leq \epsilon < \tau /2 | + | | style="text-align: center;" | <math>0 \leq |\tilde{x}' - x'| < \frac{t_f - t_0}{2^{N(h)} } =: \delta (h) = \tau (h) - \epsilon (h) \leq \tau (h), \hbox{ con } 0 \leq \epsilon < \tau /2 </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (19) | | style="width: 5px;text-align: right;white-space: nowrap;" | (19) | ||
Line 421: | Line 427: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | \begin{align} \tilde{x}_0 & = x_0 | + | | style="text-align: center;" | <math> \begin{align} \tilde{x}_0 & = x_0 \\ |
− | \tilde{x}_{n+1} & = \tilde{x}_n + h {\tilde{x}'}_n \end{align} | + | \tilde{x}_{n+1} & = \tilde{x}_n + h {\tilde{x}'}_n \end{align} </math> |
|} | |} | ||
|} | |} | ||
Line 434: | Line 440: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\begin{ | + | | style="text-align: center;" | <math>\begin{align} \tilde{x}_0 & = x_0 + (\delta _{-1} = 0)\\ |
+ | \tilde{x}_{n+1} & = \tilde{x}_n + h g(t_n,\tilde{x}_n) + (h \delta _n := \Delta _n), \hbox{ para } n = 0,1 \ldots N-1 \\ \end{align} </math> | ||
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (20) | | style="width: 5px;text-align: right;white-space: nowrap;" | (20) | ||
Line 447: | Line 454: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>0 \leq |\Delta _n| = h |\delta _n| < h \delta \leq h \tau := \Delta | + | | style="text-align: center;" | <math>0 \leq |\Delta _n| = h |\delta _n| < h \delta \leq h \tau := \Delta </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (21) | | style="width: 5px;text-align: right;white-space: nowrap;" | (21) | ||
Line 463: | Line 470: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>x'' = \frac{-\frac{\partial f}{\partial t} -\frac{\partial f}{\partial x} x'}{\frac{\partial f}{\partial x'}} | + | | style="text-align: center;" | <math>x'' = \frac{-\frac{\partial f}{\partial t} -\frac{\partial f}{\partial x} x'}{\frac{\partial f}{\partial x'}} </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (22) | | style="width: 5px;text-align: right;white-space: nowrap;" | (22) | ||
Line 476: | Line 483: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>|x''| = | \frac{\frac{\partial f}{\partial t} + \frac{\partial f}{\partial x} x'}{\frac{\partial f}{\partial x'}} | \leq M | + | | style="text-align: center;" | <math>|x''| = | \frac{\frac{\partial f}{\partial t} + \frac{\partial f}{\partial x} x'}{\frac{\partial f}{\partial x'}} | \leq M </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (23) | | style="width: 5px;text-align: right;white-space: nowrap;" | (23) | ||
Line 495: | Line 502: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>|x_n - \tilde{x}_n| \leq \frac{1}{L} \left(\frac{h M}{2} + \frac{\Delta }{h} \right)(e^{L(t_n - t_0)} - 1) = \frac{1}{L} \left(\frac{h M}{2} + \tau (h) \right)(e^{L(t_n - t_0)} - 1) | + | | style="text-align: center;" | <math>|x_n - \tilde{x}_n| \leq \frac{1}{L} \left(\frac{h M}{2} + \frac{\Delta }{h} \right)(e^{L(t_n - t_0)} - 1) = \frac{1}{L} \left(\frac{h M}{2} + \tau (h) \right)(e^{L(t_n - t_0)} - 1) </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (24) | | style="width: 5px;text-align: right;white-space: nowrap;" | (24) | ||
|} | |} | ||
− | donde <math display="inline">L</math> es la constante de Lipschitz para <math display="inline">x' = g(t,x)</math> Además, el valor óptimo para <math display="inline">h</math> (el mínimo error posible) se presenta para un <math display="inline">h</math> aproximado a <math display="inline">h = \sqrt{2 \Delta / M}</math>, o, despejando a <math display="inline">Delta</math>, cuando <math display="inline">\Delta = \frac{M}{2} h^2</math>, es decir, cuando | + | donde <math display="inline">L</math> es la constante de Lipschitz para <math display="inline">x' = g(t,x)</math> Además, el valor óptimo para <math display="inline">h</math> (el mínimo error posible) se presenta para un <math display="inline">h</math> aproximado a <math display="inline">h = \sqrt{2 \Delta / M}</math>, o, despejando a <math display="inline">\Delta</math>, cuando <math display="inline">\Delta = \frac{M}{2} h^2</math>, es decir, cuando |
<span id="eq-25"></span> | <span id="eq-25"></span> | ||
Line 508: | Line 515: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\tau = \frac{M}{2} h \approx \delta | + | | style="text-align: center;" | <math>\tau = \frac{M}{2} h \approx \delta </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (25) | | style="width: 5px;text-align: right;white-space: nowrap;" | (25) | ||
Line 547: | Line 554: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\tau = C \cdot h | + | | style="text-align: center;" | <math>\tau = C \cdot h </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (28) | | style="width: 5px;text-align: right;white-space: nowrap;" | (28) | ||
Line 593: | Line 600: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\lim _{h \rightarrow 0} \max _{1 \leq n \leq N} |e_n(h)| = 0, n = 1,2, \dots , N | + | | style="text-align: center;" | <math>\lim _{h \rightarrow 0} \max _{1 \leq n \leq N} |e_n(h)| = 0, n = 1,2, \dots , N </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (31) | | style="width: 5px;text-align: right;white-space: nowrap;" | (31) | ||
Line 607: | Line 614: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\lim _{h \rightarrow 0} \max _{1 \leq n \leq N} |x_n - \tilde{x}_n| = 0, n = 1,2, \dots , N | + | | style="text-align: center;" | <math>\lim _{h \rightarrow 0} \max _{1 \leq n \leq N} |x_n - \tilde{x}_n| = 0, n = 1,2, \dots , N </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (32) | | style="width: 5px;text-align: right;white-space: nowrap;" | (32) | ||
Line 616: | Line 623: | ||
Teorema 14: Considerando ahora el teorema ([[#theorem-teorema5.19Burden|1]]), la subrutina de bisección y el problema perturbado mostrado en ([[#eq-20|20]]), entonces es obvio que <math display="inline">\phi (t_n,\tilde{x}_n; h) = biseccion(t_n,\tilde{x}_n; h, \alpha _i, \alpha _d) = biseccion(t_n,\tilde{x}_n; h) = g + \delta _n = {\tilde{x}'}_n</math> | Teorema 14: Considerando ahora el teorema ([[#theorem-teorema5.19Burden|1]]), la subrutina de bisección y el problema perturbado mostrado en ([[#eq-20|20]]), entonces es obvio que <math display="inline">\phi (t_n,\tilde{x}_n; h) = biseccion(t_n,\tilde{x}_n; h, \alpha _i, \alpha _d) = biseccion(t_n,\tilde{x}_n; h) = g + \delta _n = {\tilde{x}'}_n</math> | ||
− | <span id='theorem-Estabilidad'></span>Teorema 15: Retomando el teorema anterior y empleando la condición de Lipschitz para <math display="inline">g</math>, así como la fórmula ([[#eq-21|21]]), y la expresión ([[#theorem-tau_lineal|11]]), tendremos para <math display="inline">\phi (t,x; h)</math> que <math display="inline">|\phi (t,x,h) - \phi (t,y,h)| = |\tilde{x}' - \tilde{y}'| = |g(t,x) + \tilde{\delta }(t,x,h) - g(t,y) - \tilde{\delta }(t,y,h)| \leq |g(t,x) - g(t,y)| + |\tilde{\delta }(t,x,h) - \tilde{\delta }(t,y,h)| \leq L|x-y| + |\tilde{\delta }(t,x,h)| + |\tilde{\delta }(t,y,h)|< L|x-y| + 2 \tau = L|x-y| + 2 C h</math>, donde hemos hecho la transición <math display="inline">\delta _n \rightarrow \tilde{\delta }</math> para el caso continuo, resultando la siguiente desigualdad | + | <span id='theorem-Estabilidad'></span>Teorema 15: Retomando el teorema anterior y empleando la condición de Lipschitz para <math display="inline">g</math>, así como la fórmula ([[#eq-21|21]]), y la expresión ([[#theorem-tau_lineal|11]]), tendremos para <math display="inline">\phi (t,x; h)</math> que <math display="inline">|\phi (t,x,h) - \phi (t,y,h)| = |\tilde{x}' - \tilde{y}'| </math> <math> = |g(t,x) + \tilde{\delta }(t,x,h) - g(t,y) - \tilde{\delta }(t,y,h)| \leq |g(t,x) - g(t,y)| + |\tilde{\delta }(t,x,h) - \tilde{\delta }(t,y,h)| </math> <math> \leq L|x-y| + |\tilde{\delta }(t,x,h)| + |\tilde{\delta }(t,y,h)| < L|x-y| + 2 \tau = L|x-y| + 2 C h</math>, donde hemos hecho la transición <math display="inline">\delta _n \rightarrow \tilde{\delta }</math> para el caso continuo, resultando la siguiente desigualdad |
{| class="formulaSCP" style="width: 100%; text-align: left;" | {| class="formulaSCP" style="width: 100%; text-align: left;" | ||
Line 623: | Line 630: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>|\phi (t,x,h) - \phi (t,y,h)| < L|x-y| + 2 C h | + | | style="text-align: center;" | <math>|\phi (t,x,h) - \phi (t,y,h)| < L|x-y| + 2 C h </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (33) | | style="width: 5px;text-align: right;white-space: nowrap;" | (33) | ||
Line 655: | Line 662: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\begin{ | + | | style="text-align: center;" | <math>\begin{align} f(t,v,v') & = m v' + k v + m g= 0\\ |
+ | v(0) & = v_0 \end{align} </math> | ||
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (34) | | style="width: 5px;text-align: right;white-space: nowrap;" | (34) | ||
Line 722: | Line 730: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>ds^2 = - \alpha (r)^2 dt^2+ a(r)^2 dr^2 + r^2 d\theta ^2 + r^2 \sin ^2(\theta ) d\varphi ^2 | + | | style="text-align: center;" | <math>ds^2 = - \alpha (r)^2 dt^2+ a(r)^2 dr^2 + r^2 d\theta ^2 + r^2 \sin ^2(\theta ) d\varphi ^2 </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (35) | | style="width: 5px;text-align: right;white-space: nowrap;" | (35) | ||
Line 735: | Line 743: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\frac{a_{,r}}{a} + \frac{\alpha _{,r}}{\alpha } = \frac{k_{0}}{2} r \frac{a^2 \omega ^2 \phi _{0}^2}{\alpha ^2} + \frac{k_{0}}{2} r \phi _{0,r}^2 | + | | style="text-align: center;" | <math>\frac{a_{,r}}{a} + \frac{\alpha _{,r}}{\alpha } = \frac{k_{0}}{2} r \frac{a^2 \omega ^2 \phi _{0}^2}{\alpha ^2} + \frac{k_{0}}{2} r \phi _{0,r}^2 </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (36) | | style="width: 5px;text-align: right;white-space: nowrap;" | (36) | ||
Line 746: | Line 754: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\frac{a_{,r}}{a} - \frac{\alpha _{,r}}{\alpha } = \frac{k_{0}}{2} r a^2 \phi _{0}^2 m^2 + \frac{k_{0}}{4} r \lambda a^2 \phi _{0}^4 + \frac{1-a^2}{r} | + | | style="text-align: center;" | <math>\frac{a_{,r}}{a} - \frac{\alpha _{,r}}{\alpha } = \frac{k_{0}}{2} r a^2 \phi _{0}^2 m^2 + \frac{k_{0}}{4} r \lambda a^2 \phi _{0}^4 + \frac{1-a^2}{r} </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (37) | | style="width: 5px;text-align: right;white-space: nowrap;" | (37) | ||
Line 759: | Line 767: | ||
{| style="text-align: left; margin:auto;width: 100%;" | {| style="text-align: left; margin:auto;width: 100%;" | ||
|- | |- | ||
− | | style="text-align: center;" | <math>\phi _{0,rr} + \phi _{0,r} \left(\frac{2}{r} + \frac{\alpha _{,r}}{\alpha } - \frac{a_{,r}}{a} \right)+ \omega ^2 \phi _{0} \frac{a^2}{\alpha ^2} - a^2 (m^2 + \lambda \phi _{0}^2) \phi _{0} = 0 | + | | style="text-align: center;" | <math>\phi _{0,rr} + \phi _{0,r} \left(\frac{2}{r} + \frac{\alpha _{,r}}{\alpha } - \frac{a_{,r}}{a} \right)+ \omega ^2 \phi _{0} \frac{a^2}{\alpha ^2} - a^2 (m^2 + \lambda \phi _{0}^2) \phi _{0} = 0 </math> |
|} | |} | ||
| style="width: 5px;text-align: right;white-space: nowrap;" | (38) | | style="width: 5px;text-align: right;white-space: nowrap;" | (38) |
Carlos Oscar Rodríguez Leal
Universidad de Guadalajara. CUCEI.
e-mail: misifu17@gmail.com
En este trabajo se desarrollan algoritmos numéricos que se pueden aplicar de manera directa a ecuaciones diferenciales de la forma general , sin necesidad de despejar . Mis métodos son algoritmos híbridos entre los métodos estándar de solución de ecuaciones diferenciales y métodos de solución de ecuaciones algebraicas, con los que se despeja numéricamente la variable .
La aplicación de estos métodos va desde ecuaciones diferenciales ordinarias de orden uno, hasta el caso más general de sistemas de ecuaciones de orden . Dichos algoritmos se aplican a la solución de diversas ecuaciones de la física-matemática.
Por último, se hace el análisis numérico correspondiente de existencia, unicidad, estabilidad, consistencia y convergencia, principalmente para el caso más sencillo de una sola ecuación diferencial ordinaria de primer orden.
Palabras clave Ecuaciones diferenciales, métodos numéricos no estándar, función derivada implícita, método de Euler-bisección, consistencia, estabilidad, convergencia, ecuaciones de estrella de bosones.
Non-standard general numerical methods for the direct solution of differential equations not cleared in canonical forms
In this work I develop numerical algorithms that can be applied directly to differential equations of the general form , without the need to cleared . My methods are hybrid algorithms between standard methods of solving differential equations and methods of solving algebraic equations, with which the variable is numerically cleared.
The application of these methods ranges from the ordinary differential equations of order one, to the more general case of systems of equations of order . These algorithms are applied to the solution of different physical-mathematical equations.
Finally, the corresponding numerical analysis of existence, uniqueness, stability, consistency and convergence is made, mainly for the simplest case of a single ordinary differential equation of the first order.
Keywords Differential equations, non-standard numerical methods, implicit derivative function, Euler-bisection method, consistency, stability, convergence, boson star equations.
En este trabajo se desarrollan algoritmos numéricos que se pueden aplicar de manera directa a ecuaciones diferenciales de la forma general , sin necesidad de despejar algebraicamente de la forma para poder emplear los métodos ordinarios.
Los algoritmos desarrollados son modificaciones de métodos estándar para resolver ecuaciones diferenciales con condiciones iniciales, en particular el método de Euler. La esencia de la modificación consiste en desarrollar algoritmos híbridos entre los métodos estándar de solución de ecuaciones diferenciales y métodos de solución de ecuaciones algebraicas, con los cuales se despejan numéricamente la variable . Los métodos se desarrollan tanto para ecuaciones diferenciales ordinarias de orden uno, como para el caso más general de sistemas de ecuaciones con incógnitas de orden .
La importancia de estos métodos radica en que en la práctica muchas veces es muy difícil hacer los despejes algebraicos de en las ecuaciones diferenciales, si no es que imposible.
Dichos procedimientos directos los aplico a ecuaciones de la física-matemática, entre ellas la ecuación de caída libre con fricción y las ecuaciones de Einstein para las estrellas de bosones.
Por último, realizo el análisis numérico correspondiente de existencia, unicidad, estabilidad, consistencia y convergencia de las soluciones numéricas proporcionadas por mis métodos, principalmente para el caso más sencillo de una sola ecuación diferencial ordinaria de primer orden resuleta por mi método de Euler modificado, dejando para trabajos posteriores el análisis correspondiente de los demás casos.
En esta sección se enunciarán algunos teoremas ya establecidos que serán necesarios para la elaboración de este trabajo.
Teorema 1: Supóngase que el problema de valor inicial
|
se aproxima por el método de diferencias de un paso de la forma
|
Considérese también que existe un número y es continua y satisface una condición de Lipschitz en la variable con constante de Lipschitz en el conjunto
|
Entonces el método es estable.
Teorema 2: Si en la ecuación , y existen, entonces
|
(1) |
En esta primera sección, comenzando por los casos más simples, se explican tanto la elaboración como el análisis numérico para el método de Euler modificado, combinando el método de Euler con el método algebraico de bisección.
En este primer método, como punto de partida, se emplan los dos métodos más simples, intuitivos y fáciles de analizar, los cuales son el método de Euler, para ecuaciones diferenciales, y el método de la bisección.
Así pues, comenzaremos considerando la ecuación general sin despejar
|
(2) |
para la cual calcularemos los distintos valores aproximados de en un intervalo , con un tamaño de paso y con la condición inicial ; la cual, al sustituirla en la función , generará la expresión
|
(3) |
Entonces, dado que no tenemos despejada de manera explícita la variable , para encontrar su valor, de manera aproximada, usaremos el método de la bisección, donde tomamos dos valores de arranque inamovibles y , , tales que
|
(4) |
Además la diferencia
|
(5) |
deberá ser convenientemente grande en lugar de ser convenientemente pequeña (lo cual se explicará más adelante).
Luego de ello comenzamos las iteraciones del núcleo del algoritmo.
|
(6) |
donde en la ecuación del inciso c)
|
(7) |
es la tolerancia o error para el método de la bisección, de tal manera que la subrutina de bisección se detendrá cuando , para alguna -ésima iteración del algoritmo anidado “Biseccion” dentro del núcleo del algoritmo de Euler-biseccion en su iteración -ésima. El porqué se ha elegido a la tolerancia como función de será aclararado en la sección del análisis de este método.
Por ahora diremos que la elección de la diferencia (5) debe ser suficientemente amplia, pues si dicha diferencia es pequeña, aunque el teorema del valor intermedio nos garantiza que existe una raiz para dados y fijos y cumpliéndose (4) (bajo el supuesto de que la función es continua, lo que se analizará más adelante, en la subsección de convergencia), como tal función irá variando sus valores y al entrar al núcleo recursivo (6), para esos nuevos valores fijados (con suficientemente grande) dicha función podría ya no tener una raiz para dentro del intervalo pequenño . Pero con un intervalo adecuadamente amplio y donde esté más o menos centrada, disminuirá considerablemente el riesgo de que la raiz se localice fuera de dicho intervalo y el método aborte dándonos un mensaje de error (pues está programado para tolerar ese fallo).
Ahora procederemos a hacer el correspondiente análisis de unicidad y buen planteamiento, del método numérico anterior, estableciendo los criterios bajo los cuales se cumplirán ambos requisitos.
Observación 1: En todos los análisis de este artículo siempre tomaremos como punto de partida algún espacio , para algún y consideraremos una métrica euclideana, es decir, partiremos de un espacio euclidiano -dimensional.
Así pues, emplearemos las condiciones de la sección 3.1.1, con
|
(8) |
Ahora consideraremos las siguientes hipótesis de esta subsección que han de cumplirse, y sus correspondientes tesis.
Definición 1: Definiremos primeramente a , lo cual significa que es el dominio de definición de .
Teorema 3:
|
(9) |
de tal forma que y , tendremos que será un subconjunto abierto de que contendrá a .
|
(10) |
existen y son continuas en el conjunto abierto convexo , entonces, por el teorema de la continuidad de una función solamente si sus derivadas parciales son continuas (Rudin, 1980, p. 236), tendremos que y por lo tanto (definiendo las derivadas por derecha y por izquierda en los respectivos extremos y ).
|
(11) |
para todo , entonces podemos definir a la función
|
(12) |
siendo con ello la derivada
|
(13) |
continua en , i.e., por el teorema del valor intermedio, claramente ó (pero no ambos) para todo . De lo anterior, usando el teorema de la función estrictamente monótona (Lang, 1990, p. 60) se deduce que es estrictamente monótona en para todo par . En particular es estrictamente monótona en para todo .
|
(14) |
tales que
|
(15) |
es decir
|
(16) |
entonces, usando una vez más el teorema de valor intermedio, se puede demostrar que existe un único , con , que satisface , o lo que es lo mismo . En particular lo anterior es cierto para .
Teorema 4: Cosiderando los puntos del teorem anterior, y observando que la ecuación definida en determina implícitamente a (que es la función que no podemos despejar), entonces, de acuerdo al punto 4. de dicho teorema y utilizando el teorema de la función implícita, se demuestra que para cada par existe un que satisface , de tal forma que para dicha triada se cumple lo siguiente (es decir, en cada punto del dominio para ):
Corolario 1: En particular, el teorema anterior es cierto para el dominio restringido para .
Teorema 5: Utilizando el teorema de la derivada parcial para la condición de Lipschitz [1] y el punto 3. del teorema (4) resulta evidente que si existe una constante que satisface
|
(17) |
para toda , entonces satisface una condición de Lipschitz sobre en la variable y con constante de Lipschitz .
Teorema 6: Ahora, haciendo uso del teorema del problema de valor inicial bien planteado (Burden y Faires, 1996, p. 242), si la función definida implícitamente es continua en y satisface una condición de Lipschitz en la variable sobre , entonces el problema de valor inicial
|
(18) |
está bien planteado.
En esta subsección se hará un análisis particular para el error de respecto a , su orden y el error óptimo, para el método de Euler-bisección, suponeindo que se cumplen las hipótesis de la subsección anterior.
Teorema 7: Dada la tolerancia definida en (7), así como los extremos y , entonces es claro que la subrutina de bisección se detendrá en cuanto se cumpla que , para algún , donde no ha de depender de , o y por lo tanto siempre valdrá lo mismo para un dado. Por lo tanto podemos expresar a dicho error como
|
(19) |
donde tampoco dependerá de , o y por lo tanto será constante dado un valor fijo para . En consecuencia tendremos que , o lo que es lo mismo, . Por ello, al emplear el método de Euler-biseccion tendremos la expresión
|
lo cual equivale a
|
(20) |
con y , y por ende
|
(21) |
La anterior es una ecuación en diferencias como la que corresponde al método de Euler perturbado [1], con una perturbación , para .
Ahora deduciremos el siguiente teorema.
Teorema 8: Empleando la fórmula del teorema (2) y el teorema (4) podemos expresar a como
|
(22) |
Además, si existe una constante con la propiedad , para alguna constate y , entonces
|
(23) |
para todo .
Observación 2: En el teorema anterior, en la expresión (23) aparece . Sin embargo, si dicha no se puede eliminar de la expresión por simplificación algebraica, entonces, una vez que ya se ha demostrado la unicidad en la solución de la ecuación, si el sistema físico nos da información extra respecto a un acotamiento para la velocidad (), entonces la ecuación modelo debe poseer el mismo acotamiento para , ya que la ecuación modelo y el sistema físico se corresponden en sus valores siempre que la ecuación con condiciones iniciales sea única.
Ahora enunciaremos el teorema de la cota del error para
Teorema 9: Usando el teorema del acotamiento del error global (Burden et al., 1996, p. 248), la fórmula (23), el teorema (7) y el teorema del error global para el método de Euler perturbado (Burden et al., 1996, p. 251), podemos obtener la siguiente cota para el error, en su iteración n-ésima, de la solución numérica respecto a la exacta
|
(24) |
donde es la constante de Lipschitz para Además, el valor óptimo para (el mínimo error posible) se presenta para un aproximado a , o, despejando a , cuando , es decir, cuando
|
(25) |
tomando entonces la expresión (19) la forma
|
(26) |
Teorema 10: Usando la definición del error de truncamiento local (Burden et al., 1996, p. 254), el teorema (7) y suponiendo que para , podemos observar que el error de truncamiento local para el método de Euler-bisección es , por lo que al aplicar el valor absoluto nos quedará . En conclusión, obtenemos el siguiente acotamiento para el error de truncamiento local
|
(27) |
donde vemos que dicho acotamiento no depende de la iteración -ésima en la que estemos, ni tampoco de , ni .
Teorema 11: Del teorema anterior vemos que el método de Euler-biseccion es de orden lineal o menor, dependiendo de cómo esté definida la función . Así, si es constante, el método es de orden cero, y ello significa que el error no cambia, sin importa que hagamos más pequeña a . Por ello, lo conveniente es definir a
|
(28) |
de esa forma el método será por lo menos lineal. Además, es fácil ver que esta definición para es compatible con la dada en el teorema (9) para el error mínimo, donde , i.e.
|
(29) |
es el valor óptimo para la tolerancia, el cual nos dará, usando la fórmula (10), un error mínimo de
|
(30) |
Observación 3: Las fórmulas (29) y (30) se corresponden bellamente con las fórmulas (25) y (26), respectivamente, si desarrollamos la exponencial en su serie de Maclaurin.
Observación 4: Ahora ya se puede comenzar a dar respuesta a la pregunta de la subsección pirmera del por qué es conveniente definir a .
Ahora se hará el análisis de estabilidad, consistencia y convergencia para el método de Euler-bisección suponiendo que se cumplen todas las condiciones de la subsección anterior.
Teorema 12: Empleando la definición de consistencia de un método de ecuación en diferencias (Burden et al., 1996, p. 312), la fórmula (10), la definición de punto adherido o punto límite, el teorema de compresión (Lang, 1990, p. 41) (teorema del emparedado) y definiendo a como , de acuerdo a (11), concluimos que , por lo que
|
(31) |
y en consecuencia el método es consistente.
Teorema 13: Ahora, empleando la definición de convergencia para un método de ecuación en diferencias [1], y la fórmula (26), obtendremos, de manera análoga al teorema anterior, , es decir
|
(32) |
i.e. el método es convergente.
Teorema 14: Considerando ahora el teorema (1), la subrutina de bisección y el problema perturbado mostrado en (20), entonces es obvio que
Teorema 15: Retomando el teorema anterior y empleando la condición de Lipschitz para , así como la fórmula (21), y la expresión (11), tendremos para que , donde hemos hecho la transición para el caso continuo, resultando la siguiente desigualdad
|
(33) |
donde, del lado derecho de la última ecuación no podemos deshacernos del término . Sin embargo, debido a que ya se demostró que el problema está bien planteado si cumple el criterio dado en (6), además de la consistencia y convergencia, entonces es de esperarse que para un razonablemente pequeño, dicho término se puede tomar como equivalente a pequeños errores de redondeo de computadora, y por ende que el método se comporte como el de Euler ligeramente perturbado, siendo entonces un método estable.
Observación 5: Desafortunadamente, para este método no pude completar la prueba final que demostrara que es una función que satisface la condición de Lipschitz para , y con ello que el método es estable. No obstante dí los argumentos de que es un problema bien planteado para tratar de justificar esta última prueba.
Ahora abordaremos de manera rápida y práctica el problema de consistencia, convergencia y estabilidad de las demás combinaciones de métodos híbridos.
Consideremos primeramente que el análisis de la sección 3.1.2, referente al problema bien planteado se aplica de manera general para ecuaciones implícitas de la forma , sin importar qué combinación de métodos usemos.
En segundo lugar, en este artículo se omitirá el análisis del error de los demás métodos, dejándolo para futuros trabajos.
Y por último, respecto al análisis de estabilidad, consistencia y convergencia de los otros métodos, solo argumentaré algo análogo a lo dicho en el teorema (15) y en la observación (5), en cuanto a que mis métodos híbridos se pueden considerar como pequeñas perturbaciones al problema de valor inicial (para suficientemente pequeña) empleando los métodos convencionales de solución de ecuaciones diferenciales, como se observa en la fórmula (20), (donde la perturbación es ) pues solo se calcula de manera aproximada el valor de por métodos numéricos algebraicos, lo que nos va agregando un error extra en cada iteración. Mas como para todos esos métodos convencionales ya se han hecho los respectivos análisis, al tener un problema bien planteado significa que las soluciones dadas por mis métodos tendrán un pequeño error respecto a las soluciones mostradas por tales métodos estándar y por lo tanto también un pequeño error aceptable respecto a la solución exacta si es muy pequeño.
Ahora se procederá a hacer el análisis gráfico para el método de Euler-bisección, tomando como modelo el problema de caída libre con friccón laminar (bajas velocidades), por lo que la fuerza de fricción es proporcional a la velocidad y en sentido opuesto [5].
Cabe señalar que aunque este modelo se puede resolver por métodos estándar e incluso analíticamente, será utilizado justamente para evaluar todo lo afirmado en las secciones anteriores.
La ecuación diferencial con condiciones iniciales ha de ser entonces
|
(34) |
donde indica la velocidad del cuerpo, es su velocidad inicial, su masa, es la aceleración de la gravedad en unidades S.I., es la constante de fricción y hemos reducido el orden de la ecuación con el cambio de variable .
Para este problema en particular elegimos , , y .
Además, el tiempo irá de . También tomaremos un tamaño de paso de .
Ahora, en aras de la brevedad solo diremos que todas las condiciones para un problema bien planteado se cumplen (el lector interesado puede verificarlo), siendo la constante de Lipschitz (para en ).
Y en lo referente al análisis del error, de acuerdo al sistema físico que modelamos la aceleración máxima se da al inicio, cuando la velocidad inicial es cero y por lo tanto la fuerza de fricción también es cero. Y dicha aceleración máxima ha de ser igual a .
Así que de acuerdo a la fórmula (23), podemo ver , siendo por lo tanto el valor del error óptimo (según (25)).
Con ello ya se pueden hacer los análisis respectivos de cotas del error y ver que el método tiene una convergencia de orden lineal, de acuerdo a (26).
A continuación se presentan los gráficos correspondientes, donde se puede observar que se cumple todo lo señalado.
![]() |
Figure 1: |
![]() |
Figure 2: |
(1) El gráfico izquierdo es para la velocidad del cuerpo que cae, el derecho para su aceleración. El eje horizontal corresponde al tiempo. Se muestra en rojo la solución analítica y en azul la numérica; puede verse que prácticamente se traslapan.
(2) En el gráfico izquierdo aparece la derivada de la aceleración, es decir , en el derecho el error global
En esta sección se explicará rápidamente cómo se desarrollan los métodos más generales de solución de sistemas de ecuaciones diferenciales con funciones incógnitas de -ésimo orden. El respectivo análisis numérico se dejará para futuros trabajos.
Primeramente habrá de señalarse que todo sistema de ecuaciones diferenciales de orden puede transformarse en un sistema equivalente de orden uno. Una vez transformado, se aplican métodos semejantes a los del caso de una sola ecuación de orden uno, como se verá a continuación.
Al considerar las condiciones iniciales, el sistema se transforma en un sistema algebraico para las variables incógnitas derivadas, el cual se puede resolver mediante métodos de resolución de sistemas de ecuaciones algebraicas, tales como punto fijo multivariable o Newton-Raphson multivariable. Una vez obtenidos los valores aproximados para las funciones derivadas, se procede a aplicar cualquier método estándar de solución numérica de sistemas de ecuaciones diferenciales, pero con un pequeño error en el cálculo de las funciones para las derivadas (problema perturbado). Una vez aplicados los métodos estándar se obtiene el valor aproximado de las variables dependientes en . Y el proceso se repite hasta llegar al .
La métrica para una estrella de bosones sin dependencia temporal (objeto compacto, esféricamente simétrico, estático) es [6]
|
(35) |
de la cual se deducen, usando el formalismo de la geometría diferencial, las siguientes ecuaciones de Einstein [6]
|
(36) |
|
(37) |
Además, elegimos un potencial de la forma [7,8], siendo . Por otro lado, la ecuación de la conservación de la energía se reduce a la ecuación de Klein-Gordon , de lo que se obtiene la tercera ecuación de Einstein
|
(38) |
donde y dependen solamente del radio .
La solución numérica de este sistema usando mis métodos con las condiciones iniciales , y , origina los siguientes gráficos
![]() |
Figure 3: Gráfico para vs . |
![]() |
Figure 4: Gráfico para vs . |
![]() |
Figure 5: Gráfico para vs . |
(1) Estos gráficos se corresponden muy bien con los obtenidos usando métodos numéricos tradicionales, como se puede apreciar al compararlos con [9].
Los métodos numéricos alternativos para resolver ecuaciones diferenciales con condiciones iniciales, desarrollados en este trabajo, son útiles para los casos en que no se puede despejar explícitamente a la funciones derivadas. Además, en general pasaron todas las pruebas del análisis numérico (solo con ciertos detalles para la prueba de estabilidad) y se determinaron cotas del error, las cuales, los ejemplos aquí expuestos las satisfacen muy bien. En particular me enfoqué en el método de Euler-bisección, pero en futuros trabajos se desarrollarán otras combinaciones de métodos, así como los correspondientes métodos numéricos no estándar para ecuaciones diferenciales en derivadas parciales.
[5] M. R. Spiegel, “Theoretical Mechanics”, Segunda edición, Schaum's Outline Series, McGraw-Hill, Estados Unidos de América, (1967).
[6] C. Rodríguez, ``Solución a las ecuaciones de Einstein para las estrellas de bosones usando el método de álgebras y simetrías”, Tesis de Maestría, Universidad de Guadalajara, Ameca, México, (2017). [7] F. S. Guzmán, ``The three dinamical fates of Boson Stars”, Revista Mexicana de Física, pp. 321-326, (2009). [8] F. E. Schunck y D. F. Torres, ``Boson stars with generic self-interactions”, arXiv:gr-qc/9911038v1, (1999).[9] A. Bernal, ``Estudio Dinámico de Campos Escalares Autogravitantes”, Tesis Doctoral, CINVESTAV, México, (2007).
Published on 27/11/17
Submitted on 27/11/17
Volume 1, 2017
Licence: CC BY-NC-SA license