fact: Definition TaqsR (p : polyF) (sq : seq polyF) (i : nat) : cps tF := fun k => bind n <- TaqR p (Pcq sq i); k ((n%:~R) %:T)%qfT.
imports: mathcomp.ssreflect.ssreflect mathcomp(ssrfun ssrbool eqtype ssrnat seq choice fintype) mathcomp(finfun path matrix) mathcomp(bigop order ssralg poly polydiv ssrnum zmodp div ssrint) mathcomp(polyorder polyrcf interval polyXY) mathcomp(qe_rcf_th ordered_qelim mxtens)