src/Cube/ROOT.ML

- Installed specific code generator for equality enforcing that
arguments do not have function types, which would result in
an error message during compilation.

- Added test case generators for basic types.

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

The Lambda-Cube a la Barendregt.
*)

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

print_depth 1;  

use_thy "Cube";

print_depth 8;