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

Initial data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 72d218235f
commit f23f22d71c
199087 changed files with 3378941 additions and 0 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"]