Function Scaled-Epsilon

( scaled-epsilon < float > &optional < operation > )
Return the smallest number that would return a value different from
FLOAT if OPERATION were applied to FLOAT and this number. OPERATION
should be either + or -, and defauls to +.