我正在使用 CLIPS,但在尝试在空列表中添加实例时遇到了麻烦。我正在使用 insert$ 函数,但似乎无法正常工作。具体代码是这样的:
(loop-for-count (?i 1 (length$ ?listaConvocatoriasAlumno))
(if (neq (nth$ ?i ?listaConvocatoriasAlumno) ?convocatoria)
then
(if (eq (str-compare (send (instance-address * (nth$ ?i ?listaConvocatoriasAlumno)) get-cuadrimestre) ?cuadrimestre) 0)
then
(insert$ ?listaConvocatoriasMismoCuadrimestre (+ (length$ ?listaConvocatoriasMismoCuadrimestre) 1) (nth$ ?i ?listaConvocatoriasAlumno))
)
)
)
?listaConvocatoriasAlumno 包含某个类的多个实例,我想将其中的一些添加到另一个列表中(在这种情况下是 ?listaConvocatoriasMismoCuadrimestre),该列表在循环的开头是空的。
任何想法?
非常感谢您!