Anonymous user
Set consolidation: Difference between revisions
Change unsage IO to monad IO
m (Added Sidef) |
(Change unsage IO to monad IO) |
||
Line 663:
| else = conso (r ++ [y]) ys</lang>
Usage:
<lang ela>open
:::IO
consolidate [['H','I','K'], ['A','B'], ['C','D'], ['D','B'], ['F','G','H']] |> writen $▼
consolidate [['A','B'], ['B','D']] |> writen</lang>▼
do
▲ x <- return $ consolidate [['H','I','K'], ['A','B'], ['C','D'], ['D','B'], ['F','G','H']]
putLn x
putLn y</pre>
=={{header|F_Sharp|F#}}==
|