Order two numerical lists: Difference between revisions
Content added Content deleted
(J) |
(Added PicoLisp) |
||
| Line 338: | Line 338: | ||
say order_array(@a,@b); # true |
say order_array(@a,@b); # true |
||
</lang> |
</lang> |
||
=={{header|PicoLisp}}== |
|||
The built-in comparison functions already do this (not only for lists of numbers, but for any arbitrary data type). |
|||
<lang PicoLisp>: (> (1 2 0 4 4 0 0 0) (1 2 1 3 2)) |
|||
-> NIL</lang> |
|||
=={{header|Pike}}== |
=={{header|Pike}}== |
||