The _ _CPYSN intrinsic has the following declaration:
double __CPYSN(double, double);
This intrinsic function performs a similar action as the _ _CPYS intrinsic, but where the sign of the first argument is negated before being combined with the magnitude of the second argument. This has the effect that the result has the opposite sign as the first argument, but has the magnitude of the second argument.