diff options
| author | Chantal Keller <Chantal.Keller@lri.fr> | 2020-07-06 12:40:48 +0200 |
|---|---|---|
| committer | Chantal Keller <Chantal.Keller@lri.fr> | 2020-07-06 12:40:48 +0200 |
| commit | 52621f58edcabc36e7d1cd10d9b4da8be1a08649 (patch) | |
| tree | de5831e7b1b0fb79fe459a819bbe2590e14a1682 /src/bva | |
| parent | ea73755e6e1b7efea8db79b9fc0cf456ed5c640f (diff) | |
| parent | d7a33ad9b479317701eba7c787744599de134f78 (diff) | |
| download | smtcoq-52621f58edcabc36e7d1cd10d9b4da8be1a08649.tar.gz smtcoq-52621f58edcabc36e7d1cd10d9b4da8be1a08649.zip | |
Merge branch 'coq-8.10' of github.com:smtcoq/smtcoq into coq-8.10
Diffstat (limited to 'src/bva')
| -rw-r--r-- | src/bva/Bva_checker.v | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/src/bva/Bva_checker.v b/src/bva/Bva_checker.v index 0f5bc1a..f066b54 100644 --- a/src/bva/Bva_checker.v +++ b/src/bva/Bva_checker.v @@ -1926,17 +1926,6 @@ Qed. Lemma eq_head: forall {A: Type} a b (l: list A), (a :: l) = (b :: l) <-> a = b. Proof. intros A a b l; split; [intros H; inversion H|intros ->]; auto. Qed. -Axiom afold_left_and : forall a, - afold_left bool int true andb (Lit.interp rho) a = List.forallb (Lit.interp rho) (to_list a). - - Axiom afold_left_or : forall a, - afold_left bool int false orb (Lit.interp rho) a = - C.interp rho (to_list a). - - Axiom afold_left_xor : forall a, - afold_left bool int false xorb (Lit.interp rho) a = - C.interp rho (to_list a). - Lemma eqb_spec : forall x y, (x == y) = true <-> x = y. Proof. split;auto using eqb_correct, eqb_complete. |