(define nodes-down (lambda (n node-list) (if (= n 0) node-list (nodes-down (- n 1) (node-rest node-list)))))