June 2018 Update

This commit is contained in:
Ingy döt Net 2018-06-22 20:57:24 +00:00
parent ba8067c3b7
commit 22f33d4004
5278 changed files with 84726 additions and 14379 deletions

View file

@ -0,0 +1,25 @@
import extensions.
import system'routines.
extension $op
{
bogoSorter
[
var list := self.
until (list isAscendant)
[
list := list randomize(list length).
].
^ list
]
}
program =
[
var list := (3, 4, 1, 8, 7, -2, 0).
console printLine("before:", list).
console printLine("after :", list bogoSorter).
].