Скаланы need help. Дано Базовый тип: sealed trait Op[A], Наследники Op: OpX1,

Question

Скаланы need help. Дано Базовый тип: sealed trait Op[A], Наследники Op: OpX1,

OpX2 ... OpXn вида case class OpXn(...) extends Op[Xn]
Нужно доказать что имея инстанс типа
(OpX1 => F[X1]) :: (OpX2 => F[X2]) :: ... :: OpXn => F[Xn] :: HNil
для любого F[_]: Functor я могу получить инстанс Op ~> F.

Я смог получить промежуточную функцию
f: Generic[Op[_]]#Repr => F[X1 :+: X2 :+: ... :+: Xn :+: CNil]
и тогда
new (Op ~> F) {
def apply[A](op: Op[A]): F[A] =
f(Generic[Op[_]].to(op)).map(Coproduct.unsafeGet).asInstanceOf[F[A]]
}
И оно работает, и промежуточная функция точно верна и asInstanceOf[F[A]] безопасен,
но интересно можно ли подругому?

#programming #russian #scala

0

03.04.2017

1 ответов

10 просмотров

Oleg ℕižnik · Accepted Answer

Oleg ℕižnik

Пока не складывается. По-видимости нет конструктивной индукции (forall x: Op[_]. exists i .x.type~ Op[Ci]), полагаю, в случае даже одного Op а это было бы эквивалентно аксиоме исключённого третьего, которой в явном виде нет в теории типов

0

03.04.2017

169 похожих чатов

Скаланы need help. Дано Базовый тип: sealed trait Op[A], Наследники Op: OpX1,

1 ответов

Похожие вопросы