{α : Type w} →
  {motive : Std.Roo.HasRcoIntersection α → Sort u} →
    (t : Std.Roo.HasRcoIntersection α) →
      ((intersection : Std.Roo α → Std.Rco α → Std.Rco α) → motive { intersection := intersection }) → motive t