fact: Fixpoint bigseq (x : int) (n : nat) : seq int := match n with | 0 => [:: x] | n'.+1 => x :: bigseq (x+1) n' end.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat div seq ssralg) mathcomp(path choice fintype tuple finset bigop poly polydiv) CoqEAL(hrel param refinements poly_op) mathcomp(ssrint) CoqEAL(binnat binint seqpoly)