src/HOL/simpdata.ML

--- a/src/HOL/simpdata.ML	Thu Aug 06 15:47:26 1998 +0200
+++ b/src/HOL/simpdata.ML	Thu Aug 06 15:48:13 1998 +0200
@@ -252,6 +252,9 @@
 qed_goalw "o_apply" HOL.thy [o_def] "(f o g) x = f (g x)"
  (K [rtac refl 1]);
 
+
+(** if-then-else rules **)
+
 qed_goalw "if_True" HOL.thy [if_def] "(if True then x else y) = x"
  (K [Blast_tac 1]);