uses a supplied version of make_elim for addDs
authorpaulson
Wed, 28 Jun 2000 10:55:38 +0200
changeset 9171 cfc6fecbb1e9
parent 9170 0bfe5354d5e7
child 9172 2dbb80d4fdb7
uses a supplied version of make_elim for addDs
src/Provers/classical.ML
--- a/src/Provers/classical.ML	Wed Jun 28 10:54:47 2000 +0200
+++ b/src/Provers/classical.ML	Wed Jun 28 10:55:38 2000 +0200
@@ -27,6 +27,7 @@
 
 signature CLASSICAL_DATA =
 sig
+  val make_elim : thm -> thm    (* Tactic.make_elim or a classical version*)
   val mp	: thm    	(* [| P-->Q;  P |] ==> Q *)
   val not_elim	: thm		(* [| ~P;  P |] ==> R *)
   val classical	: thm		(* (~P ==> P) ==> P *)