Anonymous user
Sorting algorithms/Bubble sort: Difference between revisions
→{{header|Euphoria}}
m (Undo revision 133288 by 94.139.167.104; incomprehensible reason given for removal) |
|||
Line 894:
"gamma"
}</pre>
=={{header|F#}}==
<lang fsharp>let BubbleSort (lst : list<int>) =
let rec sort accum rev lst =
match lst, rev with
| [], true -> accum |> List.rev
| [], false -> accum |> List.rev |> sort [] true
| x::y::tail, _ when x > y -> sort (y::accum) false (x::tail)
| head::tail, _ -> sort (head::accum) rev tail
sort [] true lst
</lang>
=={{header|Factor}}==
| |||