let getOddSquares xs = xs |> List.filter (fun x -> x % 2 <> 0) |> List.map (fun x -> x * x) printfn "%A" (getOddSquares [1..10])