. apply Integrable.integrableOn
  exact DiracSeq.integrable zero_lt_one
case hg.hfi
a : ℝ
ha : 0 < a
⊢ IntegrableOn (fun x => DiracSeq 1 x) (Set.Ioi 0)

case hg.hb
a : ℝ
ha : 0 < a
⊢ Tendsto (fun i => ↑↑i * a) atTop atTop
case hg.hb
a : ℝ
ha : 0 < a
⊢ Tendsto (fun i => ↑↑i * a) atTop atTop