src/CTT/ROOT.ML
author clasohm
Tue, 16 Nov 1993 14:10:19 +0100
changeset 121 d392174734e9
parent 72 099d949fe467
child 393 02b27671b899
permissions -rw-r--r--
changed use_thy's parameter to exact theory name
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     1
(*  Title: 	CTT/ROOT
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     2
    ID:         $Id$
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     3
    Author: 	Lawrence C Paulson, Cambridge University Computer Laboratory
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     4
    Copyright   1991  University of Cambridge
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     5
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     6
Adds Constructive Type Theory to a database containing pure Isabelle. 
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     7
Should be executed in the subdirectory CTT.
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     8
*)
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     9
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    10
val banner = "Constructive Type Theory";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    11
writeln banner;
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    12
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    13
print_depth 1;  
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    14
72
099d949fe467 changes for new Readthy
clasohm
parents: 0
diff changeset
    15
structure Readthy = ReadthyFUN (structure ThySyn = ThySyn);
099d949fe467 changes for new Readthy
clasohm
parents: 0
diff changeset
    16
open Readthy;
099d949fe467 changes for new Readthy
clasohm
parents: 0
diff changeset
    17
121
d392174734e9 changed use_thy's parameter to exact theory name
clasohm
parents: 72
diff changeset
    18
use_thy "CTT";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    19
use "../Provers/typedsimp.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    20
use "rew.ML";
121
d392174734e9 changed use_thy's parameter to exact theory name
clasohm
parents: 72
diff changeset
    21
use_thy "Arith";
d392174734e9 changed use_thy's parameter to exact theory name
clasohm
parents: 72
diff changeset
    22
use_thy "Bool";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    23
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    24
use "../Pure/install_pp.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    25
print_depth 8;
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    26
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    27
val CTT_build_completed = ();	(*indicate successful build*)