Proof of Theorem tz7.48lem
| Step | Hyp | Ref
| Expression |
| 1 | | tz7.48.1 |
. . . . . 6
⊢ 𝐹 Fn On |
| 2 | | dffn2 6707 |
. . . . . 6
⊢ (𝐹 Fn On ↔ 𝐹:On⟶V) |
| 3 | 1, 2 | mpbi 233 |
. . . . 5
⊢ 𝐹:On⟶V |
| 4 | | fssres 6744 |
. . . . 5
⊢ ((𝐹:On⟶V ∧ 𝐴 ⊆ On) → (𝐹 ↾ 𝐴):𝐴⟶V) |
| 5 | 3, 4 | mpan 703 |
. . . 4
⊢ (𝐴 ⊆ On → (𝐹 ↾ 𝐴):𝐴⟶V) |
| 6 | | fvres 6900 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ 𝐴 → ((𝐹 ↾ 𝐴)‘𝑥) = (𝐹‘𝑥)) |
| 7 | | fvres 6900 |
. . . . . . . . . . . 12
⊢ (𝑦 ∈ 𝐴 → ((𝐹 ↾ 𝐴)‘𝑦) = (𝐹‘𝑦)) |
| 8 | 6, 7 | eqeqan12d 2774 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (((𝐹 ↾ 𝐴)‘𝑥) = ((𝐹 ↾ 𝐴)‘𝑦) ↔ (𝐹‘𝑥) = (𝐹‘𝑦))) |
| 9 | 8 | necon3abid 2991 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (((𝐹 ↾ 𝐴)‘𝑥) ≠ ((𝐹 ↾ 𝐴)‘𝑦) ↔ ¬ (𝐹‘𝑥) = (𝐹‘𝑦))) |
| 10 | 9 | imbi2d 343 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → ((𝑦 ∈ 𝑥 → ((𝐹 ↾ 𝐴)‘𝑥) ≠ ((𝐹 ↾ 𝐴)‘𝑦)) ↔ (𝑦 ∈ 𝑥 → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)))) |
| 11 | 10 | exbiri 823 |
. . . . . . . 8
⊢ (𝑥 ∈ 𝐴 → (𝑦 ∈ 𝐴 → ((𝑦 ∈ 𝑥 → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)) → (𝑦 ∈ 𝑥 → ((𝐹 ↾ 𝐴)‘𝑥) ≠ ((𝐹 ↾ 𝐴)‘𝑦))))) |
| 12 | 11 | com23 87 |
. . . . . . 7
⊢ (𝑥 ∈ 𝐴 → ((𝑦 ∈ 𝑥 → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)) → (𝑦 ∈ 𝐴 → (𝑦 ∈ 𝑥 → ((𝐹 ↾ 𝐴)‘𝑥) ≠ ((𝐹 ↾ 𝐴)‘𝑦))))) |
| 13 | 12 | ralimdv2 3171 |
. . . . . 6
⊢ (𝑥 ∈ 𝐴 → (∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦) → ∀𝑦 ∈ 𝐴 (𝑦 ∈ 𝑥 → ((𝐹 ↾ 𝐴)‘𝑥) ≠ ((𝐹 ↾ 𝐴)‘𝑦)))) |
| 14 | 13 | ralimia 3096 |
. . . . 5
⊢
(∀𝑥 ∈
𝐴 ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦) → ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑦 ∈ 𝑥 → ((𝐹 ↾ 𝐴)‘𝑥) ≠ ((𝐹 ↾ 𝐴)‘𝑦))) |
| 15 | | onelfvnef1 8435 |
. . . . 5
⊢ (((𝐹 ↾ 𝐴):𝐴⟶V ∧ 𝐴 ⊆ On ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑦 ∈ 𝑥 → ((𝐹 ↾ 𝐴)‘𝑥) ≠ ((𝐹 ↾ 𝐴)‘𝑦))) → (𝐹 ↾ 𝐴):𝐴–1-1→V) |
| 16 | 14, 15 | syl3an3 1183 |
. . . 4
⊢ (((𝐹 ↾ 𝐴):𝐴⟶V ∧ 𝐴 ⊆ On ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦)) → (𝐹 ↾ 𝐴):𝐴–1-1→V) |
| 17 | 5, 16 | syl3an1 1181 |
. . 3
⊢ ((𝐴 ⊆ On ∧ 𝐴 ⊆ On ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦)) → (𝐹 ↾ 𝐴):𝐴–1-1→V) |
| 18 | 17 | 3anidm12 1446 |
. 2
⊢ ((𝐴 ⊆ On ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦)) → (𝐹 ↾ 𝐴):𝐴–1-1→V) |
| 19 | | df-f1 6540 |
. . 3
⊢ ((𝐹 ↾ 𝐴):𝐴–1-1→V ↔ ((𝐹 ↾ 𝐴):𝐴⟶V ∧ Fun ◡(𝐹 ↾ 𝐴))) |
| 20 | 19 | simprbi 503 |
. 2
⊢ ((𝐹 ↾ 𝐴):𝐴–1-1→V → Fun ◡(𝐹 ↾ 𝐴)) |
| 21 | 18, 20 | syl 18 |
1
⊢ ((𝐴 ⊆ On ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦)) → Fun ◡(𝐹 ↾ 𝐴)) |