I am not able to write a helper function which does the same job as map and lambda
(define (permutations lst) (cond [(empty? lst) \'()] [(empty? (rest lst)) (li