proposition: Fact a_neq0 (k : int) : 0 <= k -> a k != 0.
proof: Proof. by move/lt_0_a; rewrite lt0r; case/andP. Qed.
imports: BinInt mathcomp(all_ssreflect all_algebra) mathcomp(realalg) CoqEAL(hrel param refinements) CoqEAL(pos binnat binint rational) tactics shift binomialz bigopz rat_of_Z rho_computations seq_defs c_props initial_conds algo_closures