sci - Cosine Integral Ci(x)

#include <msca.h> 
 
double sci (double x); 
float  scif(float x);

Given a value $x$ this function computes the Cosine Integral:

∫ xcos(x) Ci(x)= 0 x dx