bench_delete :: [Int] -> OrdPSQ.OrdPSQ Int Int () -> OrdPSQ.OrdPSQ Int Int ()
bench_delete keys t0 = foldl' (\t k -> OrdPSQ.delete k t) t0 keys
bench_delete :: [Int] -> OrdPSQ.OrdPSQ Int Int () -> OrdPSQ.OrdPSQ Int Int ()
bench_delete keys t0 = foldl' (\t k -> OrdPSQ.delete k t) t0 keys
bench_delete keys t0 = foldl' (\t k -> OrdPSQ.delete k t) t0 keys