Sorting algorithms/Bubble sort: Difference between revisions

Content deleted Content added

Inline

@@ Line 4,101: / Line 4,101: @@
   { (vector number) --> (vector number) }
   A -> (let N (limit A)
-         (bubble-h (one-pass A N false 2) A N)))
+         (bubble-h (one-pass A N false 2) A N)))</lang>
-(datatype some-globals
+<lang shen>(datatype some-globals
   __________
@@ Line 4,113: / Line 4,113: @@
 (vector-> (value *arr*) 3 4)
 (vector-> (value *arr*) 4 2)
-(vector-> (value *arr*) 5 8)</lang>
+(vector-> (value *arr*) 5 8)
+(bubble-sort (value *arr*))</lang>
-<lang shen>(bubble-sort (value *arr*))</lang>
 Here is a more idiomatic implementation: