Stop show with sound -- Keyboard shortcut: 'x'  Next slide in show -- Keyboard shortcut: 'n'  6 secondsName binding, Recursion, Iteration, and Continuations - slide 42 : 42

Practical example: Searching a binary tree
Searching a binary tree involves a recursively defined tree traversal

If we find the node we are looking for it is convenient to throw the out of the tree traversal


(define (find-in-tree tree pred)
  (lambda (found)
       (lambda (tree pred)
            (if (pred tree)
                (found tree)
                (let ((subtrees (subtree-list tree)))
                      (lambda (subtree) (find-in-tree1 subtree pred))
    (find-in-tree1 tree pred)))  ))