(defun half (n) (* n 0.5)) (defun average (x y) (half (+ x y))) (trace) ; returns list of traced functions (trace half average) (average 7 5) ; tree of calls printed into repl (untrace half) (untrace) ; untraces all