fact: Structure ST' := Prog { pre_of : pre; prog_of : prog pre_of A; _ : safe_mono pre_of; _ : def_strict prog_of; _ : frameable prog_of}.
imports: mathcomp(ssreflect ssrbool ssrfun ssrnat eqtype seq) pcm(options axioms pred prelude) pcm(pcm unionmap heap) htt(domain)