我只能以相当笨拙的方式在Idris 0.9.12中执行rank-n类型:
tupleId : ((a : Type) -> a -> a) -> (a, b) -> (a, b)
tupleId f (a, b) = (f _ a, f _ b)
我需要在类型应用程序的任何地方使用下划线,因为当我尝试隐藏(嵌套)类型参数时,Idris会抛出解析错误:
tupleId : ({a : Type} -> a -> a) -> (a, b) -> (a, b) -- doesn't compile
一个可能更大的问题是我根本无法在更高级别的类型中进行类约束。我无法将以下Haskell函数转换为Idris:
appShow :: Show a => (forall a. Show a => a -> String) -> a -> String
appShow show x = show x
这也阻止我使用Idris函数作为类型的同义词,例如Lens
,在Haskell中是Lens s t a b = forall f. Functor f => (a -> f b) -> s -> f t
。
有任何方法可以补救或规避上述问题吗?
答案 0 :(得分:19)
我刚刚在master中实现了这个功能,允许在任意范围内使用implicits,并且它将在下一个hackage发行版中。虽然它还没有经过良好的测试!我至少尝试过以下简单示例和其他一些示例:
appShow : Show a => ({b : _} -> Show b => b -> String) -> a -> String
appShow s x = s x
AppendType : Type
AppendType = {a, n, m : _} -> Vect n a -> Vect m a -> Vect (n + m) a
append : AppendType
append [] ys = ys
append (x :: xs) ys = x :: append xs ys
tupleId : ({a : _} -> a -> a) -> (a, b) -> (a, b)
tupleId f (a, b) = (f a, f b)
Proxy : Type -> Type -> Type -> Type -> (Type -> Type) -> Type -> Type
Producer' : Type -> (Type -> Type) -> Type -> Type
Producer' a m t = {x', x : _} -> Proxy x' x () a m t
yield : Monad m => a -> Producer' a m ()
分钟的主要约束是你不能直接给出隐式参数的值,除了在顶层。我最终会做些什么......