All pastes #707450 Raw Edit

Unnamed

public text v1 · immutable
#707450 ·published 2007-09-22 22:48 UTC
rendered paste body
transform :: Doc -> Doc
transform
  = lines                >.>     --  Doc        ->  [Regel]
    (map readEntry)      >.>     --  [Regel]    ->  [Entry]
    sorteerOpNaam        >.>     --  [Entry]    ->  [Entry]
    groepeer             >.>     --  [Entry]    ->  [[Entry]]
    (map berekenScore)   >.>     --  [[Entry]]  ->  [Score]
    sorteerOpScore       >.>     --  [Score]    ->  [Score]
    (map showScore)      >.>     --  [Score]    ->  [Regel]
    unlines                      --  [Regel]    ->  [Doc]