olefriis

let input = "**..
....
.*..
...."

let compute (board : string) =
    let board = board.Split([| "\n" |], System.StringSplitOptions.RemoveEmptyEntries)
    let count (x, y) =
        
        [-1, -1; 0, -1;  1, -1;