common-lisp - 常见的 lisp : is there a less painful way to input math expressions?

Question

我喜欢普通的 lisp，但有时输入简单的数学表达式真的很痛苦，比如

a(8b^2+1)+4bc(4b^2+1)

(当然可以转换，但是有点慢，我先写 (+ () ()) ，然后在每个括号里放 (* () ())...)

我想知道这里是否有人知道输入这个的更好方法。我正在考虑编写一个数学宏，其中

(math “a(8b^2+1)+4bc(4b^2+1)”) 

扩展到

(+ (* a (1+ (* 8 b b))) (* 4 b c (1+ (* 4 b b))))

但是对于名称很长的变量，解析是一个问题。

有人有更好的建议吗？

Answer 1

有用于此目的的阅读器宏。

见:http://www.cliki.net/infix

例如:

CL-USER 17 > '#I(a*(8*b^^2+1)+ 4*b*c*(4*b^^2+1) )
(+ (* A (+ (* 8 (EXPT B 2)) 1)) (* 4 B C (+ (* 4 (EXPT B 2)) 1)))

'是通常的报价。 #I( some-infix-expression )是读取器宏。