src/ZF/ROOT.ML
author wenzelm
Fri Nov 09 23:44:48 2001 +0100 (2001-11-09)
changeset 12133 f314630235a4
parent 9570 e16e168984e1
child 12175 5cf58a1799a7
permissions -rw-r--r--
tuned;
     1 (*  Title:      ZF/ROOT
     2     ID:         $Id$
     3     Author:     Lawrence C Paulson, Cambridge University Computer Laboratory
     4     Copyright   1993  University of Cambridge
     5 
     6 Adds Zermelo-Fraenkel Set Theory to a database containing First-Order Logic.
     7 
     8 This theory is the work of Martin Coen, Philippe Noel and Lawrence Paulson.
     9 *)
    10 
    11 val banner = "ZF Set Theory (in FOL)";
    12 writeln banner;
    13 
    14 eta_contract:=false;
    15 
    16 print_depth 1;
    17 
    18 (*Add user sections for inductive/datatype definitions*)
    19 use     "thy_syntax";
    20 
    21 use "~~/src/Provers/Arith/cancel_numerals.ML";
    22 use "~~/src/Provers/Arith/combine_numerals.ML";
    23 
    24 use_thy "mono";
    25 use     "ind_syntax.ML";
    26 use     "Tools/cartprod.ML";
    27 use_thy "Fixedpt";
    28 use     "Tools/inductive_package.ML";
    29 use     "Tools/induct_tacs.ML";
    30 use     "Tools/primrec_package.ML";
    31 use_thy "QUniv";
    32 use     "Tools/datatype_package.ML";
    33 
    34 use     "Tools/numeral_syntax.ML";
    35 (*the all-in-one theory*)
    36 with_path "Integ" use_thy "Main";
    37 
    38 simpset_ref() := simpset() setmksimps (map mk_eq o Ord_atomize o gen_all);
    39 
    40 print_depth 8;
    41 
    42 Goal "True";  (*leave subgoal package empty*)