P01.drl

package io.evacchi.github;

import io.github.evacchi.*;

dialect  "mvel"

rule "last0"
when
   $l : Last(list.tail == null)
then
    System.out.println("last is " + $l.getList().getHead());
end

rule "last1"
when
    $matched: Last($value: value, $list: list, list.tail != null)
then
    last = new Last($value, $list.getTail());
    insert(last)
    System.out.println("insert: "+last);
end

rule "query_last"
when
    Query($L: query)
then
    insert($L)
end