Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Remove-duplicate-elements/Lambdatalk/remove-duplicate-elements.lambdatalk
+++ b/Task/Remove-duplicate-elements/Lambdatalk/remove-duplicate-elements.lambdatalk
@ -0,0 +1,17 @@
+{def removedup
+ {def removedup.loop
+  {lambda {:a :b}
+   {if {A.empty? :a}
+    then :b
+    else {removedup.loop {A.rest :a}
+                         {if {= {A.in? {A.first :a} :b} -1}
+                          then {A.addlast! {A.first :a} :b}
+                          else :b}}}}}
+ {lambda {:s}
+  {S.replace (\[|\]|,) by space in
+   {A.disp
+    {removedup.loop {A.new :s} {A.new}}}}}}
+-> removedup
+
+{removedup 1 2 3 a b c 2 3 4 b c d}
+->  1 2 3 a b c 4 d