// im trying to take a list of 'a[,] and turn it into ('a[,]*b*c) list, but it says im returning type unit

let adjacentStates = List.map (fun x ->
                                            let containsX list = List.exists (fun (b,g,f) -> b = x) list
                                            if (not (List.exists (fun elem -> elem = x) CS)) && (not (containsX removedCurrent)) then
                                              let newGS = GS + 1
                                              let newFS = newGS + totalManhattanDistance x goal
                                              (x, newGS, newFS)(* here is where it says expecting type ('a*'b*c) but got type unit*)) adjacentBoards