main :: IO ()
main = defaultMain [
  bgroup "Lorenz63" [ bench "steps=10k" $ whnf takeNth 10000
                    , bench "steps=100k" $ whnf takeNth 100000
                    ]
  ]
main :: IO ()
main = defaultMain [
  bgroup "Lorenz63" [ bench "steps=10k" $ whnf takeNth 10000
                    , bench "steps=100k" $ whnf takeNth 100000
                    ]
  ]
main = defaultMain [
  bgroup "Lorenz63" [ bench "steps=10k" $ whnf takeNth 10000
                    , bench "steps=100k" $ whnf takeNth 100000
                    ]
  ]