fact: Definition mxown T (x : mutex T) : mtx2 := match x with mx_undef => mx_undef | nown => nown | _ => own end.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq) pcm(options prelude pred) pcm(pcm morphism natmap)