proposition: Lemma bitsFromInt8K: cancel bitsFromInt8 bitsToInt8.
proof: Proof. apply: inj_can_sym; auto using bitsToInt8K, bitsFromInt8_inj. Qed.
imports: Coq(ZArith.ZArith Extraction) mathcomp.ssreflect.ssreflect mathcomp(ssrbool eqtype ssrnat seq fintype ssrfun tuple) Bits(bits)