Order two numerical lists: Difference between revisions
Rename Perl 6 -> Raku, alphabetize, minor clean-up
(add task to ARM64 assembly Raspberry Pi) |
Thundergnat (talk | contribs) (Rename Perl 6 -> Raku, alphabetize, minor clean-up) |
||
Line 211:
TRUE
</pre>
=={{header|Aime}}==
Line 295 ⟶ 294:
{{Out}}
<lang AppleScript>{false, true}</lang>
=={{header|ARM Assembly}}==
{{works with|as|Raspberry Pi}}
Line 453:
bx lr @ return
</lang>
=={{header|AutoHotkey}}==
{{works with|AutoHotkey_L}}
Line 1,445 ⟶ 1,446:
(20 40 51) comes before (20 17 78 34) : false
</pre>
=={{header|Perl 6}}==▼
There is already a built-in comparison operator.▼
<lang perl6>my @a = <1 2 4>;▼
my @b = <1 2 4>;▼
say @a," before ",@b," = ", @a before @b;▼
@a = <1 2 4>;▼
@b = <1 2>;▼
say @a," before ",@b," = ", @a before @b;▼
@a = <1 2>;▼
@b = <1 2 4>;▼
say @a," before ",@b," = ", @a before @b;▼
for 1..10 {▼
my @a = flat (^100).roll((2..3).pick);▼
my @b = flat @a.map: { Bool.pick ?? $_ !! (^100).roll((0..2).pick) }▼
say @a," before ",@b," = ", @a before @b;▼
}</lang>▼
{{out}}▼
<pre>1 2 4 before 1 2 4 = False▼
1 2 4 before 1 2 = False▼
1 2 before 1 2 4 = True▼
63 52 before 0 52 = False▼
17 75 24 before 31 75 24 = True▼
43 32 before 43 32 = False▼
73 84 before 2 84 = False▼
73 92 before 40 24 46 = False▼
16 24 before 41 24 = True▼
9 12 22 before 9 12 32 67 = True▼
81 23 before 81 23 = False▼
55 53 1 before 55 62 83 = True▼
20 40 51 before 20 17 78 34 = False</pre>▼
=={{header|Phix}}==
Line 1,686 ⟶ 1,653:
(lex<? '(1 2 3 4 5) '(1 2 3 4 4)) ; -> #f
</lang>
(formerly Perl 6)
▲There is already a built-in comparison operator.
▲<lang perl6>my @a = <1 2 4>;
▲my @b = <1 2 4>;
▲say @a," before ",@b," = ", @a before @b;
▲@a = <1 2 4>;
▲@b = <1 2>;
▲say @a," before ",@b," = ", @a before @b;
▲@a = <1 2>;
▲@b = <1 2 4>;
▲say @a," before ",@b," = ", @a before @b;
▲for 1..10 {
▲ my @a = flat (^100).roll((2..3).pick);
▲ my @b = flat @a.map: { Bool.pick ?? $_ !! (^100).roll((0..2).pick) }
▲ say @a," before ",@b," = ", @a before @b;
▲}</lang>
▲{{out}}
▲<pre>1 2 4 before 1 2 4 = False
▲1 2 4 before 1 2 = False
▲1 2 before 1 2 4 = True
▲63 52 before 0 52 = False
▲17 75 24 before 31 75 24 = True
▲43 32 before 43 32 = False
▲73 84 before 2 84 = False
▲73 92 before 40 24 46 = False
▲16 24 before 41 24 = True
▲9 12 22 before 9 12 32 67 = True
▲81 23 before 81 23 = False
▲55 53 1 before 55 62 83 = True
▲20 40 51 before 20 17 78 34 = False</pre>
=={{header|Rascal}}==
Line 1,945 ⟶ 1,947:
Onwaar
Waar</pre>
=={{header|VBScript}}==
<lang vb>
| |||