fact: Definition proptp2 := Prop -> @STspec unit Prop (fun => (fun i => True, fun (Ro : ans Prop) m => True)).
imports: mathcomp(ssreflect ssrbool ssrfun ssrnat eqtype seq) pcm(options axioms pred prelude) pcm(pcm unionmap heap) htt(domain)