src/ZF/ROOT.ML
author paulson
Mon Aug 07 10:29:54 2000 +0200 (2000-08-07)
changeset 9548 15bee2731e43
parent 9211 6236c5285bd8
child 9570 e16e168984e1
permissions -rw-r--r--
instantiated Cancel_Numerals for "nat" in ZF
     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 
    23 use_thy "ZF";
    24 use     "Tools/typechk";
    25 use_thy "mono";
    26 use     "ind_syntax";
    27 use     "Tools/cartprod";
    28 use_thy "Fixedpt";
    29 use     "Tools/inductive_package";
    30 use     "Tools/induct_tacs";
    31 use     "Tools/primrec_package";
    32 use_thy "QUniv";
    33 use     "Tools/datatype_package";
    34 
    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*)