type square = { lanes: int array;
		flipOffsets: int array;
		placeOffsets: int array
	      }

type moves = { black: int array;
	       white: int array;
	       bfront: int;
	       wfront: int
	     }
      
val laneLength : int array
val indexOfLane : int array -> int
val laneOfIndex : int -> int -> int array
val legalMovesTable : moves array array
val squareIndexes : square array
