Example 5.  Use Picard iteration to find the solution to the system of differential equations

        [Graphics:Images/PicardIterationMod_gr_87.gif]    

Solution 5.

First define the functions  [Graphics:../Images/PicardIterationMod_gr_88.gif]  and the initial conditions  [Graphics:../Images/PicardIterationMod_gr_89.gif]  by typing:

[Graphics:../Images/PicardIterationMod_gr_90.gif]

[Graphics:../Images/PicardIterationMod_gr_91.gif]

 

Picard iteration for generating the first six approximations is started with the Mathematica command:

[Graphics:../Images/PicardIterationMod_gr_92.gif]

[Graphics:../Images/PicardIterationMod_gr_93.gif]

[Graphics:../Images/PicardIterationMod_gr_94.gif]

[Graphics:../Images/PicardIterationMod_gr_95.gif]

 

    Techniques from calculus can be used to find the analytic solutions   [Graphics:../Images/PicardIterationMod_gr_96.gif]   and   [Graphics:../Images/PicardIterationMod_gr_97.gif].  

Notice that when the last term in the Picard approximation is dropped, what is left is a Maclaurin (or Taylor) polynomial approximation.  

We can express the analytic solutions as Maclaurin series and observe that the sequences  [Graphics:../Images/PicardIterationMod_gr_98.gif]  and  [Graphics:../Images/PicardIterationMod_gr_99.gif]  are converging to the solution

      [Graphics:../Images/PicardIterationMod_gr_100.gif]     
      
      [Graphics:../Images/PicardIterationMod_gr_101.gif]   

Mathematica can sum the infinite series to obtain the analytic solution.

[Graphics:../Images/PicardIterationMod_gr_102.gif]


[Graphics:../Images/PicardIterationMod_gr_103.gif]



[Graphics:../Images/PicardIterationMod_gr_104.gif]


[Graphics:../Images/PicardIterationMod_gr_105.gif]

We are done!    

Aside.  The following Mathematica commands will solve the system of D. E. 's.  

[Graphics:../Images/PicardIterationMod_gr_106.gif]


[Graphics:../Images/PicardIterationMod_gr_107.gif]

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

(c) John H. Mathews 2005