| ⊦ count-i2j(j, j) = j ' |
⊦ i ≤ j → count-i2j(i, j) = count-i2j(i, j - 1) + j
Used simplifier rules: count-empty: ⊦ count-i2j(j, j - 1) = [];%Last: ⊦ ints + i = ints + i '; from specification list[intlista]%Nil: ⊦ [] + ints = ints; from specification list[intlista]%a: ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1; from specification list[intlista]%c-04: ⊦ i ' = i0 ' ↔ i = i0; from specification list[intlista]%lels-01: ⊦ ¬ i ≤ j ↔ j < i; from specification int-abs%irreflexivity: ⊦ ¬ i < i; from specification oelem[intlista] Used terms: j, j