From 971b35fd4af24cfffc462df13f8c5b9be982858e Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Wed, 3 Jun 2020 19:36:50 +0100 Subject: Uncomment proof --- src/verilog/Value.v | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/verilog/Value.v') diff --git a/src/verilog/Value.v b/src/verilog/Value.v index efbd99c..d527b15 100644 --- a/src/verilog/Value.v +++ b/src/verilog/Value.v @@ -356,3 +356,8 @@ Proof. unfold valToValue in H. inversion H. symmetry. apply valueToInt_intToValue. Qed. + +Lemma boolToValue_ValueToBool : + forall b, + valueToBool (boolToValue 32 b) = b. +Proof. destruct b; unfold valueToBool, boolToValue; simpl; trivial. Qed. -- cgit