src/LCF/ROOT.ML

declare sprodE as cases rule; new induction rule sprod_induct

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

use_thy "LCF";