main :: IO () main = putStrLn "Benchmarks not yet implemented"