[jboss-svn-commits] JBL Code SVN: r13359 - labs/jbossrules/trunk/drools-examples/src/main/rules/org/drools/examples/conway.

[jboss-svn-commits at lists.jboss.org]

Author: tirelli
Date: 2007-07-11 09:51:51 -0400 (Wed, 11 Jul 2007)
New Revision: 13359

Modified:
   labs/jbossrules/trunk/drools-examples/src/main/rules/org/drools/examples/conway/conway.drl
Log:
Fixing conways

Modified: labs/jbossrules/trunk/drools-examples/src/main/rules/org/drools/examples/conway/conway.drl
===================================================================
--- labs/jbossrules/trunk/drools-examples/src/main/rules/org/drools/examples/conway/conway.drl	2007-07-11 13:36:51 UTC (rev 13358)
+++ labs/jbossrules/trunk/drools-examples/src/main/rules/org/drools/examples/conway/conway.drl	2007-07-11 13:51:51 UTC (rev 13359)
@@ -16,7 +16,7 @@
 when
     CellGrid( $numberOfColumns : numberOfColumns )
 	$cell: Cell( $row : row > 0, $col : col < ( $numberOfColumns - 1 ) )			
-	$northEast : Cell( row  == ($row - 1), col == $col )	
+	$northEast : Cell( row  == ($row - 1), col == ( $col + 1 ) )	
 then					
 	insert( new Neighbor( $cell, $northEast ) );
 	insert( new Neighbor( $northEast, $cell ) );		
@@ -45,7 +45,7 @@
 rule "register west"
 	agenda-group "register neighbor"
 when
-	$cell: Cell( $row : row > 0, $col : col > 0 )			
+	$cell: Cell( $row : row >= 0, $col : col > 0 )			
 	$west : Cell( row  == $row, col == ( $col - 1 ) )						
 then		
 	insert( new Neighbor( $cell, $west ) );