benchmarks :: [Benchmark]
benchmarks = [ benchSized ("2^" ++ show i) (2^i)
             | i <- [4,8,12,16,20::Int]]
benchmarks :: [Benchmark]
benchmarks = [ benchSized ("2^" ++ show i) (2^i)
             | i <- [4,8,12,16,20::Int]]
benchmarks = [ benchSized ("2^" ++ show i) (2^i)
             | i <- [4,8,12,16,20::Int]]