Sorting algorithms/Bogosort: Difference between revisions
Content added Content deleted
(Modula-3) |
|||
Line 233: | Line 233: | ||
isSorted _ = True |
isSorted _ = True |
||
-- |
-- from http://www.haskell.org/haskellwiki/Random_shuffle |
||
shuffle :: [a] -> IO [a] |
shuffle :: [a] -> IO [a] |
||
shuffle xs = do |
shuffle xs = do |
||
Line 257: | Line 257: | ||
[1,2,4,5,7,12,18,23] |
[1,2,4,5,7,12,18,23] |
||
</pre> |
</pre> |
||
=={{header|Icon}}== |
=={{header|Icon}}== |
||