cmpUi :: MPI -> ULong -> IO Ordering
cmpUi u v = gcry_mpi_cmp_ui u v >>= return . int2ord
cmpUi :: MPI -> ULong -> IO Ordering
cmpUi u v = gcry_mpi_cmp_ui u v >>= return . int2ord
cmpUi u v = gcry_mpi_cmp_ui u v >>= return . int2ord