Fibonacci word: Difference between revisions

Content added Content deleted

Inline

@@ Line 134: / Line 134: @@
     ones = zeros = 0;
-    i = -(count = b_length(b));
+    i = -(count = ~b);
     while (i) {
         if (b[i] == '0') {
@@ Line 157: / Line 157: @@
     b = "0";
-    o_form("%2d %9d /w12p10d10/ ~\n", 1, b_length(a), 0r, a);
+    o_form("%2d %9d /w12p10d10/ ~\n", 1, ~a, 0r, a);
-    o_form("%2d %9d /w12p10d10/ ~\n", 2, b_length(b), 0r, b);
+    o_form("%2d %9d /w12p10d10/ ~\n", 2, ~b, 0r, b);
     i = 3;
     while (i <= 37) {
-        b_stock(a, 0, b);
+        bu_copy(a, 0, b);
-        o_form("%2d %9d /w12p10d10/ ~\n", i, b_length(a), entropy(a),
+        o_form("%2d %9d /w12p10d10/ ~\n", i, ~a, entropy(a),
-               __hold(i < 10, a, ""));
+               i < 10 ? a.string : "");
         i += 1;
-        b_swap(a, b);
+        b.swap(a);
     }