haskell - 引用存在类型变量

Question

我想在我的代码中为一些本地函数添加类型签名。但是，它们的类型涉及匿名的、存在绑定的类型变量。由于它们是匿名的，我不知道如何编写类型签名。我怎样才能引用这样的类型变量？

在下面的示例中，gohas type [b] -> Int -> Int，其中b是由模式 match 绑定的类型T (x_shared:xs) g。我可以为它写什么类型的签名？

data T = forall a. T [a] (a -> a -> Int)

f :: T -> Int
f (T (x_shared:xs) g) = go xs 0
  where
    -- go :: what type?
    go (x:xs) n = go xs $! n + g x_shared x
    go []     n = n

Answer 1

通过ScopedTypeVariables扩展，您可以向范围添加类型注释g并将类型变量引入a范围。

f (T (x_shared:xs) (g :: a -> a -> Int)) = go xs 0

go然后你可以为with写一个类型签名a。

go :: [a] -> Int -> Int