(defun foo (a b)
  (+ a b))

(defun bar (b c d)
  (* (foo b c) d))