SICP Video Lecture 2

У меня проблема с этим примером

(define (+ x y)
  (if (= x 0)
      y
      (+ (-1+ x) (1+ y))))

В чем проблема с -1+ и 1+, когда я оцениваю его, я получаю этот результат

• DrScheme: -1+: эта функция не определена
• racket : reference to undefined identifier: -1+

но я пишу это вместо этого и это работает

(define (add x y)
  (if (= x 0)
      y
      (+ (- x 1) (+ y 1))))