I think Roger Studner wrote:
>
> (deftemplate employee
> (slot salary))
> (deffacts employee-facts
> (employee (salary 1007700))
> (employee (salary 1002347700))
> (employee (salary 107712000))
> )
> (watch all)
> (reset)
>
> (defrule count-highly-paid-employees
> ?c <- (accumulate (bind ?count 0
Thanks so much!
I wanted to say.. that what made me think something was 'amiss'.. is that
the accumulate example from the web page:
(deftemplate employee
(slot salary))
(deffacts employee-facts
(employee (salary 1007700))
(employee (salary 1002347700))
(employee (salary 107712000))
)
(watch all)
(
I think Roger Studner wrote:
>
> (defrule count-icd9-codes
>
> ?c <- (accumulate (bind ?count 0) ;; initializer
> (bind ?count (+ ?count 1)) ;; action
> ?count ;; result
> (encounter (code ?c &: (eq ?c 440)))
> )
...
> This (and anything in the accumlat
Fun one with Accumulate:
(deftemplate encounter
(slot date)
(slot code))
(reset)
(assert (encounter (date "2005-10-31") (code 440)))
(assert (encounter (date "2005-10-31") (code 440)))
(assert (encounter (date "2005-10-31") (code 777.1)))
(assert (encounter (date "2005-10-31") (code 468.
How about:
(bind ?string (call "string1" concat "string2"))
(bind ?symbol (sym-cat ?string))
(build (str-cat "(assert (" ?symbol "10))"))
Henrique
---
[EMAIL PROTECTED] wrote:
I am sorry, I should have been more detailed. What I want to do is
somethink like this:
(bind ?string (call "string1
I am sorry, I should have been more detailed. What I want to do is
somethink like this:
(bind ?string (call "string1" concat "string2"))
(bind ?symbol (sym-cat ?string))
(assert ?symbol 10)
This code does not work because the first argument of the assert function
is expected to be a symbol, and n
I think [EMAIL PROTECTED] wrote:
> How can I convert a string into a symbol?
In Java,
String string = "whatever";
Value symbol = new Value(string, RU.SYMBOL);
In Jess,
(bind ?string "whatever")
(bind ?symbol (sym-cat ?string))
This might be a simple question but I have not been able to find the
solution by myself. I need to assert some ordered facts dynamically and I
have to assess the head of the list by concatenating two strings. The Java
concat function returns a string value, but the Jess assert function needs
its fi