Order two numerical lists: Difference between revisions

m
m (→‎{{header|Picat}}: code tag for the operator)
Line 1,414:
 
=={{header|Joy}}==
<langsyntaxhighlight lang=Joy>
DEFINE order ==
[equal] [false]
[[[[size] dip size <=] [[<=] mapr2 true [and] fold]] [i] map i and]
ifte.
</syntaxhighlight>
</lang>
 
Using it:
153

edits