Scieneer Common Lisp 1.3.9 online documentation

float-sign float1 &optional float2[Function]

Returns a floating-point number that has the same sign as float1 and, if float2 is given, has the same absolute value as float2.