src/CTT/ROOT.ML
author paulson
Tue, 14 Nov 2000 13:25:59 +0100
changeset 10466 78168ca70469
parent 6349 f7750d816c21
child 17441 5b5feca0344a
permissions -rw-r--r--
new Main.thy as in HOL, ZF
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1459
d12da312eff4 expanded tabs
clasohm
parents: 1361
diff changeset
     1
(*  Title:      CTT/ROOT
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     2
    ID:         $Id$
1459
d12da312eff4 expanded tabs
clasohm
parents: 1361
diff changeset
     3
    Author:     Lawrence C Paulson, Cambridge University Computer Laboratory
0
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
121
d392174734e9 changed use_thy's parameter to exact theory name
clasohm
parents: 72
diff changeset
    15
use_thy "CTT";
6260
wenzelm
parents: 5210
diff changeset
    16
use "~~/src/Provers/typedsimp.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    17
use "rew.ML";
10466
78168ca70469 new Main.thy as in HOL, ZF
paulson
parents: 6349
diff changeset
    18
use_thy "Main";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    19
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    20
print_depth 8;
10466
78168ca70469 new Main.thy as in HOL, ZF
paulson
parents: 6349
diff changeset
    21
78168ca70469 new Main.thy as in HOL, ZF
paulson
parents: 6349
diff changeset
    22
Goal "tt : T";  (*leave subgoal package empty*)