Definition rgdcop q p := rgdcop_rec q p (size p).Implicit Types p q r : {poly R}.

(* Specifications: *)
Lemma rdvdp_eqP p : rdvdp_spec p d (rmodp p d) (rdvdp d p).
Lemma rdvdp_mull p : rdvdp d (p * d).
Lemma rmodp_mull p : rmodp (p * d) d = 0.
Lemma rmodpp : rmodp d d = 0.
Lemma rdvdpp : rdvdp d d.