September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Flatten-a-list/Racket/flatten-a-list-3.rkt
+++ b/Task/Flatten-a-list/Racket/flatten-a-list-3.rkt
@ -1,6 +0,0 @@
-#lang racket
-(define (flatten l)
-  (cond [(empty? l)      null]
-        [(not (list? l)) (list l)]
-        [else            (append (flatten (first l)) (flatten (rest l)))]))
-(flatten '(1 (2 (3 4 5) (6 7)) 8 9))