unfold rcomp
V : Type u_1
inst✝ : Zermelo V
r x y z s : V
⊢ x ∈ rcomp s r ↔ ∃ a b c, x = opair a c ∧ opair b c ∈ s ∧ opair a b ∈ r
V : Type u_1
inst✝ : Zermelo V
r x y z s : V
⊢ x ∈
      sep (BoundedFormula.memRComp (Sum.inr 0) (Sum.inl true) (Sum.inl false)) (fun i => if i = true then s else r)
        (prod (dom r) (ran s)) ↔
    ∃ a b c, x = opair a c ∧ opair b c ∈ s ∧ opair a b ∈ r