Variables 公共Lisp变量addFraction未绑定

为什么它说变量

addFraction

未绑定

(defun addFraction (N1 D1 N2 D2)
  (format t "~d ~d"
          (+ (+ (lcm D1 D2) N1) (+ (lcm D1 D2) N2))
          (lcm D1 D2)))

当我运行代码时，它说：

#<THREAD "main thread" RUNNING {10010B0523}>:
  The variable ADDFRACTION is unbound.

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [CONTINUE   ] Retry using ADDFRACTION.
  1: [USE-VALUE  ] Use specified value.
  2: [STORE-VALUE] Set specified value and use it.
  3: [ABORT      ] Exit debugger, returning to top level.

(SB-INT:SIMPLE-EVAL-IN-LEXENV ADDFRACTION #<NULL-LEXENV>)
0]

#
变量ADDFRACTION未绑定。
键入“帮助”以获取调试器帮助，或键入（SB-EXT:EXIT）以退出SBCL。
重新启动（可通过数字或可能的缩写名称调用）：
0:[继续]使用ADDFRACTION重试。
1:[使用值]使用指定的值。
2:[存储值]设置指定值并使用它。
3:[中止]退出调试器，返回顶层。
（SB-INT:SIMPLE-EVAL-IN-LEXENV ADDFRACTION#）
0]

我的坏

当我调用我键入的函数时

addFunction（1 2 1 4）

而不是

---

（addFunction 1 2 1 4）

我的意思是写addFraction。。现在编辑代码时，我复制粘贴到sbcl命令行中，按enter键，没有显示错误，当我调用

addFraction

时，出现了错误