26 September 2023   7:47:50.429 AM      
 
cwg_ode_test():
  FORTRAN77 version.
  Test cwg_ode().
 
TEST01
  SRKODE is a Runge-Kutta ODE solver
 
              T          Y1            Y2
 
     0      0.0000     0.00000       1.00000    
     1      0.2618    0.158107      0.987422    
     2      0.5236    0.408283      0.912855    
     3      0.7854    0.630636      0.776079    
     4      1.0472    0.810012      0.586414    
     5      1.3090    0.934187      0.356786    
     6      1.5708    0.994698      0.102844    
     7      1.8326    0.987423     -0.158107    
     8      2.0944    0.912856     -0.408284    
     9      2.3562    0.776080     -0.630636    
    10      2.6180    0.586415     -0.810012    
    11      2.8798    0.356787     -0.934187    
    12      3.1416    0.102844     -0.994699    
 
TEST02
  SPRODE is a polyomial/rational function
  approximation ODE solver
 
  Using MF =        0
 
              T          Y1            Y2
 
     0      0.0000     0.00000       1.00000    
     1      0.2618    0.258819      0.965926    
     2      0.5236    0.499846      0.866120    
 return flag =    -1
 
  Using MF =        1
 
              T          Y1            Y2
 
     0      0.0000     0.00000       1.00000    
     1      0.2618    0.258819      0.965926    
     2      0.5236    0.500060      0.866324    
 return flag =    -1
 
TEST03
  SMVODE is a multi-value ODE solver
 
  Using MF =        0
 
              T          Y1            Y2
 
     0      0.0000     0.00000       1.00000    
     1      0.2618    0.258804      0.965934    
     2      0.2618    0.258804      0.965934    
 return flag =    -4
 
  Using MF =        1
 
              T          Y1            Y2
 
     0      0.0000     0.00000       1.00000    
     1      0.2618    0.258793      0.965935    
     2      0.5236    0.499966      0.866035    
     3      0.7854    0.707068      0.707122    
     4      1.0472    0.865979      0.500025    
     5      1.3090    0.965878      0.258857    
     6      1.5708    0.999953      0.556852E-04
     7      1.5708    0.999953      0.556852E-04
 return flag =    -4
 
  Using MF =        2
 
              T          Y1            Y2
 
     0      0.0000     0.00000       1.00000    
     1      0.2618    0.258793      0.965936    
     2      0.5236    0.499967      0.866035    
     3      0.7854    0.707068      0.707122    
     4      1.0472    0.865979      0.500025    
     5      1.3090    0.965878      0.258857    
     6      1.5708    0.999953      0.557113E-04
     7      1.5708    0.999953      0.557113E-04
 return flag =    -4
 
cwg_ode_test():
  Normal end of execution.
 
26 September 2023   7:47:50.765 AM