proposition: Lemma prop_limM (s : chain tp) p : (forall q, q \In s -> q <== p) -> prop_lim s <== p.
proof: Proof. by move=>H [r][]; move/H. Qed.
imports: mathcomp(ssreflect ssrbool ssrfun ssrnat eqtype seq) pcm(options axioms pred prelude)