diff options
author | ckeller <ckeller@users.noreply.github.com> | 2021-02-23 17:06:51 +0100 |
---|---|---|
committer | GitHub <noreply@github.com> | 2021-02-23 17:06:51 +0100 |
commit | 240b76807340e59bb85b35e3ebbb807792459912 (patch) | |
tree | 22d60d5c8db5034bdd9045e8579df14406ac69bc /src/versions | |
parent | 74558c622de91801e3e188bdf690eb9a665f965b (diff) | |
download | smtcoq-240b76807340e59bb85b35e3ebbb807792459912.tar.gz smtcoq-240b76807340e59bb85b35e3ebbb807792459912.zip |
Link equality on uninterpreted sorts with SMT equality (#86)
Equality is now treated from uninterpreted sorts, which makes them usable with tactics!
Closes #17
Closes #78
Diffstat (limited to 'src/versions')
-rw-r--r-- | src/versions/standard/Tactics_standard.v | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/versions/standard/Tactics_standard.v b/src/versions/standard/Tactics_standard.v index 95b92d6..4162f13 100644 --- a/src/versions/standard/Tactics_standard.v +++ b/src/versions/standard/Tactics_standard.v @@ -29,11 +29,11 @@ Tactic Notation "verit_bool_no_check" constr_list(h) := Ltac zchaff := prop2bool; zchaff_bool; bool2prop. Ltac zchaff_no_check := prop2bool; zchaff_bool_no_check; bool2prop. -Tactic Notation "verit" constr_list(h) := prop2bool; verit_bool h; bool2prop. -Tactic Notation "verit_no_check" constr_list(h) := prop2bool; verit_bool_no_check h; bool2prop. +Tactic Notation "verit" constr_list(h) := prop2bool; [ .. | verit_bool h; bool2prop ]. +Tactic Notation "verit_no_check" constr_list(h) := prop2bool; [ .. | verit_bool_no_check h; bool2prop ]. -Ltac cvc4 := prop2bool; cvc4_bool; bool2prop. -Ltac cvc4_no_check := prop2bool; cvc4_bool_no_check; bool2prop. +Ltac cvc4 := prop2bool; [ .. | cvc4_bool; bool2prop ]. +Ltac cvc4_no_check := prop2bool; [ .. | cvc4_bool_no_check; bool2prop ]. (* Ltac smt := prop2bool; *) @@ -53,8 +53,8 @@ Ltac cvc4_no_check := prop2bool; cvc4_bool_no_check; bool2prop. (* end; *) (* bool2prop. *) -Tactic Notation "smt" constr_list(h) := (prop2bool; try verit_bool h; cvc4_bool; try verit_bool h; bool2prop). -Tactic Notation "smt_no_check" constr_list(h) := (prop2bool; try verit_bool_no_check h; cvc4_bool_no_check; try verit_bool_no_check h; bool2prop). +Tactic Notation "smt" constr_list(h) := (prop2bool; [ .. | try verit_bool h; cvc4_bool; try verit_bool h; bool2prop ]). +Tactic Notation "smt_no_check" constr_list(h) := (prop2bool; [ .. | try verit_bool_no_check h; cvc4_bool_no_check; try verit_bool_no_check h; bool2prop]). |