The _ _CPYS intrinsic has the following declaration:
double __CPYS(double, double);
This intrinsic function returns the double-precision result of extracting the sign bit of the first argument and concatenating the exponent and fraction bits from the second argument. This has the effect that the result has the same sign as the first argument, but with the magnitude of the second argument.