. exact measurableSet_Ioi
case this.ht
a : ℝ
ha : 0 < a
n : ℕ+
⊢ MeasurableSet (Set.Ioi a)

case this.hfs
a : ℝ
ha : 0 < a
n : ℕ+
⊢ IntegrableOn (fun x => DiracSeq (↑↑n) x) (Set.Ioc 0 a)

case this.hft
a : ℝ
ha : 0 < a
n : ℕ+
⊢ IntegrableOn (fun x => DiracSeq (↑↑n) x) (Set.Ioi a)
case this.hfs
a : ℝ
ha : 0 < a
n : ℕ+
⊢ IntegrableOn (fun x => DiracSeq (↑↑n) x) (Set.Ioc 0 a)

case this.hft
a : ℝ
ha : 0 < a
n : ℕ+
⊢ IntegrableOn (fun x => DiracSeq (↑↑n) x) (Set.Ioi a)