src/Cube/ROOT.ML
changeset 0 a5a9c433f639
child 72 099d949fe467
equal deleted inserted replaced
-1:000000000000 0:a5a9c433f639
       
     1 (*  Title: 	Cube/ROOT
       
     2     ID:         $Id$
       
     3     Author: 	Tobias Nipkow
       
     4     Copyright   1992  University of Cambridge
       
     5 
       
     6 The Lambda-Cube a la Barendregt
       
     7 *)
       
     8 
       
     9 val banner = "Barendregt's Lambda-Cube";
       
    10 writeln banner;
       
    11 
       
    12 print_depth 1;  
       
    13 use_thy "cube";
       
    14 
       
    15 use "../Pure/install_pp.ML";
       
    16 print_depth 8;
       
    17 
       
    18 val Cube_build_completed = ();	(*indicate successful build*)