微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

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

如何解决是否可以在 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。

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。