Still some bugs in rules generated from rule-language source. However,
a great deal does work.
This commit is contained in:
parent
e1ed824aff
commit
7375b668c0
2 changed files with 7 additions and 5 deletions
|
|
@ -190,9 +190,9 @@
|
|||
(cond (and (= comp1 "equal") (= comp2 "to"))
|
||||
(gen-neighbours-condition comparator quantity property value remainder '=)
|
||||
(and (= comp1 "more") (= comp2 "than"))
|
||||
(gen-neighbours-condition '> quantity property value remainder '>)
|
||||
(gen-neighbours-condition comparator quantity property value remainder '>)
|
||||
(and (= comp1 "less") (= comp2 "than"))
|
||||
(gen-neighbours-condition '< quantity property value remainder '<)
|
||||
(gen-neighbours-condition comparator quantity property value remainder '<)
|
||||
))))))
|
||||
|
||||
(defn parse-some-neighbours-condition
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue