src/Cube/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

(*  Title: 	Cube/ROOT
    ID:         $Id$
    Author: 	Tobias Nipkow
    Copyright   1992  University of Cambridge

The Lambda-Cube a la Barendregt
*)

val banner = "Barendregt's Lambda-Cube";
writeln banner;

structure Readthy = ReadthyFUN (structure ThySyn = ThySyn);
open Readthy;

print_depth 1;  
use_thy "Cube";

use "../Pure/install_pp.ML";
print_depth 8;

val Cube_build_completed = ();	(*indicate successful build*)