fact: Parameter primitive_correct : forall u ci c pi p, ci >: c -> pi >:: p -> primitive u ci pi >:: PolR.primitive tt c p.
imports: Coq(ZArith Reals) Coquelicot(Coquelicot) mathcomp.ssreflect(ssreflect ssrfun ssrbool eqtype ssrnat seq fintype bigop) Flocq(Core) Stdlib MathComp Interval Xreal Basic_rec