scala - 拆分使用Prepend [A，B]串联的HList

Question

我本质上是在寻找类型类Prepend[A, B]的反义词。

如果我有类似的东西:

type A = String :: Int :: HNil
type B = Boolean :: Double :: HNil

val a: A = "a" :: 1 :: HNil
val b: B = false :: 2.1 :: HNil

scala> val ab = a ++ b
ab: shapeless.::[String,shapeless.::[Int,shapeless.::[Boolean,shapeless.::[Double,shapeless.HNil]]]] = a :: 1 :: false :: 2.1 :: HNil

我有一个 HList类型的 a A和一个 HList类型的 b B，我可以找到一个 prepend: Prepend[A, B]，以便可以将它们与 a ++ b连接起来。

但是，如果我有一个 HList类型的 ab prepend.Out，如何提取原始的 A和 B？我似乎找不到能胜任工作的类型类，也许没有。似乎我需要像 trait Cut[A <: HList, B <: HList, c <: HList]这样的东西来见证 C是通过将 A前置在 B之上而创建的，尽管我不确定如何去生成见证人。

非常大致像:

def Cut[A <: HList, B <: HList, C <: HList](c: C)(implicit cut: Cut[A, B, C]): (A, B)  = ???

Answer 1

您可以使用Split相当直接地做到这一点:

import shapeless._, ops.hlist.{ Length, Prepend, Split }

class UndoPrependHelper[A <: HList, B <: HList, C <: HList, N <: Nat] {
  def apply(c: C)(implicit split: Split.Aux[C, N, A, B]): (A, B) = split(c)
}

def undoPrepend[A <: HList, B <: HList](implicit
  prepend: Prepend[A, B],
  length: Length[A]
) = new UndoPrependHelper[A, B, prepend.Out, length.Out]

然后:

scala> type A = Int :: String :: Symbol :: HNil
defined type alias A

scala> type B = List[Int] :: Option[Double] :: HNil
defined type alias B

scala> type C = Int :: String :: Symbol :: List[Int] :: Option[Double] :: HNil
defined type alias C

scala> val a: A = 1 :: "foo" :: 'bar :: HNil
a: A = 1 :: foo :: 'bar :: HNil

scala> val b: B = List(1, 2, 3) :: Option(0.0) :: HNil
b: B = List(1, 2, 3) :: Some(0.0) :: HNil

scala> val c: C = a ++ b
c: C = 1 :: foo :: 'bar :: List(1, 2, 3) :: Some(0.0) :: HNil

scala> val (newA: A, newB: B) = undoPrepend[A, B].apply(c)
newA: A = 1 :: foo :: 'bar :: HNil
newB: B = List(1, 2, 3) :: Some(0.0) :: HNil

我对 Remove类型类 recently added进行了“撤消”操作，并且在 Prepend中内置了类似的内容可能是有意义的。