Here are some implementations of build-in functions

;;add : number number -> number
;;to produce n+x without using operator +
;;example : (add 3 2) => 5
(define (add n x)
  (cond
    [(= x 0) n]
    [else
     (add1 (add n (sub1 x)))]))