F# - count char number in List

let countCharInList (ch:char, list: List<char>) =
    let filtered = List.filter (fun e -> e = ch) list
    filtered.Length

printf "%A" (countCharInList('a', ['a';'b';'c';'a']))