解决方法
使用
inline：
let inline sum a b = a + b
更新：
如果您对编写自己的多态数字函数感兴趣,则应使用inline和LanguagePrimitives模块.
这是来自线程Converting Haskell Polymorphic Cosine function to F#的多态余弦函数：
let inline cosine n (x: ^a) =
let one: ^a = LanguagePrimitives.GenericOne
Seq.initInfinite(fun i -> LanguagePrimitives.DivideByInt (- x*x) ((2*i+1)*(2*i+2)))
|> Seq.scan (*) one
|> Seq.take n
|> Seq.sum
