| Step | Hyp | Ref
| Expression |
| 1 | | fveq2 6874 |
. . . . . . 7
⊢ (𝑥 = ∅ → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) = ((rec(𝐹, 𝐵) ↾
ω)‘∅)) |
| 2 | 1 | eleq1d 2845 |
. . . . . 6
⊢ (𝑥 = ∅ → (((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴 ↔ ((rec(𝐹, 𝐵) ↾ ω)‘∅) ∈
𝐴)) |
| 3 | | fveq2 6874 |
. . . . . . 7
⊢ (𝑥 = 𝑧 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) = ((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) |
| 4 | 3 | eleq1d 2845 |
. . . . . 6
⊢ (𝑥 = 𝑧 → (((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴 ↔ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴)) |
| 5 | | fveq2 6874 |
. . . . . . 7
⊢ (𝑥 = suc 𝑧 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) = ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧)) |
| 6 | 5 | eleq1d 2845 |
. . . . . 6
⊢ (𝑥 = suc 𝑧 → (((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴 ↔ ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ∈ 𝐴)) |
| 7 | | mh-inf3f1.2 |
. . . . . . . . 9
⊢ (𝜑 → 𝐵 ∈ (𝐴 ∖ ran 𝐹)) |
| 8 | | fr0g 8423 |
. . . . . . . . 9
⊢ (𝐵 ∈ (𝐴 ∖ ran 𝐹) → ((rec(𝐹, 𝐵) ↾ ω)‘∅) = 𝐵) |
| 9 | 7, 8 | syl 18 |
. . . . . . . 8
⊢ (𝜑 → ((rec(𝐹, 𝐵) ↾ ω)‘∅) = 𝐵) |
| 10 | 9, 7 | eqeltrd 2860 |
. . . . . . 7
⊢ (𝜑 → ((rec(𝐹, 𝐵) ↾ ω)‘∅) ∈
(𝐴 ∖ ran 𝐹)) |
| 11 | 10 | eldifad 3911 |
. . . . . 6
⊢ (𝜑 → ((rec(𝐹, 𝐵) ↾ ω)‘∅) ∈
𝐴) |
| 12 | | mh-inf3f1.1 |
. . . . . . . . . 10
⊢ (𝜑 → 𝐹:𝐴–1-1→𝐴) |
| 13 | | f1f 6767 |
. . . . . . . . . 10
⊢ (𝐹:𝐴–1-1→𝐴 → 𝐹:𝐴⟶𝐴) |
| 14 | 12, 13 | syl 18 |
. . . . . . . . 9
⊢ (𝜑 → 𝐹:𝐴⟶𝐴) |
| 15 | 14 | ffvelcdmda 7073 |
. . . . . . . 8
⊢ ((𝜑 ∧ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ∈ 𝐴) |
| 16 | | frsuc 8424 |
. . . . . . . . 9
⊢ (𝑧 ∈ ω →
((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) = (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧))) |
| 17 | 16 | eleq1d 2845 |
. . . . . . . 8
⊢ (𝑧 ∈ ω →
(((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ∈ 𝐴 ↔ (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ∈ 𝐴)) |
| 18 | 15, 17 | imbitrrid 249 |
. . . . . . 7
⊢ (𝑧 ∈ ω → ((𝜑 ∧ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴) → ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ∈ 𝐴)) |
| 19 | 18 | expd 421 |
. . . . . 6
⊢ (𝑧 ∈ ω → (𝜑 → (((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴 → ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ∈ 𝐴))) |
| 20 | 2, 4, 6, 11, 19 | finds2 7894 |
. . . . 5
⊢ (𝑥 ∈ ω → (𝜑 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴)) |
| 21 | 20 | com12 33 |
. . . 4
⊢ (𝜑 → (𝑥 ∈ ω → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴)) |
| 22 | 21 | ralrimiv 3153 |
. . 3
⊢ (𝜑 → ∀𝑥 ∈ ω ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴) |
| 23 | | frfnom 8422 |
. . . 4
⊢
(rec(𝐹, 𝐵) ↾ ω) Fn
ω |
| 24 | | ffnfv 7108 |
. . . 4
⊢
((rec(𝐹, 𝐵) ↾
ω):ω⟶𝐴
↔ ((rec(𝐹, 𝐵) ↾ ω) Fn ω
∧ ∀𝑥 ∈
ω ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴)) |
| 25 | 23, 24 | mpbiran 722 |
. . 3
⊢
((rec(𝐹, 𝐵) ↾
ω):ω⟶𝐴
↔ ∀𝑥 ∈
ω ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴) |
| 26 | 22, 25 | sylibr 237 |
. 2
⊢ (𝜑 → (rec(𝐹, 𝐵) ↾ ω):ω⟶𝐴) |
| 27 | 1 | neeq1d 3014 |
. . . . . . 7
⊢ (𝑥 = ∅ → (((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ ((rec(𝐹, 𝐵) ↾ ω)‘∅) ≠
((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 28 | 27 | raleqbi1dv 3329 |
. . . . . 6
⊢ (𝑥 = ∅ → (∀𝑦 ∈ 𝑥 ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ ∀𝑦 ∈ ∅ ((rec(𝐹, 𝐵) ↾ ω)‘∅) ≠
((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 29 | 3 | neeq1d 3014 |
. . . . . . 7
⊢ (𝑥 = 𝑧 → (((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 30 | 29 | raleqbi1dv 3329 |
. . . . . 6
⊢ (𝑥 = 𝑧 → (∀𝑦 ∈ 𝑥 ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 31 | 5 | neeq1d 3014 |
. . . . . . 7
⊢ (𝑥 = suc 𝑧 → (((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 32 | 31 | raleqbi1dv 3329 |
. . . . . 6
⊢ (𝑥 = suc 𝑧 → (∀𝑦 ∈ 𝑥 ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ ∀𝑦 ∈ suc 𝑧((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 33 | | ral0 4454 |
. . . . . . 7
⊢
∀𝑦 ∈
∅ ((rec(𝐹, 𝐵) ↾
ω)‘∅) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) |
| 34 | 33 | a1i 11 |
. . . . . 6
⊢ (𝜑 → ∀𝑦 ∈ ∅ ((rec(𝐹, 𝐵) ↾ ω)‘∅) ≠
((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 35 | | nfv 1947 |
. . . . . . . . . 10
⊢
Ⅎ𝑦(𝜑 ∧ 𝑧 ∈ ω) |
| 36 | | nfra1 3286 |
. . . . . . . . . 10
⊢
Ⅎ𝑦∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) |
| 37 | 35, 36 | nfan 1932 |
. . . . . . . . 9
⊢
Ⅎ𝑦((𝜑 ∧ 𝑧 ∈ ω) ∧ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 38 | 16 | ad3antlr 744 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑧 ∈ ω) ∧ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) → ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) = (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧))) |
| 39 | | fveq2 6874 |
. . . . . . . . . . . 12
⊢ (𝑦 = ∅ → ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) = ((rec(𝐹, 𝐵) ↾
ω)‘∅)) |
| 40 | 39 | neeq2d 3015 |
. . . . . . . . . . 11
⊢ (𝑦 = ∅ → ((𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾
ω)‘∅))) |
| 41 | | peano2b 7878 |
. . . . . . . . . . . . . . 15
⊢ (𝑧 ∈ ω ↔ suc 𝑧 ∈
ω) |
| 42 | | elnn 7872 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑦 ∈ suc 𝑧 ∧ suc 𝑧 ∈ ω) → 𝑦 ∈ ω) |
| 43 | 42 | ancoms 464 |
. . . . . . . . . . . . . . 15
⊢ ((suc
𝑧 ∈ ω ∧
𝑦 ∈ suc 𝑧) → 𝑦 ∈ ω) |
| 44 | 41, 43 | sylanb 593 |
. . . . . . . . . . . . . 14
⊢ ((𝑧 ∈ ω ∧ 𝑦 ∈ suc 𝑧) → 𝑦 ∈ ω) |
| 45 | 44 | ad4ant24 767 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑧 ∈ ω) ∧ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) → 𝑦 ∈ ω) |
| 46 | | nnsuc 7879 |
. . . . . . . . . . . . 13
⊢ ((𝑦 ∈ ω ∧ 𝑦 ≠ ∅) →
∃𝑥 ∈ ω
𝑦 = suc 𝑥) |
| 47 | 45, 46 | sylan 592 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) → ∃𝑥 ∈ ω 𝑦 = suc 𝑥) |
| 48 | | fveq2 6874 |
. . . . . . . . . . . . . . . 16
⊢ (𝑦 = 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) = ((rec(𝐹, 𝐵) ↾ ω)‘𝑥)) |
| 49 | 48 | neeq2d 3015 |
. . . . . . . . . . . . . . 15
⊢ (𝑦 = 𝑥 → (((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) ↔ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 50 | | simp-4r 796 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 51 | | simprr 785 |
. . . . . . . . . . . . . . . . 17
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → 𝑦 = suc 𝑥) |
| 52 | | simpllr 788 |
. . . . . . . . . . . . . . . . 17
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → 𝑦 ∈ suc 𝑧) |
| 53 | 51, 52 | eqeltrrd 2861 |
. . . . . . . . . . . . . . . 16
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → suc 𝑥 ∈ suc 𝑧) |
| 54 | | nnord 7869 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑧 ∈ ω → Ord 𝑧) |
| 55 | 54 | ad5antlr 748 |
. . . . . . . . . . . . . . . . 17
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → Ord 𝑧) |
| 56 | | ordsucelsuc 7817 |
. . . . . . . . . . . . . . . . 17
⊢ (Ord
𝑧 → (𝑥 ∈ 𝑧 ↔ suc 𝑥 ∈ suc 𝑧)) |
| 57 | 55, 56 | syl 18 |
. . . . . . . . . . . . . . . 16
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → (𝑥 ∈ 𝑧 ↔ suc 𝑥 ∈ suc 𝑧)) |
| 58 | 53, 57 | mpbird 260 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → 𝑥 ∈ 𝑧) |
| 59 | 49, 50, 58 | rspcdva 3577 |
. . . . . . . . . . . . . 14
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑥)) |
| 60 | | simp-5l 797 |
. . . . . . . . . . . . . . . 16
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → 𝜑) |
| 61 | 60, 12 | syl 18 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → 𝐹:𝐴–1-1→𝐴) |
| 62 | 26 | ffvelcdmda 7073 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑧 ∈ ω) → ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴) |
| 63 | 62 | ad4antr 745 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴) |
| 64 | | simprl 783 |
. . . . . . . . . . . . . . . 16
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → 𝑥 ∈ ω) |
| 65 | 64, 60, 20 | sylc 66 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴) |
| 66 | | f1fveq 7255 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐹:𝐴–1-1→𝐴 ∧ (((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴 ∧ ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴)) → ((𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) = (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑥)) ↔ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) = ((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 67 | 66 | necon3bid 2999 |
. . . . . . . . . . . . . . 15
⊢ ((𝐹:𝐴–1-1→𝐴 ∧ (((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ∈ 𝐴 ∧ ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ∈ 𝐴)) → ((𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑥)) ↔ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 68 | 61, 63, 65, 67 | syl12anc 850 |
. . . . . . . . . . . . . 14
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → ((𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑥)) ↔ ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 69 | 59, 68 | mpbird 260 |
. . . . . . . . . . . . 13
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 70 | | fveq2 6874 |
. . . . . . . . . . . . . . 15
⊢ (𝑦 = suc 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) = ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑥)) |
| 71 | | frsuc 8424 |
. . . . . . . . . . . . . . 15
⊢ (𝑥 ∈ ω →
((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑥) = (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 72 | 70, 71 | sylan9eqr 2817 |
. . . . . . . . . . . . . 14
⊢ ((𝑥 ∈ ω ∧ 𝑦 = suc 𝑥) → ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) = (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 73 | 72 | adantl 487 |
. . . . . . . . . . . . 13
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) = (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑥))) |
| 74 | 69, 73 | neeqtrrd 3029 |
. . . . . . . . . . . 12
⊢
((((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) ∧ (𝑥 ∈ ω ∧ 𝑦 = suc 𝑥)) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 75 | 47, 74 | rexlimddv 3169 |
. . . . . . . . . . 11
⊢
(((((𝜑 ∧ 𝑧 ∈ ω) ∧
∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) ∧ 𝑦 ≠ ∅) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 76 | 14 | ffnd 6699 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝐹 Fn 𝐴) |
| 77 | 76 | adantr 486 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑧 ∈ ω) → 𝐹 Fn 𝐴) |
| 78 | 77, 62 | fnfvelrnd 7071 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑧 ∈ ω) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ∈ ran 𝐹) |
| 79 | 10 | adantr 486 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑧 ∈ ω) → ((rec(𝐹, 𝐵) ↾ ω)‘∅) ∈
(𝐴 ∖ ran 𝐹)) |
| 80 | | elneeldif 3913 |
. . . . . . . . . . . . 13
⊢ (((𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ∈ ran 𝐹 ∧ ((rec(𝐹, 𝐵) ↾ ω)‘∅) ∈
(𝐴 ∖ ran 𝐹)) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾
ω)‘∅)) |
| 81 | 78, 79, 80 | syl2anc 596 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑧 ∈ ω) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾
ω)‘∅)) |
| 82 | 81 | ad2antrr 739 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑧 ∈ ω) ∧ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾
ω)‘∅)) |
| 83 | 40, 75, 82 | pm2.61ne 3040 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑧 ∈ ω) ∧ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) → (𝐹‘((rec(𝐹, 𝐵) ↾ ω)‘𝑧)) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 84 | 38, 83 | eqnetrd 3022 |
. . . . . . . . 9
⊢ ((((𝜑 ∧ 𝑧 ∈ ω) ∧ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) ∧ 𝑦 ∈ suc 𝑧) → ((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 85 | 37, 84 | ralrimia 3261 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑧 ∈ ω) ∧ ∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) → ∀𝑦 ∈ suc 𝑧((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)) |
| 86 | 85 | exp31 425 |
. . . . . . 7
⊢ (𝜑 → (𝑧 ∈ ω → (∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) → ∀𝑦 ∈ suc 𝑧((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)))) |
| 87 | 86 | com12 33 |
. . . . . 6
⊢ (𝑧 ∈ ω → (𝜑 → (∀𝑦 ∈ 𝑧 ((rec(𝐹, 𝐵) ↾ ω)‘𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) → ∀𝑦 ∈ suc 𝑧((rec(𝐹, 𝐵) ↾ ω)‘suc 𝑧) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)))) |
| 88 | 28, 30, 32, 34, 87 | finds2 7894 |
. . . . 5
⊢ (𝑥 ∈ ω → (𝜑 → ∀𝑦 ∈ 𝑥 ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 89 | | rsp 3250 |
. . . . 5
⊢
(∀𝑦 ∈
𝑥 ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦) → (𝑦 ∈ 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 90 | 88, 89 | syl6com 38 |
. . . 4
⊢ (𝜑 → (𝑥 ∈ ω → (𝑦 ∈ 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)))) |
| 91 | 90 | adantrd 497 |
. . 3
⊢ (𝜑 → ((𝑥 ∈ ω ∧ 𝑦 ∈ ω) → (𝑦 ∈ 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦)))) |
| 92 | 91 | ralrimivv 3203 |
. 2
⊢ (𝜑 → ∀𝑥 ∈ ω ∀𝑦 ∈ ω (𝑦 ∈ 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) |
| 93 | | omsson 7865 |
. . 3
⊢ ω
⊆ On |
| 94 | | onelfvnef1 8428 |
. . 3
⊢
(((rec(𝐹, 𝐵) ↾
ω):ω⟶𝐴
∧ ω ⊆ On ∧ ∀𝑥 ∈ ω ∀𝑦 ∈ ω (𝑦 ∈ 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) → (rec(𝐹, 𝐵) ↾ ω):ω–1-1→𝐴) |
| 95 | 93, 94 | mp3an2 1478 |
. 2
⊢
(((rec(𝐹, 𝐵) ↾
ω):ω⟶𝐴
∧ ∀𝑥 ∈
ω ∀𝑦 ∈
ω (𝑦 ∈ 𝑥 → ((rec(𝐹, 𝐵) ↾ ω)‘𝑥) ≠ ((rec(𝐹, 𝐵) ↾ ω)‘𝑦))) → (rec(𝐹, 𝐵) ↾ ω):ω–1-1→𝐴) |
| 96 | 26, 92, 95 | syl2anc 596 |
1
⊢ (𝜑 → (rec(𝐹, 𝐵) ↾ ω):ω–1-1→𝐴) |