| author | wenzelm | 
| Wed, 03 Feb 1999 16:40:17 +0100 | |
| changeset 6184 | 8d7a328e2d0c | 
| parent 3405 | 2cccd0e3e9ea | 
| child 6498 | 1ebbe18fe236 | 
| permissions | -rw-r--r-- | 
| 3302 | 1 | (* Title: TFL/rules | 
| 2 | ID: $Id$ | |
| 3 | Author: Konrad Slind, Cambridge University Computer Laboratory | |
| 4 | Copyright 1997 University of Cambridge | |
| 5 | ||
| 6 | Emulation of HOL inference rules for TFL | |
| 7 | *) | |
| 8 | ||
| 2112 | 9 | signature Rules_sig = | 
| 10 | sig | |
| 11 | (* structure USyntax : USyntax_sig *) | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 12 | val dest_thm : thm -> term list * term | 
| 2112 | 13 | |
| 14 | (* Inference rules *) | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 15 | val REFL :cterm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 16 | val ASSUME :cterm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 17 | val MP :thm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 18 | val MATCH_MP :thm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 19 | val CONJUNCT1 :thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 20 | val CONJUNCT2 :thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 21 | val CONJUNCTS :thm -> thm list | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 22 | val DISCH :cterm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 23 | val UNDISCH :thm -> thm | 
| 3353 
9112a2efb9a3
Removal of module Mask and datatype binding with its constructor |->
 paulson parents: 
3302diff
changeset | 24 | val INST_TYPE :(typ*typ)list -> thm -> thm | 
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 25 | val SPEC :cterm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 26 | val ISPEC :cterm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 27 | val ISPECL :cterm list -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 28 | val GEN :cterm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 29 | val GENL :cterm list -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 30 | val LIST_CONJ :thm list -> thm | 
| 2112 | 31 | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 32 | val SYM : thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 33 | val DISCH_ALL : thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 34 | val FILTER_DISCH_ALL : (term -> bool) -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 35 | val SPEC_ALL : thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 36 | val GEN_ALL : thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 37 | val IMP_TRANS : thm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 38 | val PROVE_HYP : thm -> thm -> thm | 
| 2112 | 39 | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 40 | val CHOOSE : cterm * thm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 41 | val EXISTS : cterm * cterm -> thm -> thm | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 42 | val EXISTL : cterm list -> thm -> thm | 
| 3353 
9112a2efb9a3
Removal of module Mask and datatype binding with its constructor |->
 paulson parents: 
3302diff
changeset | 43 | val IT_EXISTS : (cterm*cterm) list -> thm -> thm | 
| 2112 | 44 | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 45 | val EVEN_ORS : thm list -> thm list | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 46 | val DISJ_CASESL : thm -> thm list -> thm | 
| 2112 | 47 | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 48 | val SUBS : thm list -> thm -> thm | 
| 3405 | 49 | val simpl_conv : simpset -> thm list -> cterm -> thm | 
| 2112 | 50 | |
| 51 | (* For debugging my isabelle solver in the conditional rewriter *) | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 52 | val term_ref : term list ref | 
| 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 53 | val thm_ref : thm list ref | 
| 2112 | 54 | val mss_ref : meta_simpset list ref | 
| 55 | val tracing :bool ref | |
| 3405 | 56 | val CONTEXT_REWRITE_RULE : simpset * term * term * thm * thm list | 
| 57 | -> thm -> thm * term list | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 58 | val RIGHT_ASSOC : thm -> thm | 
| 2112 | 59 | |
| 3245 
241838c01caf
Removal of redundant code (unused or already present in Isabelle.
 paulson parents: 
2112diff
changeset | 60 | val prove : cterm * tactic -> thm | 
| 2112 | 61 | end; |