coolcmd.dat

来自「NASA 开发使用的一个专家系统」· DAT 代码 · 共 13 行

([initial-object] of INITIAL-OBJECT)

([t1] of TEST
   (x 100)
   (y a [t2] c d e f)
   (z nil))

([t2] of TEST
   (x nil)
   (y blah)
   (z [t1]))