summaryrefslogtreecommitdiff
path: root/backends/hol4/primitivesBaseTacLib.sml
diff options
context:
space:
mode:
authorSon Ho2023-01-24 10:37:56 +0100
committerSon HO2023-06-04 21:54:38 +0200
commit89e064531a7d853b7f87e2ca936852d57ceec1a6 (patch)
tree7a0aa5860e4aaabca18226174e02809eeeef08fd /backends/hol4/primitivesBaseTacLib.sml
parenta9110a7fe013dc7b6dd35bfd6f56ea1ce3a471b1 (diff)
Organize a bit the HOL files
Diffstat (limited to 'backends/hol4/primitivesBaseTacLib.sml')
-rw-r--r--backends/hol4/primitivesBaseTacLib.sml16
1 files changed, 16 insertions, 0 deletions
diff --git a/backends/hol4/primitivesBaseTacLib.sml b/backends/hol4/primitivesBaseTacLib.sml
new file mode 100644
index 00000000..3da1423b
--- /dev/null
+++ b/backends/hol4/primitivesBaseTacLib.sml
@@ -0,0 +1,16 @@
+(* Base tactics for the primitives library *)
+structure primitivesBaseTacLib =
+struct
+
+open HolKernel boolLib bossLib Parse
+open boolTheory arithmeticTheory integerTheory intLib listTheory
+
+(* Ignore a theorem.
+
+ To be used in conjunction with {!pop_assum} for instance.
+ *)
+fun IGNORE_TAC (_ : thm) : tactic = ALL_TAC
+
+val POP_IGNORE_TAC = POP_ASSUM IGNORE_TAC
+
+end