First version of HOL Light tactic recording.

See INSTRUCTIONS and LIMITATIONS files for more details.
Currently works for flattening "packaged-up" tactic proofs into g/e commands.
Won't work for most proofs because most tactics/thms haven't been promoted.
Support for exporting proof graph as a series of goal pairs.
Support for displaying extra information to be intercepter by PG for Prooftree.

1 files changed, 22 insertions, 0 deletions

diff --git a/hol-light/TacticRecording/dltree.mli b/hol-light/TacticRecording/dltree.mli
new file mode 100644
index 00000000..2f570490
--- /dev/null
+++ b/hol-light/TacticRecording/dltree.mli
@@ -0,0 +1,22 @@
+(* ========================================================================== *)
+(* DYNAMIC LOOKUP TREES (HOL Zero)                                            *)
+(* - Library support for data storage in dynamic indexed binary trees         *)
+(*                                                                            *)
+(* By Mark Adams                                                              *)
+(* Copyright (c) Proof Technologies Ltd, 2008-2011                            *)
+(* ========================================================================== *)
+
+
+module type Dltree_sig = sig
+
+  type ('a,'b) dltree
+  val dltree_empty : unit -> ('a,'b) dltree
+  val dltree_reempty : ('a,'b) dltree -> unit
+  val dltree_mem : 'a -> ('a,'b) dltree -> bool
+  val dltree_lookup : 'a -> ('a,'b) dltree -> 'b
+  val dltree_elem : 'a -> ('a,'b) dltree -> 'a * 'b
+  val dltree_elems : ('a,'b) dltree -> ('a * 'b) list
+  val dltree_insert : ('a * 'b) -> ('a,'b) dltree -> unit
+  val dltree_remove : 'a -> ('a,'b) dltree -> unit
+
+end;;