| author | wenzelm | 
| Fri, 09 Jul 1999 18:48:33 +0200 | |
| changeset 6953 | b3f6c39aaa2e | 
| parent 6914 | ad689270a265 | 
| child 7032 | d6efb3b8e669 | 
| permissions | -rw-r--r-- | 
| 1264 
3eb91524b938
added local simpsets; removed IOA from 'make test'
 clasohm parents: 
1165diff
changeset | 1 | (* Title: HOL/ROOT.ML | 
| 923 | 2 | ID: $Id$ | 
| 3 | Author: Tobias Nipkow | |
| 4 | Copyright 1993 University of Cambridge | |
| 5 | ||
| 6 | Adds Classical Higher-order Logic to a database containing Pure Isabelle. | |
| 7 | Should be executed in the subdirectory HOL. | |
| 8 | *) | |
| 9 | ||
| 3947 | 10 | val banner = "Higher-Order Logic"; | 
| 923 | 11 | writeln banner; | 
| 12 | ||
| 13 | print_depth 1; | |
| 14 | ||
| 6392 | 15 | (*old-style theory syntax*) | 
| 6260 | 16 | use "~~/src/Pure/section_utils.ML"; | 
| 923 | 17 | use "thy_syntax.ML"; | 
| 18 | ||
| 6260 | 19 | use "~~/src/Provers/simplifier.ML"; | 
| 20 | use "~~/src/Provers/split_paired_all.ML"; | |
| 21 | use "~~/src/Provers/splitter.ML"; | |
| 22 | use "~~/src/Provers/hypsubst.ML"; | |
| 23 | use "~~/src/Provers/classical.ML"; | |
| 24 | use "~~/src/Provers/blast.ML"; | |
| 25 | use "~~/src/Provers/clasimp.ML"; | |
| 26 | use "~~/src/Provers/Arith/fast_lin_arith.ML"; | |
| 27 | use "~~/src/Provers/Arith/cancel_sums.ML"; | |
| 28 | use "~~/src/Provers/Arith/cancel_factor.ML"; | |
| 29 | use "~~/src/Provers/Arith/abel_cancel.ML"; | |
| 30 | use "~~/src/Provers/quantifier1.ML"; | |
| 923 | 31 | |
| 1338 | 32 | use_thy "HOL"; | 
| 4088 | 33 | use "hologic.ML"; | 
| 34 | use "cladata.ML"; | |
| 35 | use "simpdata.ML"; | |
| 36 | ||
| 923 | 37 | use_thy "Ord"; | 
| 38 | use_thy "subset"; | |
| 4864 | 39 | use "Tools/typedef_package.ML"; | 
| 5105 | 40 | use_thy "Sum"; | 
| 41 | use_thy "Gfp"; | |
| 923 | 42 | |
| 5183 | 43 | use_thy "NatDef"; | 
| 4296 | 44 | |
| 5097 | 45 | use "Tools/inductive_package.ML"; | 
| 5105 | 46 | use_thy "Inductive"; | 
| 923 | 47 | |
| 5183 | 48 | use "Tools/datatype_aux.ML"; | 
| 49 | use "Tools/datatype_prop.ML"; | |
| 50 | use "Tools/datatype_rep_proofs.ML"; | |
| 51 | use "Tools/datatype_abs_proofs.ML"; | |
| 52 | use "Tools/datatype_package.ML"; | |
| 53 | use "Tools/primrec_package.ML"; | |
| 5560 | 54 | use_thy "Datatype"; | 
| 6907 | 55 | use_thy "Numeral"; | 
| 5183 | 56 | |
| 5699 | 57 | use "Tools/record_package.ML"; | 
| 58 | use_thy "Record"; | |
| 59 | ||
| 6440 | 60 | (*TFL: recursive function definitions*) | 
| 61 | use_thy "WF_Rel"; | |
| 62 | cd "../TFL"; | |
| 63 | use "sys.sml"; | |
| 64 | cd "../HOL"; | |
| 65 | use "Tools/recdef_package.ML"; | |
| 66 | use "Tools/induct_method.ML"; | |
| 5425 | 67 | use_thy "Recdef"; | 
| 923 | 68 | |
| 5107 
2edf5dfb02f3
Replaced "use_dir" command by "use", because nested calls
 berghofe parents: 
5105diff
changeset | 69 | cd "Integ"; | 
| 5501 | 70 | use_thy "IntDef"; | 
| 5560 | 71 | use "simproc.ML"; | 
| 6914 | 72 | use_thy "IntDiv"; | 
| 5107 
2edf5dfb02f3
Replaced "use_dir" command by "use", because nested calls
 berghofe parents: 
5105diff
changeset | 73 | cd ".."; | 
| 5078 | 74 | |
| 5124 | 75 | (*the all-in-one theory*) | 
| 76 | use_thy "Main"; | |
| 77 | ||
| 923 | 78 | print_depth 8; | 
| 79 | ||
| 5501 | 80 | Goal "True"; (*leave subgoal package empty*) |