Hello,
 
Jess version = 6.1

For the rule...

(defrule MAIN::clear-need-answer
 "Clear need-answer if question has been answered"

 ;; If we need an answer ...
 ?r <- (MAIN::need-answer (ident ?id))

 ;; ... but already have the answer
 (MAIN::answer (ident ?id))

 =>

 ;; Print info
 (printout t "Retracting need-answer for question: " ?id crlf)

 ;; Retract need-answer for this question
 (retract ?r)
)

... Jess pretty-prints as:

Jess> (ppdefrule MAIN::clear-need-answer)
"(defrule MAIN::clear-need-answer
   \"Clear need-answer if question has been answered\"
   ?r <- (MAIN::need-answer (ident ?id))
   (not (MAIN::answer (ident ?id)))
   (MAIN::answer (ident ?id))
   =>
   (printout t \"Retracting need-answer for question: \" ?id crlf)
   (retract ?r))"

... where does the "not" come from?

Any help would be much appreciated. Thanks!
 
Hector Urroz

Reply via email to