ex/Qsort.thy
changeset 249 492493334e0f
parent 48 21291189b51e
--- a/ex/Qsort.thy	Fri Apr 14 11:23:33 1995 +0200
+++ b/ex/Qsort.thy	Wed Jun 21 15:12:40 1995 +0200
@@ -13,15 +13,15 @@
 rules
 
 qsort_Nil  "qsort(le,[]) = []"
-qsort_Cons "qsort(le,x#xs) = qsort(le,[y:xs . ~le(x,y)]) @ \
-\                            (x# qsort(le,[y:xs . le(x,y)]))"
+qsort_Cons "qsort(le,x#xs) = qsort(le,[y:xs . ~le(x,y)]) @ 
+                            (x# qsort(le,[y:xs . le(x,y)]))"
 
 (* computational induction.
    The dependence of p on x but not xs is intentional.
 *)
 qsort_ind
- "[| P([]); \
-\    !!x xs. [| P([y:xs . ~p(x,y)]); P([y:xs . p(x,y)]) |] ==> \
-\            P(x#xs) |] \
-\ ==> P(xs)"
+ "[| P([]); 
+    !!x xs. [| P([y:xs . ~p(x,y)]); P([y:xs . p(x,y)]) |] ==> 
+            P(x#xs) |] 
+ ==> P(xs)"
 end