aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

tasks a-s

Browse source
This commit is contained in:
Ingy döt Net 2013-04-10 23:57:08 -07:00
parent 47bf37c096
commit b83f433714
12433 changed files with 156208 additions and 123 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Task/Remove-duplicate-elements/Maple/remove-duplicate-elements-1.maple Normal file
View file

@ -0,0 +1,5 @@
> L := [ 1, 2, 1, 2, 3, 3, 2, 1, "a", "b", "b", "a", "c", "b" ];
L := [1, 2, 1, 2, 3, 3, 2, 1, "a", "b", "b", "a", "c", "b"]
> [op]({op}(L));
[1, 2, 3, "a", "b", "c"]

2
Task/Remove-duplicate-elements/Maple/remove-duplicate-elements-2.maple Normal file
View file

@ -0,0 +1,2 @@
> convert( convert( L, 'set' ), 'list' );
[1, 2, 3, "a", "b", "c"]

3
Task/Remove-duplicate-elements/Maple/remove-duplicate-elements-3.maple Normal file
View file

@ -0,0 +1,3 @@
> A := Array( L ):
> for u in A do T[u] := 1 end: Array( [indices]( T, 'nolist' ) );
[1, 2, 3, "c", "a", "b"]