theorem uniform_collision_probability {J : ℕ} (hJ : 0 < J) :
∑ _j : Fin J, ((1 : ℝ) / ↑J) ^ 2 = 1 / (↑J : ℝ) := by
simp [Finset.sum_const, Finset.card_univ, Fintype.card_fin, nsmul_eq_mul]
have hJr : (↑J : ℝ) ≠ 0 := Nat.cast_ne_zero.mpr (by omega)
field_simpAggregation-invariant class results from Paper 1, Section 5: