Maxima CAS中的函数定义

Question

我有一个函数：

GiveBTree(z, depthMax):=block(
[ zz, t1, t2, tmp],
zz :[], 
t1 :[z], 
t2 :[], 
tmp  :[], 

for depth : 1 thru depthMax step 1 do (


for z in t1 do (
tmp : Give2Preimages(z),
zz : append(tmp, zz),
t2 : append(tmp, t2)

)

tmp:[],
t1:t2 

),

zz:flatten(zz),     
return (zz)
)$

当我把它放在Maxima中时，我有：

Maxima 5.43.2 http://maxima.sourceforge.net
using Lisp GNU Common Lisp (GCL) GCL 2.6.12
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1) GiveBTree(z, depthMax):=block(
[ zz, t1, t2, tmp],
zz :[], 
t1 :[z], 
t2 :[], 
tmp  :[], 
Display all 2857 possibilities? (y or n)
JACOBI_CD
!                                      JACOBI_CN
!!                                     JACOBI_CS
#                                      JACOBI_DC
$                                      JACOBI_DN

这个问题似乎是在tmp之后开始的。

所以我检查了一下：

• 谷歌搜索：maximacas"显示所有">
• Maxima函数索引
• description(tmp(

这个定义有什么问题？

Answer 1

我已经完成了Robert Dodier所说的步骤：

(%i2) load("g.mac");
(%o2)                                g.mac

所以这个问题是由"；复制粘贴"；。