11 August 2025   9:06:38.010 AM
 
cosine_integral_test():
  Fortran90 version
  Test cosine_integral().

ci_plot():
  Plot the cosine integral ci(x).

  Created graphics data file "ci_data.txt".
  Created graphics command file "ci_commands.txt".
 
ci_test():
  ci() evaluates the Cosine Integral function CI(X).
 
          X           CI(X)
 
    0.500000       -0.1777840788066129     -0.1777840788066129    
    0.600000       -0.2227070695927976E-01 -0.2227070695927979E-01
    0.700000        0.1005147070088978      0.1005147070088978    
    0.800000        0.1982786159524672      0.1982786159524672    
    0.900000        0.2760678304677729      0.2760678304677728    
     1.00000        0.3374039229009681      0.3374039229009682    
     1.20000        0.4204591828942405      0.4204591828942404    
     1.40000        0.4620065850946773      0.4620065850946772    
     1.60000        0.4717325169318778      0.4717325169318777    
     1.80000        0.4568111294183369      0.4568111294183367    
     2.00000        0.4229808287748650      0.4229808287748649    
     2.50000        0.2858711963653835      0.2858711963653835    
     3.00000        0.1196297860080003      0.1196297860080005    
     3.50000       -0.3212854851248112E-01 -0.3212854851248127E-01
     4.00000       -0.1409816978869304     -0.1409816978869304    
     4.50000       -0.1934911221017388     -0.1934911221017388    
 
cosine_integral_test():
  Normal end of execution.
 
11 August 2025   9:06:38.011 AM