publish a useful function
authorkuncar
Mon, 24 Feb 2014 18:12:40 +0100
changeset 55722 b6ed5f896ce9
parent 55721 1c2cfc06c96a
child 55723 f66371633e13
publish a useful function
src/Pure/Isar/code.ML
--- a/src/Pure/Isar/code.ML	Mon Feb 24 18:12:39 2014 +0100
+++ b/src/Pure/Isar/code.ML	Mon Feb 24 18:12:40 2014 +0100
@@ -24,6 +24,7 @@
   val mk_eqn: theory -> thm * bool -> thm * bool
   val mk_eqn_liberal: theory -> thm -> (thm * bool) option
   val assert_eqn: theory -> thm * bool -> thm * bool
+  val assert_abs_eqn: theory -> string option -> thm -> thm * string
   val const_typ_eqn: theory -> thm -> string * typ
   val expand_eta: theory -> int -> thm -> thm
   type cert