fact: Hypothesis frame : (forall x y k v, a (x \+ y) k v = a x k v \+ y).
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path bigop) pcm(options prelude finmap seqperm pred seqext) pcm(pcm morphism)