Let's prettify the match by adding something like this the the `OpTreeCompanion` trait:

    object Show {
      def unapply(name: Name): Option[String] = Some(show(name))
    }

Then we can shorten the match to:

    case Apply(Select(a, Show("""newTermName("$tilde")""")), List(arg)) =>

And while we are on it we can alos introduce

    object Decoded {
      def unapply(name: Name): Option[String] = Some(name.decoded)
    }