Proof of Theorem zorn2lem1
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | zorn2lem.3 | . . . . 5
⊢ 𝐹 = recs((𝑓 ∈ V ↦ (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣))) | 
| 2 | 1 | tfr2 8438 | . . . 4
⊢ (𝑥 ∈ On → (𝐹‘𝑥) = ((𝑓 ∈ V ↦ (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣))‘(𝐹 ↾ 𝑥))) | 
| 3 | 2 | adantr 480 | . . 3
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → (𝐹‘𝑥) = ((𝑓 ∈ V ↦ (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣))‘(𝐹 ↾ 𝑥))) | 
| 4 | 1 | tfr1 8437 | . . . . . 6
⊢ 𝐹 Fn On | 
| 5 |  | fnfun 6668 | . . . . . 6
⊢ (𝐹 Fn On → Fun 𝐹) | 
| 6 | 4, 5 | ax-mp 5 | . . . . 5
⊢ Fun 𝐹 | 
| 7 |  | vex 3484 | . . . . 5
⊢ 𝑥 ∈ V | 
| 8 |  | resfunexg 7235 | . . . . 5
⊢ ((Fun
𝐹 ∧ 𝑥 ∈ V) → (𝐹 ↾ 𝑥) ∈ V) | 
| 9 | 6, 7, 8 | mp2an 692 | . . . 4
⊢ (𝐹 ↾ 𝑥) ∈ V | 
| 10 |  | rneq 5947 | . . . . . . . . . . . 12
⊢ (𝑓 = (𝐹 ↾ 𝑥) → ran 𝑓 = ran (𝐹 ↾ 𝑥)) | 
| 11 |  | df-ima 5698 | . . . . . . . . . . . 12
⊢ (𝐹 “ 𝑥) = ran (𝐹 ↾ 𝑥) | 
| 12 | 10, 11 | eqtr4di 2795 | . . . . . . . . . . 11
⊢ (𝑓 = (𝐹 ↾ 𝑥) → ran 𝑓 = (𝐹 “ 𝑥)) | 
| 13 | 12 | eleq2d 2827 | . . . . . . . . . 10
⊢ (𝑓 = (𝐹 ↾ 𝑥) → (𝑔 ∈ ran 𝑓 ↔ 𝑔 ∈ (𝐹 “ 𝑥))) | 
| 14 | 13 | imbi1d 341 | . . . . . . . . 9
⊢ (𝑓 = (𝐹 ↾ 𝑥) → ((𝑔 ∈ ran 𝑓 → 𝑔𝑅𝑧) ↔ (𝑔 ∈ (𝐹 “ 𝑥) → 𝑔𝑅𝑧))) | 
| 15 | 14 | ralbidv2 3174 | . . . . . . . 8
⊢ (𝑓 = (𝐹 ↾ 𝑥) → (∀𝑔 ∈ ran 𝑓 𝑔𝑅𝑧 ↔ ∀𝑔 ∈ (𝐹 “ 𝑥)𝑔𝑅𝑧)) | 
| 16 | 15 | rabbidv 3444 | . . . . . . 7
⊢ (𝑓 = (𝐹 ↾ 𝑥) → {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ ran 𝑓 𝑔𝑅𝑧} = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑥)𝑔𝑅𝑧}) | 
| 17 |  | zorn2lem.4 | . . . . . . 7
⊢ 𝐶 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ ran 𝑓 𝑔𝑅𝑧} | 
| 18 |  | zorn2lem.5 | . . . . . . 7
⊢ 𝐷 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑥)𝑔𝑅𝑧} | 
| 19 | 16, 17, 18 | 3eqtr4g 2802 | . . . . . 6
⊢ (𝑓 = (𝐹 ↾ 𝑥) → 𝐶 = 𝐷) | 
| 20 | 19 | eleq2d 2827 | . . . . . . . 8
⊢ (𝑓 = (𝐹 ↾ 𝑥) → (𝑢 ∈ 𝐶 ↔ 𝑢 ∈ 𝐷)) | 
| 21 | 20 | imbi1d 341 | . . . . . . 7
⊢ (𝑓 = (𝐹 ↾ 𝑥) → ((𝑢 ∈ 𝐶 → ¬ 𝑢𝑤𝑣) ↔ (𝑢 ∈ 𝐷 → ¬ 𝑢𝑤𝑣))) | 
| 22 | 21 | ralbidv2 3174 | . . . . . 6
⊢ (𝑓 = (𝐹 ↾ 𝑥) → (∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣 ↔ ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣)) | 
| 23 | 19, 22 | riotaeqbidv 7391 | . . . . 5
⊢ (𝑓 = (𝐹 ↾ 𝑥) → (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣) = (℩𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣)) | 
| 24 |  | eqid 2737 | . . . . 5
⊢ (𝑓 ∈ V ↦
(℩𝑣 ∈
𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣)) = (𝑓 ∈ V ↦ (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣)) | 
| 25 |  | riotaex 7392 | . . . . 5
⊢
(℩𝑣
∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣) ∈ V | 
| 26 | 23, 24, 25 | fvmpt 7016 | . . . 4
⊢ ((𝐹 ↾ 𝑥) ∈ V → ((𝑓 ∈ V ↦ (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣))‘(𝐹 ↾ 𝑥)) = (℩𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣)) | 
| 27 | 9, 26 | ax-mp 5 | . . 3
⊢ ((𝑓 ∈ V ↦
(℩𝑣 ∈
𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣))‘(𝐹 ↾ 𝑥)) = (℩𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣) | 
| 28 | 3, 27 | eqtrdi 2793 | . 2
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → (𝐹‘𝑥) = (℩𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣)) | 
| 29 |  | simprl 771 | . . . 4
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → 𝑤 We 𝐴) | 
| 30 |  | weso 5676 | . . . . . . 7
⊢ (𝑤 We 𝐴 → 𝑤 Or 𝐴) | 
| 31 | 30 | ad2antrl 728 | . . . . . 6
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → 𝑤 Or 𝐴) | 
| 32 |  | vex 3484 | . . . . . 6
⊢ 𝑤 ∈ V | 
| 33 |  | soex 7943 | . . . . . 6
⊢ ((𝑤 Or 𝐴 ∧ 𝑤 ∈ V) → 𝐴 ∈ V) | 
| 34 | 31, 32, 33 | sylancl 586 | . . . . 5
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → 𝐴 ∈ V) | 
| 35 | 18, 34 | rabexd 5340 | . . . 4
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → 𝐷 ∈ V) | 
| 36 | 18 | ssrab3 4082 | . . . . 5
⊢ 𝐷 ⊆ 𝐴 | 
| 37 | 36 | a1i 11 | . . . 4
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → 𝐷 ⊆ 𝐴) | 
| 38 |  | simprr 773 | . . . 4
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → 𝐷 ≠ ∅) | 
| 39 |  | wereu 5681 | . . . 4
⊢ ((𝑤 We 𝐴 ∧ (𝐷 ∈ V ∧ 𝐷 ⊆ 𝐴 ∧ 𝐷 ≠ ∅)) → ∃!𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣) | 
| 40 | 29, 35, 37, 38, 39 | syl13anc 1374 | . . 3
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → ∃!𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣) | 
| 41 |  | riotacl 7405 | . . 3
⊢
(∃!𝑣 ∈
𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣 → (℩𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣) ∈ 𝐷) | 
| 42 | 40, 41 | syl 17 | . 2
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → (℩𝑣 ∈ 𝐷 ∀𝑢 ∈ 𝐷 ¬ 𝑢𝑤𝑣) ∈ 𝐷) | 
| 43 | 28, 42 | eqeltrd 2841 | 1
⊢ ((𝑥 ∈ On ∧ (𝑤 We 𝐴 ∧ 𝐷 ≠ ∅)) → (𝐹‘𝑥) ∈ 𝐷) |