proposition: Theorem reducestar_cb : forall (a b : list (Term A n)) (Q : list (poly A0 eqA ltM)), reducestar A A0 A1 eqA invA minusA multA divA eqA_dec n ltM ltM_dec Q a b -> canonical A0 eqA ltM a -> CombLinear Q a -> CombLinear Q b.
proof: Proof. Proof using os cs. intros a b Q H'; elim H'; auto. intros p q H'0 H'1 H'2 H'3. apply reduceplus_cb with (a := p); auto. Qed.