| prime(i), 0 < i ⊦ filterFun(λ j. gcd(i, j) = 1, count-i2j(1, i - 1)) + (gcd(i, i) = 1 ⊃ i ';[]) = count-i2j(1, i - 1) |
prime(i), 0 < i ⊦ filterFun(λ j. gcd(i, j) = 1, count-i2j(1, i - 1)) + (i = 1 ⊃ 1 ';[]) = count-i2j(1, i - 1)
Used simplifier rules: gcd-same-01: ⊦ 0 < j → gcd(j, j) = j; from specification int-gcd