prec_bit :: Int
prec_bit
  | b63 == 0  = b31
  | otherwise = b63
  where b63 = bit 63
        b31 = bit 31
{-| Return the precision of @x@, i.e., the number of bits used to store its significand. -}
prec_bit :: Int
prec_bit
  | b63 == 0  = b31
  | otherwise = b63
  where b63 = bit 63
        b31 = bit 31
{-| Return the precision of @x@, i.e., the number of bits used to store its significand. -}
prec_bit
  | b63 == 0  = b31
  | otherwise = b63
  where b63 = bit 63
        b31 = bit 31
{-| Return the precision of @x@, i.e., the number of bits used to store its significand. -}