test_toBucket :: Assertion
test_toBucket =
    assert $ isNothing $ toBucket (OrdPSQ.empty :: OrdPSQ.OrdPSQ Int Int Char)
test_toBucket :: Assertion
test_toBucket =
    assert $ isNothing $ toBucket (OrdPSQ.empty :: OrdPSQ.OrdPSQ Int Int Char)
test_toBucket =
    assert $ isNothing $ toBucket (OrdPSQ.empty :: OrdPSQ.OrdPSQ Int Int Char)