Goal:  Compute a 7 stage order 4 scheme to arbitrary precision.
====
       The scheme s7odr4 is essentially the same as the one that 
       can be obtained as follows: Since 

              phi(t):=exp(t Y/2) exp(t X) exp(t Y/2)

       is reflexive, thus there are delta's such that

              phi(delta1 t) phi(delta2 t) phi(delta1 t)

       to be a fourth order approximation to exp(t X+t Y).
       (See those under directory: fromRefXV.)

                               Ren-Cang Li, June 1, 1996
                               na.rcli@na-net.ornl.gov

Files in this directory:
=======================

   Maple Code:
   ----------

      Get_s7odr4      ---  Driver routine to get the scheme s9odr4a

      s7odr4Eq         ---  Define determining equations.

      WriteItOut       ---  for dumping out solutions to s9odr4a and s9odr4b.

   Output:   s7odr4, the scheme
   -------   

To Run: 
=======

   After Maple prompt, type   read('Get_s7odr4');

Comments: The code as it is operate use 100 decimal digits, while only
          dump 20 decimal digits of final solutions. To change these,
          please go to Get_s7odr4, where 

              Digits    and   DumpDigits

          are initialized.
