'Deep recursion in Scheme

I have a problem with deep recursion in scheme The output should be

(1 2 3 (4 5))
  ~> ((1) (2) (3) ((4) (5)))

But my output is (1 (2 (3 ((4 (5 ())) ())))). It seems like the quote is at the wrong place I got these

(define (DoublebubbleLst lst)
  (cond ((null? lst) lst)
        ((not (pair? lst)) 
         (append lst))
        (else(list
              (DoublebubbleLst (car lst))     
              (DoublebubbleLst (cdr lst))))))

And what's my problem

scheme racket

Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution	Source

'Deep recursion in Scheme

Sources

Related Questions