Index: doc/example-scripts/rosetta-sudoku.tcl
===================================================================
diff -u -N -rc08415f59c4ce753f976d0513d6208426772ef2a -rf52f9988b6e8bb51e404afb3fc00d666d13fe919
--- doc/example-scripts/rosetta-sudoku.tcl	(.../rosetta-sudoku.tcl)	(revision c08415f59c4ce753f976d0513d6208426772ef2a)
+++ doc/example-scripts/rosetta-sudoku.tcl	(.../rosetta-sudoku.tcl)	(revision f52f9988b6e8bb51e404afb3fc00d666d13fe919)
@@ -198,7 +198,7 @@
 	:Solve $hSudoku $x $y [$hSudoku validchoices $x $y]
     }
  
-    # Get all the allocated numbers for each square in the the row, column, and
+    # Get all the allocated numbers for each square in the row, column, and
     # region containing $x,$y. If there is only one unallocated number among all
     # three groups, it must be allocated at $x,$y
     :create ruleOnlyChoice {