| 
1459
 | 
     1  | 
(*  Title:      CTT/ROOT
  | 
| 
0
 | 
     2  | 
    ID:         $Id$
  | 
| 
1459
 | 
     3  | 
    Author:     Lawrence C Paulson, Cambridge University Computer Laboratory
  | 
| 
0
 | 
     4  | 
    Copyright   1991  University of Cambridge
  | 
| 
 | 
     5  | 
  | 
| 
 | 
     6  | 
Adds Constructive Type Theory to a database containing pure Isabelle. 
  | 
| 
 | 
     7  | 
Should be executed in the subdirectory CTT.
  | 
| 
 | 
     8  | 
*)
  | 
| 
 | 
     9  | 
  | 
| 
 | 
    10  | 
val banner = "Constructive Type Theory";
  | 
| 
 | 
    11  | 
writeln banner;
  | 
| 
 | 
    12  | 
  | 
| 
 | 
    13  | 
print_depth 1;  
  | 
| 
 | 
    14  | 
  | 
| 
121
 | 
    15  | 
use_thy "CTT";
  | 
| 
6260
 | 
    16  | 
use "~~/src/Provers/typedsimp.ML";
  | 
| 
0
 | 
    17  | 
use "rew.ML";
  | 
| 
121
 | 
    18  | 
use_thy "Arith";
  | 
| 
 | 
    19  | 
use_thy "Bool";
  | 
| 
0
 | 
    20  | 
  | 
| 
 | 
    21  | 
print_depth 8;
  |