| (λ n. (n < # a ' ⊃ a '[n];nf(n - # a '))) = (λ n. (n < # a0 ' ⊃ a0 '[n];nf0(n - # a0 '))) ⊦ a = a0 ∧ ⌜nf⌝ = ⌜nf0⌝ |
(0 < # a ' ⊃ a '[0];nf(0 - # a ')) = (0 < # a0 ' ⊃ a0 '[0];nf0(0 - # a0 ')), (λ n. (n < # a ' ⊃ a '[n];nf(n - # a '))) = (λ n. (n < # a0 ' ⊃ a0 '[n];nf0(n - # a0 '))) ⊦ a = a0 ∧ ⌜nf⌝ = ⌜nf0⌝
Used terms: 0