19 lines
240 B
Text
19 lines
240 B
Text
(=c =b =a (a -> b -> c ->) => '> sort -> c @ b @ a @) :sort3
|
|
|
|
"lions, tigers, and" :x
|
|
"bears, oh my!" :y
|
|
"(from the \"Wizard of OZ\")" :z
|
|
|
|
'x 'y 'z sort3
|
|
x puts!
|
|
y puts!
|
|
z puts!
|
|
|
|
77444 :x
|
|
-12 :y
|
|
0 :z
|
|
|
|
'x 'y 'z sort3
|
|
x puts!
|
|
y puts!
|
|
z puts!
|