- thms "combin";
> val it =
[("C_DEF", |- combin$C = (\f x y. f y x)),
("C_THM", |- !f x y. combin$C f x y = f y x), ("I_DEF", |- I = S K K),
("I_o_ID", |- !f. (I o f = f) /\ (f o I = f)), ("I_THM", |- !x. I x = x),
("K_DEF", |- K = (\x y. x)), ("K_THM", |- !x y. K x y = x),
("o_ASSOC", |- !f g h. f o g o h = (f o g) o h),
("o_DEF", |- !f g. f o g = (\x. f (g x))),
("o_THM", |- !f g x. (f o g) x = f (g x)),
("S_DEF", |- S = (\f g x. f x (g x))),
("S_THM", |- !f g x. S f g x = f x (g x)),
("W_DEF", |- W = (\f x. f x x)), ("W_THM", |- !f x. W f x = f x x)] :
(string * thm) list