{-# LANGUAGE RankNTypes, OverloadedStrings #-}

module Main where

import qualified BenchIncremental

-- import           Criterion
import           Criterion.Main
import           Criterion.Config
-- import           Data.Monoid

main :: IO ()
main = defaultMainWith Main.config (return ()) $
       BenchIncremental.component 0.1 [1..100000]

config :: Config
config = defaultConfig  { cfgSamples = ljust 10 }