@@ -336,12 +336,12 @@ main = do
336336 Just opts@Options{..} ->
337337 case benchType of
338338 Linear -> benchShow opts cfg
339− { title = Just "100,000 elems" }
339+ { title = Just "Linear" }
340340 makeLinearGraphs
341341 "charts/linear/results.csv"
342342 "charts/linear"
343343 LinearAsync -> benchShow opts cfg
344− { title = Just "Async 10,000 elems" }
344+ { title = Just "Linear Async" }
345345 makeLinearAsyncGraphs
346346 "charts/linear-async/results.csv"
347347 "charts/linear-async"
@@ -349,17 +349,17 @@ main = do
349349 "charts/linear-rate/results.csv"
350350 "charts/linear-rate"
351351 Nested -> benchShow opts cfg
352− { title = Just "Nested loops 316 x 316 elems" }
352+ { title = Just "Nested loops" }
353353 makeNestedGraphs
354354 "charts/nested/results.csv"
355355 "charts/nested"
356356 NestedConcurrent -> benchShow opts cfg
357− { title = Just "Nested concurrent loops 316 x 316 elems" }
357+ { title = Just "Nested concurrent loops" }
358358 makeNestedGraphs
359359 "charts/nested-concurrent/results.csv"
360360 "charts/nested-concurrent"
361361 NestedUnfold -> benchShow opts cfg
362− { title = Just "Nested unfold loops 316 x 316 elems" }
362+ { title = Just "Nested unfold loops" }
363363 makeNestedGraphs
364364 "charts/nested-unfold/results.csv"
365365 "charts/nested-unfold"
@@ -379,7 +379,7 @@ main = do
379379 "charts/concurrent/results.csv"
380380 "charts/concurrent"
381381 Base -> do
382− let cfg' = cfg { title = Just "100,000 elems" }
382+ let cfg' = cfg { title = Just "Base stream" }
383383 if groupDiff
384384 then showStreamDVsK opts cfg'
385385 "charts/base/results.csv"