Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/ex/Qsort.thy
changeset 8524 f990040535c9
parent 8414 5983668cac15
child 8590 89675b444abe 
--- a/src/HOL/ex/Qsort.thy	Mon Mar 20 10:24:07 2000 +0100
+++ b/src/HOL/ex/Qsort.thy	Mon Mar 20 10:26:34 2000 +0100
@@ -10,7 +10,7 @@
 consts qsort :: "((['a,'a] => bool) * 'a list) => 'a list"
 
 recdef qsort "measure (size o snd)"
-    simpset "simpset() addsimps [less_Suc_eq_le]"
+    simpset "simpset() addsimps [length_filter RS le_less_trans]"
     
     "qsort(le, [])   = []"
isabelle