proposition: Lemma size_mul u p q : size (mul u p q) = (size p + size q).-1.
proof: Proof. by rewrite /size /mul size_mkseq. Qed.
imports: Coq(ZArith Reals) Coquelicot(Coquelicot) mathcomp.ssreflect(ssreflect ssrfun ssrbool eqtype ssrnat seq fintype bigop) Flocq(Core) Stdlib MathComp Interval Xreal Basic_rec