lisp - 在 lisp 中给一个符号一个负值

Question

我是 lisp 的新手，我正在研究基本语法。我正在尝试转换:
r1 = (-b + sqrt(b^2 - 4*a*c))/(2*a)
成 lisp 格式。我认为我遇到的唯一问题是我无法让 lisp 将 -b 识别为我的符号 b 的负值。这是我到目前为止从 lisp 提示中得到的:

[17]> (setq a 1L0)
1.0L0
[18]> (setq b -1L0)
-1.0L0
[19]> (setq c -1L0)
-1.0L0
[20]> (setq r1 (+ (/ (sqrt (- (power b 2) (* (* 4 a) c))) (* 2 a)) -b))

*** - EVAL: variable -B has no value
The following restarts are available:
USE-VALUE      :R1      You may input a value to be used instead of -B.
STORE-VALUE    :R2      You may input a new value for -B.
ABORT          :R3      Abort main loop

Answer 1

使用

(- b)

否定b。相当于

(- 0 b)