🧱 Block_payload_hash.v
Proofs
Require Import CoqOfOCaml.Settings.
Require Import TezosOfOCaml.Environment.V8.
Require TezosOfOCaml.Proto_alpha.Block_payload_hash.
Require TezosOfOCaml.Environment.V8.Proofs.Blake2B.
Require TezosOfOCaml.Environment.V8.Proofs.Compare.
Require TezosOfOCaml.Environment.V8.Proofs.Data_encoding.
Lemma Blake2B_Make_include_is_valid :
S.HASH.Valid.t (fun _ ⇒ True) Block_payload_hash.Blake2B_Make_include.
apply Blake2B.Make_is_valid.
Qed.
Lemma encoding_is_valid :
Data_encoding.Valid.t (fun _ ⇒ True) Block_payload_hash.encoding.
apply Blake2B_Make_include_is_valid.
Qed.
#[global] Hint Resolve encoding_is_valid : Data_encoding_db.
Require Import TezosOfOCaml.Environment.V8.
Require TezosOfOCaml.Proto_alpha.Block_payload_hash.
Require TezosOfOCaml.Environment.V8.Proofs.Blake2B.
Require TezosOfOCaml.Environment.V8.Proofs.Compare.
Require TezosOfOCaml.Environment.V8.Proofs.Data_encoding.
Lemma Blake2B_Make_include_is_valid :
S.HASH.Valid.t (fun _ ⇒ True) Block_payload_hash.Blake2B_Make_include.
apply Blake2B.Make_is_valid.
Qed.
Lemma encoding_is_valid :
Data_encoding.Valid.t (fun _ ⇒ True) Block_payload_hash.encoding.
apply Blake2B_Make_include_is_valid.
Qed.
#[global] Hint Resolve encoding_is_valid : Data_encoding_db.
[compare] function is valid
Lemma compare_is_valid :
Compare.Valid.t (fun _ ⇒ True) id Block_payload_hash.compare.
Proof. apply Blake2B_Make_include_is_valid. Qed.
#[global] Hint Resolve compare_is_valid : Compare_db.
Compare.Valid.t (fun _ ⇒ True) id Block_payload_hash.compare.
Proof. apply Blake2B_Make_include_is_valid. Qed.
#[global] Hint Resolve compare_is_valid : Compare_db.