shcvpi - Half-Cycle Hacoversine hcv(πx)

#include <msca.h> 
 
double shcvpi (double x); 
float  shcvpif(float x);

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