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

问题描述

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

StM (ExceptT e m) a 

应该标准化为

StM m (Either e a)

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

解决方法

> 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。