fsharp-conway-step.fs

static member Step(states : int [][]) : int[][] = 
    [| for x in 0..states.Length - 1 do 
       yield [| for y in 0..states.[0].Length - 1 do  
                     match Game.NeighborsAt(x,y,states) with 
                      | 3 -> yield 1
                      | 2 -> yield states.[x].[y]
                      | _ -> yield 0
               |] 
      |]