Я пытался выяснить, как реализовать типы данных, закодированные Церковью, в Scala. Кажется, что для него требуются типы rank-n, так как вам понадобится первоклассная функция const
типа forAll a. a -> (forAll b. b -> b)
.
Однако я смог кодировать пары:
import scalaz._
trait Compose[F[_],G[_]] { type Apply = F[G[A]] }
trait Closure[F[_],G[_]] { def apply[B](f: F[B]): G[B] }
def pair[A,B](a: A, b: B) =
new Closure[Compose[({type f[x] = A => x})#f,
({type f[x] = B => x})#f]#Apply, Id] {
def apply[C](f: A => B => C) = f(a)(b)
}
Для списков я смог кодировать cons
:
def cons[A](x: A) = {
type T[B] = B => (A => B => B) => B
new Closure[T,T] {
def apply[B](xs: T[B]) = (b: B) => (f: A => B => B) => f(x)(xs(b)(f))
}
}
Однако пустой список более проблематичен, и я не смог заставить компилятор Scala унифицировать типы.
Можете ли вы определить nil, чтобы, учитывая вышеприведенное определение, следующие компиляции?
cons(1)(cons(2)(cons(3)(nil)))