是否可以规范化 Haskell 中包含自由类型变量的类型？

Question

我的目标类似于：我想在 GHCi 中规范化一个类型。但是该类型包含自由类型变量。例如，类型

StM (ExceptT e m) a

应该标准化为

StM m (Either e a)

但是当我在 GHCi 中输入 !k StM (ExceptT e m) a 时，它会抱怨那些自由类型变量。在 Haskell 中还有其他方法吗？

Answer 1

> import Control.Monad.Except
> :set -XTypeFamilies -XUndecidableInstances
> type family StM f a where StM (ExceptT e m) a = StM m (Either e a)

您可以使用部分类型 _，不幸的是它被打印为 GHC.Types.Any:

> :set -XPartialTypeSignatures -Wno-partial-type-signatures
> :kind! StM (ExceptT _ _) _
StM (ExceptT _ _) _ :: *
= StM Any (Either Any Any)

但如果您找到具体类型，它也可以工作

> :kind! StM (ExceptT String []) Int
StM (ExceptT String []) Int :: *
= StM [] (Either [Char] Int)

或者你可以明确地量化

> :set -XRankNTypes
> :kind! forall m e a. StM (ExceptT e m) a
forall m e a. StM (ExceptT e m) a :: *
= StM m (Either e a)

我认为隐式量化 :kind 是一个很好的功能，因此您可以编写 :kind StM (ExceptT e m) a 并为您插入 foralls。

Is it possible to normalize a type that contains free type variables in Haskell?