Harmonize spelling

diff --git a/extra/boids/boids.factor b/extra/boids/boids.factor
index 7ca546fba50069332ff521b5c6bcccbaafd55579..fbe6db5040fddd3eb0d0babec9b520ec8388aeaf 100644 (file)
--- a/extra/boids/boids.factor
+++ b/extra/boids/boids.factor
@@ -29,7 +29,7 @@ CONSTANT: initial-dt 5
         t >>clipped?
         ${ WIDTH HEIGHT } >>pref-dim
         initial-population random-boids >>boids
-        initial-behaviors >>behaviours
+        initial-behaviors >>behaviors
         initial-dt >>dt ;
 
 M: boids-gadget ungraft*

diff --git a/extra/path-finding/path-finding-docs.factor b/extra/path-finding/path-finding-docs.factor
index 8d8b1c07980aeb86ccf21b30e81f86dde20ccb31..8d5e88140557d119206defeb5c2028b0c0dc2f74 100644 (file)
--- a/extra/path-finding/path-finding-docs.factor
+++ b/extra/path-finding/path-finding-docs.factor
@@ -48,7 +48,7 @@ HELP: <astar>
   { "astar" astar }
 }
 { $description "Build an astar object from the given quotations. The "
-  { $snippet "neighbors" } " one builds the list of neighbours. The "
+  { $snippet "neighbors" } " one builds the list of neighbors. The "
   { $snippet "cost" } " and " { $snippet "heuristic" } " ones represent "
   "respectively the cost for transitioning from a node to one of its neighbor, "
   "and the underestimated cost for going from a node to the target. This solution "

diff --git a/extra/path-finding/path-finding.factor b/extra/path-finding/path-finding.factor
index e5048da6f762da854511532352c85be78ad775b8..39ea8a8f22ebce4c394712e219b9dad998284d15 100644 (file)
--- a/extra/path-finding/path-finding.factor
+++ b/extra/path-finding/path-finding.factor
@@ -67,12 +67,12 @@ TUPLE: (astar) astar goal origin in-open-set open-set ;
 TUPLE: astar-simple < astar cost heuristic neighbors ;
 M: astar-simple cost cost>> call( n1 n2 -- c ) ;
 M: astar-simple heuristic heuristic>> call( n1 n2 -- c ) ;
-M: astar-simple neighbors neighbours>> call( n -- neighbours ) ;
+M: astar-simple neighbors neighbors>> call( n -- neighbors ) ;
 
 TUPLE: bfs < astar neighbors ;
 M: bfs cost 3drop 1 ;
 M: bfs heuristic 3drop 0 ;
-M: bfs neighbors neighbours>> at ;
+M: bfs neighbors neighbors>> at ;
 
 TUPLE: dijkstra < astar costs ;
 M: dijkstra cost costs>> swapd at at ;

diff --git a/extra/project-euler/116/116.factor b/extra/project-euler/116/116.factor
index a7af001f30630b1d9880014849a8e2e0fbcd3322..229c62ec7456b3365000acfa0bf0b6e449f94eaf 100644 (file)
--- a/extra/project-euler/116/116.factor
+++ b/extra/project-euler/116/116.factor
@@ -20,7 +20,7 @@ IN: project-euler.116
 ! replacing the black tiles in a row measuring five units in length.
 
 ! How many different ways can the black tiles in a row measuring fifty units in
-! length be replaced if colors cannot be mixed and at least one coloured tile
+! length be replaced if colors cannot be mixed and at least one colored tile
 ! must be used?
 
 

diff --git a/extra/rosetta-code/one-d-cellular/one-d-cellular.factor b/extra/rosetta-code/one-d-cellular/one-d-cellular.factor
index 8476073daa5d56407e1e16a3ed12c2946adcb85c..bbdef327e1b06ca3df84b87f519ac369464f8e25 100644 (file)
--- a/extra/rosetta-code/one-d-cellular/one-d-cellular.factor
+++ b/extra/rosetta-code/one-d-cellular/one-d-cellular.factor
@@ -32,7 +32,7 @@ IN: rosetta-code.one-d-cellular
 :: neighbors ( index world -- # )
     index [ 1 - ] [ 1 + ] bi [ world ?nth ] bi@ bool-sum ;
 
-: count-neighbors ( world -- neighbours )
+: count-neighbors ( world -- neighbors )
     [ length <iota> ] keep [ neighbors ] curry map ;
 
 : life-law ( alive? neighbors -- alive? )