| n < # x + # x0 ⊦ (x + x0)[n] = (n < # x ⊃ x[n];x0[n - # x]), # x + # x0 = 0 |
Used simplifier rules: get-append-grt: ⊦ ¬ n < # x → (x + y)[n] = y[n - # x]; from specification list-del%a: ⊦ (x + y) + z = x + y + z; from specification list%get-append-less: ⊦ n < # x → (x + y)[n] = x[n]; from specification list-del