shcv - Hacoversine hcv(x)

#include <msca.h> 
 
double shcv (double x); 
float  shcvf(float x);

Given a value $x$ this function computes the hacoversine of $x$ , $hcv(x)$ .