anchor.diff:      | true -> Pass
       | false -> Fail
       
  -  | _ -> Unknown
  +  | _ -> Indeterminate
   
   let printResultGrid (grid) (rowTests : int list list) (columnTests : int list list) =
     let maxY = (Array2D.length1 grid) - 1
  
positive.code: 
  type group = int list
  type groupsIntermediate = { FinishedGroups : group list; CurrentGroup : group}
  type CellResult = Unknown | Filled | Empty
  type AxisResult = Unknown | Pass | Fail
  
  let row i (arr: 'T[,]) = arr.[i..i, *] |> Seq.cast<'T> |> Seq.toArray
  let column i (arr: 'T[,]) = arr.[*, i..i] |> Seq.cast<'T> |> Seq.toArray
  
negative.code:     match result with
      | Pass -> printf "Y  "
      | Fail -> printf "N  "
      | Indeterminate -> printf "?  "
      printRow row
      printfn ""
    printfn ""
  