checks that the recursive sets are Consts before taking
them apart! Bug was introduced during the translation to theory sections.
(* Title: HOL/subset.thy
ID: $Id$
Author: Lawrence C Paulson, Cambridge University Computer Laboratory
Copyright 1994 University of Cambridge
*)
subset = Fun