nl_tokens: EXPONENT // FUNCTION : exponent ( x ) Returns an integer corresponding to the unbiased exponent of a double - precision floating - point number .
pl_tokens: function exponent ( x ) { // Extract from the input value a higher order word (unsigned 32-bit integer) which contains the exponent: <mask> high = getHighWord ( x ) ; // Apply a mask to isolate only the exponent bits and then shift off all bits which are part of the fraction: high = ( high & EXP_MASK ) >>> 20 ; // Remove the bias and return: return high - BIAS ; }