proposition: Lemma orB0 n : right_id #0 (orB (n:=n)).
proof: Proof. by rewrite fromNat0; apply lift_right_id; do !elim. Qed.
imports: HB(structures) mathcomp.ssreflect.ssreflect mathcomp(ssrfun ssrbool eqtype ssrnat seq fintype tuple zmodp div) ssrextra.tuple ssrextra.nat spec spec.properties operations