| n = n0 + # bits, # bits ≤ n ⊦ bits = [], fillsgn(n + 1, bits) = false ' + mklist(false, n0) + bits, bits.first |
⊦ bits = [], fillsgn((n0 + # bits) + 1, bits) = false ' + mklist(false, n0) + bits, bits.first
Used simplifier rules: ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m ≤ m + n;