FICL_BITS_PER_CELL
#define FICL_CELL_HIGH_BIT ((uintmax_t)1 << (FICL_BITS_PER_CELL-1))
#define UMOD_SHIFT (FICL_BITS_PER_CELL / 2)
#define UMOD_MASK ((1L << (FICL_BITS_PER_CELL / 2)) - 1)
(((ficl2Integer)(high)) << FICL_BITS_PER_CELL)))
(((ficl2Unsigned)(high)) << FICL_BITS_PER_CELL))
FICL_BITS_PER_CELL) - 1)))
((ficlUnsigned)(doubleu >> FICL_BITS_PER_CELL))