[jboss-svn-commits] JBL Code SVN: r26674 - labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance.
jboss-svn-commits at lists.jboss.org
jboss-svn-commits at lists.jboss.org
Thu May 21 23:36:25 EDT 2009
Author: dsotty
Date: 2009-05-21 23:36:25 -0400 (Thu, 21 May 2009)
New Revision: 26674
Removed:
labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest0.drl
labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest1.drl
labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/HelloWorld.drl
labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestDegrees.drl
labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestGEB.drl
labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestQuant.drl
Log:
Major update
Deleted: labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest0.drl
===================================================================
--- labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest0.drl 2009-05-22 03:33:19 UTC (rev 26673)
+++ labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest0.drl 2009-05-22 03:36:25 UTC (rev 26674)
@@ -1,42 +0,0 @@
-package org.drools.examples.chance
-
-
-
-import org.drools.examples.chance.Room;
-import java.io.FileWriter;
-
-
-global FileWriter writer;
-
-rule "Hot v1"
- when
- $r : Room( temperature hot[] 0 )
- then
- //System.out.println("Room is hot in degree "+drools.getConsequenceDegree());
- //System.out.println("Evaluator is called directly");
- writer.write("\n\n");
- writer.write("Room is hot in degree "+drools.getConsequenceDegree()+"\n");
- writer.write("Evaluator is called directly\n");
-end
-
-rule "Hot v2"
- when
- $r : Room( temperature seems[] hot )
- then
- //System.out.println("Room is hot in degree "+drools.getConsequenceDegree());
- //System.out.println("Evaluator from temp domain, requires a method in Room");
- writer.write("\n\n");
- writer.write("Room is hot in degree "+drools.getConsequenceDegree()+"\n");
- writer.write("Evaluator from temp domain, requires a method in Room\n");
-end
-
-rule "Hot v3"
- when
- $r : Room( temperature seems[] "cold" )
- then
- //System.out.println("Room is hot in degree "+drools.getConsequenceDegree());
- //System.out.println("Evaluator from temp domain, runtime call (no method in room)");
- writer.write("\n\n");
- writer.write("Room is hot in degree "+drools.getConsequenceDegree()+"\n");
- writer.write("Evaluator from temp domain, runtime call (no method in room)\n");
-end
Deleted: labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest1.drl
===================================================================
--- labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest1.drl 2009-05-22 03:33:19 UTC (rev 26673)
+++ labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/FuzzyTest1.drl 2009-05-22 03:36:25 UTC (rev 26674)
@@ -1,70 +0,0 @@
-package org.drools.examples.chance
-
-import org.drools.examples.chance.Room;
-import org.drools.examples.chance.Fan;
-import java.io.FileWriter;
-
-
-global FileWriter writer;
-
-
-
-
-rule "Cold"
- when
- $r : Room( temperature cold[] 0)
- then
- drools.inject(new Fan(),"org.drools.examples.chance.Fan.speed","seems","stop");
-end
-
-rule "Warm"
- when
- $r : Room( temperature cool[] 0)
- then
- drools.inject(new Fan(),"org.drools.examples.chance.Fan.speed","seems","stop");
-end
-
-
-
-rule "Hot"
- when
- $r : Room( temperature hot[] 0)
- then
- drools.inject(new Fan(),"org.drools.examples.chance.Fan.speed","seems","fast");
-end
-
-
-
-
-
-
-
-
-
-rule "Fan1"
- when
- $f : Fan( speed seems[] "fast")
- then
- $f.setSpeed("fast",drools.getConsequenceDegree());
- writer.write("\n\n ********** Set speed to fast ****** \n\n" + drools.getConsequenceDegree());
-end
-
-
-rule "Fan2"
- when
- $f : Fan( speed seems[] "slow")
- then
- $f.setSpeed("slow",drools.getConsequenceDegree());
- writer.write("\n\n ********** Set speed to slow ****** \n\n" + drools.getConsequenceDegree());
-end
-
-
-
-rule "Fan3"
- when
- $f : Fan( speed seems[] "stop")
- then
- $f.setSpeed("stop",drools.getConsequenceDegree());
- writer.write("\n\n ********** Set speed to stop ****** \n\n" + drools.getConsequenceDegree());
-end
-
Deleted: labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/HelloWorld.drl
===================================================================
--- labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/HelloWorld.drl 2009-05-22 03:33:19 UTC (rev 26673)
+++ labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/HelloWorld.drl 2009-05-22 03:36:25 UTC (rev 26674)
@@ -1,68 +0,0 @@
-package org.drools.examples.chance
-
-import org.drools.examples.chance.Test.Trigger;
-import org.drools.examples.chance.Test.Message;
-import org.drools.examples.chance.Test.Exercise;
-import org.drools.examples.chance.Test.Person;
-import org.drools.examples.chance.Test.Book;
-import java.io.FileWriter;
-
-
-global FileWriter writer;
-
-
-rule "Trigger"
- when
- Trigger();
- then
- writer.write("\n A Message with status = HELLO will hold the message Hello!");
- drools.inject(new Message(Message.HELLO),"org.drools.examples.chance.Test$Message.message","String ==","Hello!");
-end
-
-
-
-rule "Synch"
- when
- $m : Message( message == "Hello!" )
- then
- writer.write("\n\nSynched rule fires at "+drools.getConsequenceDegree());
- writer.write("\nDeclared message is "+$m.getMessage()+ " but is thought to be Hello!");
-
-
- Person p = new Person("davide",27);
- Book b = new Book("Drools Manual",p);
- writer.write("\n Now stating Davide owns a Drools Manual");
-
- //FIXME Until lexical analysis is done properly, args must be defined in two steps
- Object[] args = new Object[] { p , b };
- drools.inject(args,"org.drools.examples.chance.Test$Book.owner","Object ==","$p");
-end
-
-
-
-rule "BetaSynch"
- when
- $p : Person( name == "davide" , age > 25 || age < 18)
- $b : Book( owner == $p )
- then
- writer.write("\n\n\nBook has no a-priori known owner\n");
- writer.write("Book.owner = "+$b.getOwner()+"\n");
- writer.write("Info comes from rule, evaluation is "+drools.getConsequenceDegree()+"\n");
-
- writer.write("\n\nSo, an exceptional exercise will be done\n\n");
- Exercise e = new Exercise("Rule Programming");
- drools.inject(e,"Exceptional");
-end
-
-
-//This is a rule with false implication, meaning that all conclusions are undetermined
-//Filter strat propagates as soon as some info is available
-rule "Exceptional"
- @degree( 0 )
- @filterStrat( org.drools.reteoo.filters.AlwaysPassFilterStrategy )
- when
- $e : Exercise( $t : topic)
- then
- writer.write("\nEx "+ $t +" can be done? Answer is " + drools.getConsequenceDegree());
-end
-
Deleted: labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestDegrees.drl
===================================================================
--- labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestDegrees.drl 2009-05-22 03:33:19 UTC (rev 26673)
+++ labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestDegrees.drl 2009-05-22 03:36:25 UTC (rev 26674)
@@ -1,35 +0,0 @@
-package org.drools.examples.chance
-
-
-import org.drools.examples.chance.TestDegrees.Message;
-import java.io.FileWriter;
-
-
-global FileWriter writer;
-
-rule "TestOpDegs"
- when
-
- (Message( status == 0 && status == 1 )
- or
- Message(status not random[] 2))
-
-
- not (Message(status random[] 3)
- and
- Message(status random[] 4)
- )
-
- Message(status random[] 5)
-
-
- then
-
- System.out.println("Degrees test " + drools.getEvaluation().expand());
-
- writer.write("Degrees test " + drools.getEvaluation().expand());
-
- System.out.println("Final output " + drools.getConsequenceDegree());
-end
-
-
Deleted: labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestGEB.drl
===================================================================
--- labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestGEB.drl 2009-05-22 03:33:19 UTC (rev 26673)
+++ labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestGEB.drl 2009-05-22 03:36:25 UTC (rev 26674)
@@ -1,208 +0,0 @@
-package org.drools.chance;
-
-
-import org.drools.chance.TestGEB.Message;
-import org.drools.chance.TestGEB.Foo;
-import java.io.FileWriter;
-
-
-global FileWriter writer;
-
-
-rule "System check"
- when
- then
- System.out.println("Rule: Drools is up");
-end
-
-
-
-
-
-/*
-
-rule ConstrParams
- when
- Message(
- status ==
- @( id="k1" )
- 0
-
- & @( id="k9" )
-
- status random
-
- &&
-
- status != 0
-
- ) @( id="k2" )
-
- and @( id="k3" )
-
- Message(
- status >
- @( id="k4" )
- -1
- ) @( id="k5" )
-
-
-
- then
- writer.write("Source1 Rule fired " + drools.getEvaluation().expand()+"\n\n");
-
-end
-
-
-*/
-
-
-
-
-/*
-rule Source1
- when
- Message( status == 0 !)
- then
- writer.write("Source1 Rule fired " + drools.getEvaluation().expand()+"\n\n");
-
- Foo foo = new Foo(0);
- drools.inject(foo,"org.drools.chance.TestGEB$Foo.j","Integer ==","0");
- drools.inject(foo,"class","==","org.drools.chance.TestGEB$Foo");
-end
-
-
-rule Source2
- when
- Message( status < 1 !)
- then
- writer.write("Source2 Rule fired " + drools.getEvaluation().expand()+"\n\n");
- drools.injectId(new Foo(0),"idEql");
- drools.injectId(new Foo(0),"idClass");
-end
-
-
-rule Trigger
- when
- Message( status == 2 !)
- then
- writer.write("Foo generated \n\n");
- Foo foo = new Foo(0);
- insert(foo);
-end
-
-
-rule Target
- when
- Foo ( j ==@idEql 0 )@idClass
- then
- writer.write("Target Rule fired " + drools.getEvaluation().expand()+"\n\n");
-end
-
-*/
-
-
-
-/*
-rule "TestZ"
-
- when
- Message(status > 2 &@idAnd status < 3 && status random[99]@idCustom !) @idClass1
- Message(status < 1 && (status > 3 |[Lukas]@idOr ! status ==@idStandard 2)) @idClass2
-
- then
- writer.write("Test Rule fired " + drools.getEvaluation().expand());
-end
-*/
-
-
-
-/*
-rule "TestEquiv"
- when
-
- ( equiv
-
- $m : Message(status random[] 0)
- $n : Message(status random[] 1)
-
- )
-
-
- then
- System.out.println("Rule fired "+ $m);
- writer.write("Test Rule fired " + drools.getEvaluation().expand());
-end
-*/
-
-
-
-/*
-rule "TestX"
- when
- (
- and[Lukas]
- Message(status random[] 0 || [Lukas] status random[] 1)
-
- Message(status == 1)
- )
- then
- writer.write("Test Rule fired " + drools.getEvaluation().expand());
-end
- */
-
-/*
-rule "TestY"
- prior (0.432)
- entail_mode "equivalence"
- filter_str "org.drools.reteoo.filters.AlwaysPassFilterStrategy"
-
-
- when
- very Message(status ~random, status < 1)
- very very $m : Message(status ~random, status < 2)
- then
- writer.write("Test Rule fired " + drools.getEvaluation().expand());
-end
-*/
-
-
-
-
-
-
-
-/*
-rule "TestGEB"
- when
- (
- Message(status == 0)
- and[Lukas]
- Message(status == 1)
- )
-
-
- or[Lukas]
-
- ((
- or[Lukas]
- Message(status == 2)
-
- Message(status == 3)
- ))
-
-
- Message(status == 4)
-
- then
-
- System.out.println("CE Builder RULE");
- writer.write("Test Rule fired " + drools.getEvaluation().expand());
-
-end
-
-*/
-
-
-
-
Deleted: labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestQuant.drl
===================================================================
--- labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestQuant.drl 2009-05-22 03:33:19 UTC (rev 26673)
+++ labs/jbossrules/branches/DroolsChance/drools-examples/drools-examples-drl/src/main/rules/org/drools/examples/chance/TestQuant.drl 2009-05-22 03:36:25 UTC (rev 26674)
@@ -1,272 +0,0 @@
-package org.drools.examples.chance
-
-
-import org.drools.chance.TestQuantifiers.Message;
-import java.io.FileWriter;
-
-
-global FileWriter writer;
-
-/*
-//Check that join works properly
-rule "Test Join"
- when
-
- m: Message(status == 0)
- n : Message(status == 1)
- then
- writer.write("\n\n Tested couple "+m.getMessage() + " " + n.getMessage() +"\n");
- writer.write("Simple Join check "+drools.getConsequenceDegree()+"\n");
- System.out.println("Existential check "+drools.getConsequenceDegree()+"\n");
-end
-*/
-
-
-
-/*
-//check also GE joins with bindings
-rule "Test Join 2"
- when
-
- m : Message( status == 1)
- and
- p : Message( this == m, status == 1)
-
- then
- writer.write(m.getMessage() + " " + p.getMessage());
- writer.write("Self-Join check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
- System.out.println(m.getMessage() + " " + p.getMessage());
-end
-*/
-
-
-/*
-//check also GE joins with bindings
-rule "Test Join 2bis"
- when
-
- m : Message()
- p : Message( this == m, status > -1)
- q : Message( this == m, status < 2)
-
- then
- writer.write(m.getMessage() + " " + p.getMessage() + q.getMessage() + "\n");
- writer.write("Self-Join check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
- System.out.println(m.getMessage() + " " + p.getMessage());
-end
-*/
-
-
-
-/*
-//Test exist quantifier
-rule "Test Exist 3"
- when
- exists (
- Message( status == 2)
- )
- then
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-
-end
-*/
-
-
-/*
-// Test quantifier with GEs
-rule "Test Exist 4"
- when
- exists (
- Message( status == 0 )
- and
- Message( status == 1)
- )
- then
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-end
-*/
-
-
-
-/*
-// Test external variable binding
-rule "Test Exist 5"
- when
- $m : Message($s : status == 0)
- exists ( Message(status > $s) )
- then
- writer.write("\n\n Conditional join with existence\n");
- writer.write("\t Rule triggered for " + $m.getMessage() + "\n");
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-
-end
-*/
-
-
-
-/*
-//Test simple forall using exist
-rule "Test Exist 6"
- when
- not (
- exists (
- not ( Message( status random[] 0 )
-
- ) ) )
- then
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-
-end
-*/
-
-
-
-
-
-/*
-rule "Test Exist 7"
- when
- forall (
- Message( status < 2 )
- )
- then
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-
-end
-*/
-
-
-/*
-rule "Test Exist 7bis"
- when
- Message( status == 2 )
- forall (
- Message( status < 3 )
- )
- then
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-
-end
-*/
-
-
-
-
-/*
-rule "Test Exist 8"
- when
- Message( status == 1)
- forall (
- m : Message()
- Message( this == m , status <= 1)
- Message( this == m , status > -1)
- )
- then
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-
-end
-
-*/
-
-
-
-
-
-
-
-
-
-
-/*
-//Complex nesting and conversion
-rule "Test Exist 8"
- when
- not ( exists (
- m : Message()
- and
- not (
- exists (
- Message( this == m , status <= 1)
- and
- Message( this == m , status > -2)
- )
- )
- )
- )
- then
-
- writer.write("Existential check "+drools.getConsequenceDegree()+"\n"+drools.getEvaluation().expand()+"\n\n");
- System.out.println("Existential check "+drools.getConsequenceDegree());
-
-end
-*/
-
-
-
-
-
-
-rule "TestCut 1"
- when
- $m : Message( status > 0 ) !
- Message( this == $m , $s : status random[] 0 )
- then
- writer.write("Rule with cut fires \n");
- writer.write(drools.getEvaluation().expand() + "\n");
-end
-
-
-
-/*
-rule "TestCut 2"
- when
- $m : Message( status > 0)
- Message( this == $m , status random[] 1)
- then
- writer.write("Rule without cut fires \n");
- writer.write(drools.getEvaluation().expand() + "\n");
-end
- */
-
-
-
-
-
-/*
-rule "Test Forany 9"
- when
-
- forany (
- $m : Message( )
- subject_to Message( this == $m ! , status < 3 )
- weight Message( this == $m ! , status random[] 2 )
- )
-
- then
-
- writer.write("Forany "+drools.getEvaluation().expand()+"\n");
-
-end
-*/
-
-
-
-
-
-
More information about the jboss-svn-commits
mailing list