From a90ad2b2f164797e812543399f58ae22f02fbfcb Mon Sep 17 00:00:00 2001 From: "wayo.cavazos" Date: Mon, 6 Feb 2006 19:43:32 +0000 Subject: [PATCH] clean up after testing --- contrib/x11/examples/automata.factor | 2 -- contrib/x11/examples/boids.factor | 14 -------------- 2 files changed, 16 deletions(-) diff --git a/contrib/x11/examples/automata.factor b/contrib/x11/examples/automata.factor index d785eb952a..10acd2ca3a 100644 --- a/contrib/x11/examples/automata.factor +++ b/contrib/x11/examples/automata.factor @@ -11,12 +11,10 @@ math-contrib threads strings arrays prettyprint xlib x ; SYMBOL: rule -! 8 rule set 8 rule set-global SYMBOL: char-0 -! 48 char-0 set 48 char-0 set-global : rule-keys ( -- { ... } ) diff --git a/contrib/x11/examples/boids.factor b/contrib/x11/examples/boids.factor index 2c9ec01089..0748f2dd3d 100644 --- a/contrib/x11/examples/boids.factor +++ b/contrib/x11/examples/boids.factor @@ -6,37 +6,24 @@ USING: namespaces math kernel sequences arrays xlib x ; ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! -! SYMBOL: separation-radius 100 separation-radius set -! SYMBOL: alignment-radius 100 alignment-radius set -! SYMBOL: cohesion-radius 100 cohesion-radius set - SYMBOL: separation-radius 100 separation-radius set-global SYMBOL: alignment-radius 100 alignment-radius set-global SYMBOL: cohesion-radius 100 cohesion-radius set-global ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! -! SYMBOL: separation-view-angle 90 separation-view-angle set -! SYMBOL: alignment-view-angle 90 alignment-view-angle set -! SYMBOL: cohesion-view-angle 90 cohesion-view-angle set - SYMBOL: separation-view-angle 90 separation-view-angle set-global SYMBOL: alignment-view-angle 90 alignment-view-angle set-global SYMBOL: cohesion-view-angle 90 cohesion-view-angle set-global ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! -! SYMBOL: separation-weight 1.0 separation-weight set -! SYMBOL: alignment-weight 0.5 alignment-weight set -! SYMBOL: cohesion-weight 1.0 cohesion-weight set - SYMBOL: separation-weight 1.0 separation-weight set-global SYMBOL: alignment-weight 0.5 alignment-weight set-global SYMBOL: cohesion-weight 1.0 cohesion-weight set-global ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! -! SYMBOL: world-size { 400 400 } world-size set SYMBOL: world-size { 400 400 } world-size set-global ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! @@ -45,7 +32,6 @@ TUPLE: boid pos vel ; ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! -! SYMBOL: time-slice 0.5 time-slice set SYMBOL: time-slice 0.5 time-slice set-global ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!