Order two numerical lists: Difference between revisions
Content added Content deleted
(→{{header|J}}: focus on numeric lists and ensure length one vector and scalar are treated the same) |
No edit summary |
||
| Line 891: | Line 891: | ||
{1, 5, 1, 5, 4} > {1, 3, 5, 3, 2, 10, 1} |
{1, 5, 1, 5, 4} > {1, 3, 5, 3, 2, 10, 1} |
||
</pre> |
</pre> |
||
=={{header|Maple}}== |
|||
<lang Maple>orderLists := proc(num1,num2) |
|||
local len1, len2,i: |
|||
len1,len2 := numelems(num1),numelems(num2): |
|||
for i to min(len1,len2) do |
|||
if num1[i] <> num2[i] then |
|||
return evalb(num1[i]<num2[i]): |
|||
end if: |
|||
end do: |
|||
return evalb(len1 < len2): |
|||
end proc:</lang> |
|||
=={{header|Mathematica}}== |
=={{header|Mathematica}}== |
||