fact: Definition viewP (P: pred Int8) (PP: Int8 -> Prop) := forall x, reflect (PP x) (P x).
imports: Coq(ZArith.ZArith Extraction) mathcomp.ssreflect.ssreflect mathcomp(ssrbool eqtype ssrnat seq fintype ssrfun tuple) Bits(bits)