Ошибка +j+j

 (deffacts rep
 (rep Alejnov Odessa)
 (rep Ladak Odessa)
 (rep Slobodjanjuk Lvov)
 (rep Klitka Lvov)
 (rep Bojko Kiev)
 (rep Pustovit Odessa)
 (rep Spokojnij Odessa)
 (rep Shamis Odessa)
 (rep Lobovko Kiev)
 (rep Zadorozhna Lvov)
 (rep Javorskij Lvov))

(defglobal ?*odessa* = 0)
 (defglobal ?*kiev* = 0)
 (defglobal ?*lvov* = 0)

 (defrule start
 (initial-fact)
 =>
 (printout t crlf "REPRESENTATIVES" crlf)

 (defrule odessa
 (rep ? Odessa)
 =>
 (bind ?*odessa* (+ ?*odessa* 1)))

 (defrule kiev
 (rep ? Kiev)
 =>
 (bind ?*kiev* (+ ?*kiev* 1)))

 (defrule lvov
 (rep ? Lvov)
 =>
 (bind ?*lvov* (+ ?*lvov* 1)))

 (defrule result
 (declare (salience -1))
 (initial-fact)
 =>
 (printout t "from Odessa: " ?*odessa* crlf)
 (printout t "from Kiev: " ?*kiev* crlf)
 (printout t "from Lvov: " ?*lvov* crlf))

(defrule MAIN::start
   (initial-fact)
   =>
   (printout t crlf "REPRESENTATIVES" crlf)
   (defrule

[CSTRCPSR1] WARNING: Redefining defrule: kiev +j+j

[CSTRCPSR1] WARNING: Redefining defrule: lvov +j+j

[CSTRCPSR1] WARNING: Redefining defrule: result +j+j
FALSE