Haskell - 非法多态类型？

Question

为什么这种类型的单一用法可以编译，但将其放入列表会失败？

ft1  :: (Foldable t, Num a) => t a -> a
ft1   =   (F.foldl (+)  0)

fTest :: [(Foldable t, Num a) => t a -> a ]
fTest = [ F.foldl (+)  0 ]

后者给出了错误:

folding.hs:80:10:
    Illegal polymorphic or qualified type:
      (Foldable t, Num a) => t a -> a
    Perhaps you intended to use ImpredicativeTypes
    In the type signature for `fTest':
      fTest :: [(Foldable t, Num a) => t a -> a]

同样，尝试命名它失败(不同):

type Ftst t a = (Foldable t, Num a) => t a -> a

folding.hs:80:1:
    Illegal polymorphic or qualified type:
      (Foldable t, Num a) => t a -> a
    Perhaps you intended to use RankNTypes or Rank2Types
    In the type declaration for `Ftst'

Answer 1

对 Haskell 类型系统的这种限制是为了简化类型推断和检查。具有预测等级 1 类型(见下文)的类型推断是可判定的，并且具有相对简单的实现。 rank-2 类型的类型推断是可判定的，但相当复杂，以至于我不知道任何具有 rank-2 类型推断实现的语言。等级 3 及以上类型的类型推断是完全不可判定的。谓词类型也使事情变得相当复杂。 GHC 曾经有一个实现，允许使用不可预测的类型进行类型检查(以及一些非常有限的推断)，但它太复杂了，后来被删除了。 (目前 GHC 仍然接受一些仅使用不可预测类型进行类型检查的值，但我认为这不被视为“稳定”功能。)

快速定义:rank-1 类型在类型“外部”具有所有量化和类约束，因此所有 rank-1 类型都具有以下形式

forall a_1 ... a_m. (C_1, ..., C_n) => t

Rank-2 类型允许函数参数具有 rank-1 类型；并且通常 rank n 类型允许函数参数具有 rank (n-1) 类型。

预测性回答了哪些类型可以替代类型变量的问题。如果只有单态类型(尽管可能带有类型变量!)可以被替换，那么您就处于一个谓词系统中；不可预测类型允许您用多态类型替换类型变量。通过扩展，谓词系统中的参数数据类型只能接受单态类型作为参数。因此，例如，您的示例应用了 []类型构造函数 forall t a. (Foldable t, Num a) => t a -> a试图将构造函数应用于多态类型，因此仅在不可预测的系统中有效。