Sorting algorithms/Strand sort: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,631: / Line 1,631: @@
 =={{header|Quackery}}==
-<syntaxhighlight lang="Quackery">  [ [] temp put
+<syntaxhighlight lang="Quackery">  [ [] swap
+split witheach
+      [ over -1 peek
+        over > iff
+          [ swap dip join ]
+        else join ] ]       is sift       (   [ --> [ [ )
+  [ [] temp put
     [ dup  [] != while
       over [] != while
@@ Line 1,646: / Line 1,653: @@
   [ [] swap
-split witheach
+    [ sift
-      [ over -1 peek
-        over > iff
-          [ swap dip join ]
-        else join ] ]       is unbraid    (   [ --> [ [ )
-  [ [] swap
-    [ unbraid
       rot merge swap
       dup [] = until ]