Update bsort.alan to match bsort.grc (#31)

This edit updates the bsort.alan so i matches the behavior of the grace counterpart, hence they will produce the same output.
kostis · Aug 27, 2024 · d90babc · d90babc
1 parent 9de4527
commit d90babc
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/alan/programs/bsort.alan b/alan/programs/bsort.alan
@@ -49,11 +49,11 @@ main () : proc
    seed = 65;
    i = 0;
    while (i < 16) {
-      seed = (seed * 137 + 220 + i) % 101;
+      seed = (seed * 137 + 221 + i) % 101;
       x[i] = seed;
       i = i+1;
    }
    writeArray("Initial array: ", 16, x);
    bsort(16, x);
-   writeArray("Sorted array: ", 16, x);
+   writeArray("Sorted array:  ", 16, x);
 } -- main