我尝试创建一个模板来存储一些我计算的结果，所以我做了以下初始化：

(deftemplate tempAlumne    (slot nota-media-total)    (slot nota-media-obligatorias)    (slot nota-media-optativas)    (slot nota-media-ales))(deffacts tempAlumneFacts    (tempAlumne         (nota-media-total -1)        (nota-media-obligatorias -1)        (nota-media-optativas -1)        (nota-media-ales -1)    ))

然后我尝试使用这个结构来存储值，但是我需要从许多规则访问它，所以我决定将其设为全局变量。所以我尝试像这样存储值：

(defrule calcula-nota-media ""    (not calcula-nota-media ok)    ?*tmpA* <- (tempAlumne )    =>    (bind ?llista_convocs (send ?*alumne* get-IConvocatoria))    (bind ?suma 0)    (bind ?i 0)     (while(< ?i (length$ ?llista_convocs)) do        (bind ?convoc_actual (nth$ ?i ?llista_convocs))        (bind ?suma (+ ?suma (send ?convoc_actual get-Nota)))        (bind ?i (+ ?i 1))    )       (/ )        (modify (?*tmpA* (nota-media-total (/ ?suma ?i))    (assert calcula-nota-media ok))

因为我希望?*tmpA*拥有初始值，然后使用modify来分配每个值（这里我分配nota-media-total），但是它显示“[PRNTUTIL2] 语法错误：检查defrule的适当语法。”，所以我不知道哪里出错了，或者我是否选择了错误的路径。

回答：

阅读用户指南会很有帮助，因为它涵盖了基本的语法。我纠正了你的一些错误：

(defrule calcula-nota-media ""    (not (calcula-nota-media ok))    ?tmpA <- (tempAlumne)    =>    (bind ?llista_convocs (send ?*alumne* get-IConvocatoria))    (bind ?suma 0)    (bind ?i 0)     (while(< ?i (length$ ?llista_convocs)) do        (bind ?convoc_actual (nth$ ?i ?llista_convocs))        (bind ?suma (+ ?suma (send ?convoc_actual get-Nota)))        (bind ?i (+ ?i 1))    )       ; (/ )  这是做什么用的？      (modify ?tmpA (nota-media-total (/ ?suma ?i)))    (assert (calcula-nota-media ok)))