空列表中的 F# 值限制

Question

我有一个 F# 函数：

let removeEven (listToGoUnder : _ list) =
    let rec listRec list x =
        match list with
        | [] -> []
        | head::tail when (x%2 = 0) -> head :: listRec (tail) (x+1)
        | head::tail -> listRec (tail) (x+1)

     listRec listToGoUnder 0

它删除列表中偶数索引处的所有元素。 如果我给列表一些输入，它会起作用，比如removeEven ['1';'2';'3'] 我得到['1';'3'] 我应该这样做。但是当我插入一个空列表作为参数时，我得到了这个错误：

stdin(78,1)：错误 FS0030：值限制。 'it' 的值是 推断具有泛型类型

val it : '_a list 将 'it' 定义为一个简单的数据项，使 它是一个带有显式参数的函数，或者，如果您不打算使用它 要通用，请添加类型注释。

帮忙，有人吗？

Answer 1

空列表（[]）比较特别；它可以是任何类型的列表。因此，编译器会抱怨您没有[] 的特定类型。在参数上添加类型注解有助于解决问题：

let results = removeEven ([]: int list)

@kvb 建议的更多惯用类型注释：

let results: int list = removeEven []

这可能不是问题，但您的函数应命名为 removeOdd，因为索引通常从 0 开始，并且您的函数会删除所有具有奇数索引的元素。此外，如果您在列表的前两个元素上使用模式匹配，而不是使用计数器 x 来检查索引，事情就会更加清晰：

let rec removeOdd = function
    | [] -> []
    | [x] -> [x]
    | x::_::xs -> x::removeOdd xs