20250512  210351.703
 
toms385_test():
  Fortran77 version
  Test toms385().
 
TEST01
  Test DEI to evaluate
  the exponential integral function.
 
          X         Exact Value      Computed
 
        0.5000    0.45421990        0.45421990    
        0.6000    0.76988129        0.76988129    
        0.7000     1.0649072         1.0649072    
        0.8000     1.3473965         1.3473965    
        0.9000     1.6228117         1.6228117    
        1.0000     1.8951178         1.8951178    
        1.1000     2.1673783         2.1673783    
        1.2000     2.4420923         2.4420923    
        1.3000     2.7213989         2.7213989    
        1.4000     3.0072075         3.0072075    
        1.5000     3.3012854         3.3012854    
        1.6000     3.6053199         3.6053199    
        1.7000     3.9209632         3.9209632    
        1.8000     4.2498676         4.2498676    
        1.9000     4.5937137         4.5937137    
        2.0000     4.9542344         4.9542344    
 
toms385_test():
  Normal end of execution.
 
20250512  210351.703