fact: Definition to (b : @UM.base nat_ordType nat_pred A) : tp := b.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path interval) pcm(options prelude pred finmap rtc seqext useqord uslice uconsec)