;Bo ngoac
(define (lamPhangDS L)
(cond ((null? L) '())
((list? (car L)) (append (lamPhangDS (car L)) (lamPhangDS (cdr L))))
(else (cons (car L) (lamPhangDS (cdr L))))))
(lamPhangDS '(a b c (d ...
↧