scvs - Coversine cvs(x)

#include <msca.h> 
 
double scvs (double x); 
float  scvsf(float x);

Given a value $x$ this function computes the coversine of $x$ , $cvs(x)$ .