SO: How do I pull apart Case Classes filled with Options in Scala

FooBar.scala

import monocle.macros.GenIso
import scalaz.std.option._

object Test extends App {
  case class Bar(blub: Option[String])
  case class Foo(bar: Option[Bar])

  val bar  = GenIso[Foo, Option[Bar]]
  val blub = GenIso[Bar, Option[String]]

  val s = bar composePrism blub.asPrism.below[Option]
  
  s.reverseGet(Some(Some("Hello")))
  s.reverseGet(Some(None))
  s.reverseGet(None)
}