Order two numerical lists: Difference between revisions
m
→{{header|Joy}}
m (→{{header|Picat}}: code tag for the operator) |
m (→{{header|Joy}}) |
||
Line 1,414:
=={{header|Joy}}==
<
DEFINE order ==
[equal] [false]
[[[[size] dip size <=] [[<=] mapr2 true [and] fold]] [i] map i and]
ifte.
</syntaxhighlight>
Using it:
|