simp
case h
α : Type u_1
Ω : Type u_2
inst✝ : MeasurableSpace Ω
X Y : Ω → Set α
μ : Measure Ω
p q : ℝ≥0
hX : IsBernoulliSeq X p μ
hY : IsBernoulliSeq Y q μ
a : α
ω : Ω
⊢ ω ∈ {ω | a ∈ X ω} ↔ ω ∈ (fun ω => a ∈ X ω) ⁻¹' {True}
no goals