Digi Area Group - Math Tools for Professionals
   Maple and Mathematica packages - math tools for professionals

LdeApprox™  - analytical approximation methods for Maple™

> Features List & Examples
> Screenshots
> Documentation & Downloads
> License & Pricing
> Buy Online

 
 
 
 
Google

Description  |  Features List & Examples  |  Introduction  |  Analitical approximations  |  Ref. Manual PDF (2M)

Approximation methods for LDE solutions 

Copyright © 2004-2009  DigiArea Group . All rights reserved.

Description:

This worksheet illustrates  LdeApprox  package capability of doing polynomial approximation of solution of simple LDE. First of all we load LdeApprox package and define simple IVP. Then we use ApproxSol procedure to find 7-th degree polynomial approximation for the IVP solution on interval x = [-h,h]. After that we find exact solution by Maple™ procedure dsolve . Finally we compare exact and approximate results using Maple™ procedures plot  and plot3d .

This loads the package.

restart:
with(LdeApprox):

Examples:

This is simple IVP with parameter xi .

ivp:={diff(y(x),x,x)+xi*y(x)=0,y(0)=0,D(y)(0)=1};

ivp := {y(0) = 0, D(y)(0) = 1, diff(y(x),`$`(x,2))+xi*y(x) = 0}

Finding polynomial approximation of the IVP solution on interval [-h, h].

apr:=ApproxSol(ivp,y(x),x=-h..h,7);

apr := y(x) = 80*(4032*xi*h^2+129024+72*xi^2*h^4+xi^3*h^6)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+80*xi^3*h^6)*x-960*xi*(56*xi*h^2+1792+xi^2*h^4)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+...
apr := y(x) = 80*(4032*xi*h^2+129024+72*xi^2*h^4+xi^3*h^6)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+80*xi^3*h^6)*x-960*xi*(56*xi*h^2+1792+xi^2*h^4)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+...
apr := y(x) = 80*(4032*xi*h^2+129024+72*xi^2*h^4+xi^3*h^6)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+80*xi^3*h^6)*x-960*xi*(56*xi*h^2+1792+xi^2*h^4)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+...
apr := y(x) = 80*(4032*xi*h^2+129024+72*xi^2*h^4+xi^3*h^6)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+80*xi^3*h^6)*x-960*xi*(56*xi*h^2+1792+xi^2*h^4)/(322560*xi*h^2+10321920+5760*xi^2*h^4+xi^4*h^8+...

Finding exact solution of the IVP using Maple™  function dsolve .

sol:=dsolve(ivp,y(x));

sol := y(x) = 1/xi^(1/2)*sin(xi^(1/2)*x)

Comparing exact and approximate results for h = Pi/8  and xi = 1/4

plot(subs({h=Pi/8,xi=1/4},subs(sol,y(x))-subs(apr,y(x))),x=-Pi/8..Pi/8);

[Maple Plot]

Comparing exact and approximate results for h = Pi/8  using Maple™  function plot3d

plot3d(subs({h=Pi/8},subs(sol,y(x))-subs(apr,y(x))),xi=1/16..2,x=-Pi/8..Pi/8,axes=boxed);

[Maple Plot]

Comparing exact and approximate results for xi = 1/4   using Maple™  function plot3d .

plot3d(subs({xi=1/4},subs(sol,y(x))-subs(apr,y(x))),x=-h..h,h=-Pi/4..Pi/4,axes=boxed);

[Maple Plot]

Note:

This trivial example is just for Web. You can try more complex examples in your computer.