(define double
  (lambda (x)
    (+ x x)))

(define triple
  (lambda (x)
    (+ x x x)))

(define silly-sum
  (lambda (x)
    (+ (double x)
       (triple x))))

(define silly-sum-2
  (lambda (x y)
    (+ (double x)
       (triple y))))