fact: Definition unionmap_eq (f1 f2 : UMC T m) := match (UMC.from f1), (UMC.from f2) with | UM.Undef, UM.Undef => true | UM.Def f1' pf1, UM.Def f2' pf2 => f1' == f2' | _, _ => false end.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path bigop) pcm(options prelude finmap seqperm pred seqext) pcm(pcm morphism)