Как создать линзы Monocle с последовательностями?

Question

Я пытаюсь создать линзу Monocle с вложенными классами дел и последовательностями.

import monocle.macros.GenLens
import monocle.function.Each.each

case class A(bs: Seq[B])
case class B(c: Int)

val bs = GenLens[A](_.bs)
val c = GenLens[B](_.c)

val cs = (bs composeTraversal each composeLens c)

Компиляция завершается неудачно в последней строке. Я использую Monocle 1.5.0-cats.

PS: замена Seq[B] на List[B] работает, но мои классы дел генерируются scalaxb, который использует последовательности.