fact: Definition CauchyQ x := BQ_seq x /\ forall e, inc e BQps -> exists2 N, natp N & forall n m, natp n -> natp m -> N <=c n -> N <=c m -> BQabs ((Vg x n) -q (Vg x m)) <q e.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat)