proposition: Lemma harmonic_gt0 {R : numFieldType} i : 0 < harmonic i :> R.
proof: Proof. by rewrite /=. Qed.
imports: mathcomp(all_ssreflect ssralg ssrint ssrnum matrix) mathcomp(interval rat) mathcomp(mathcomp_extra boolp classical_sets functions) mathcomp(set_interval) reals ereal signed topology normedtype landau