| i ≠ 1, prime(i), 0 < i ⊦ filterFun(λ j. gcd(i, j) = 1, count-i2j(1, i - 1)) + [] = count-i2j(1, i - 1) |
prime(i), 0 < i ⊦ i = 1, filterFun(λ j. gcd(i, j) = 1, count-i2j(1, i - 1)) = count-i2j(1, i - 1)
Used simplifier rules: a: ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1; from specification list[intlista]%app: ⊦ ints + [] = ints; from specification list[intlista]