Moved some thms from Transitive_ClosureTr.ML to Transitive_Closure.thy
consts normal :: ifex => boolprimrec"normal(CIF b) = True""normal(VIF x) = True""normal(IF b t e) = (normal t & normal e & (case b of CIF b => True | VIF x => True | IF x y z => False))"