Common sorted list: Difference between revisions
add RPL
imported>Maxima enthusiast No edit summary |
(add RPL) |
||
Line 939:
<pre>
common sorted list elements are: [1,3,4,5,7,8,9]
</pre>
=={{header|RPL}}==
{{works with|HP|48G}}
≪ ∑LIST SORT → nums
≪ <span style="color:red">{ }</span>
<span style="color:red">1</span> nums SIZE '''FOR''' j
nums j GET
'''IF''' DUP2 POS '''THEN''' DROP '''ELSE''' + '''END'''
'''NEXT'''
≫ ≫ '<span style="color:blue">COMMON</span>' STO
<span style="color:red">{ { 5 1 3 8 9 4 8 7 } { 3 5 9 8 4 } { 1 3 7 9 } }</span> <span style="color:blue">COMMON</span>
{{out}}
<pre>
1: { 1 3 4 5 7 8 9 }
</pre>
Line 948 ⟶ 964:
<pre>[1, 3, 4, 5, 7, 8, 9]
</pre>
=={{header|V (Vlang)}}==
<syntaxhighlight lang="v (vlang)">
| |||