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