(define add1
  (lambda (n)
    (+ n 1)))


(define add42
  (lambda (n)
    (+ n 42)))


;;; data abstraction
(define add
  (lambda (n m)
    (+ n m)))


(define mult
  (lambda (n m)
    (* n m)))

;;; function abstraction
(define math
  (lambda (n m oper)
    (oper n m)))