# HG changeset patch # User wenzelm # Date 1140110758 -3600 # Node ID 12833c7e0fa63b6cdedcc593e325945e373d1830 # Parent 77580f732e37730493af6b2e7523183d11aff5fa added premsN; diff -r 77580f732e37 -r 12833c7e0fa6 src/Pure/Isar/auto_bind.ML --- a/src/Pure/Isar/auto_bind.ML Thu Feb 16 18:25:58 2006 +0100 +++ b/src/Pure/Isar/auto_bind.ML Thu Feb 16 18:25:58 2006 +0100 @@ -10,6 +10,7 @@ val rule_contextN: string val thesisN: string val thisN: string + val premsN: string val goal: theory -> term list -> (indexname * term option) list val cases: theory -> term list -> (string * RuleCases.T option) list val facts: theory -> term list -> (indexname * term option) list @@ -24,6 +25,7 @@ val rule_contextN = "rule_context"; val thesisN = "thesis"; val thisN = "this"; +val premsN = "prems"; fun strip_judgment thy = ObjectLogic.drop_judgment thy o Logic.strip_assums_concl;