Theorem pwfseqlem3 9361

Description: Lemma for pwfseq 9365. Using the construction 𝐷 from pwfseqlem1 9359, produce a function 𝐹 that maps any well-ordered infinite set to an element outside the set. (Contributed by Mario Carneiro, 31-May-2015.)

Hypotheses

Ref	Expression
pwfseqlem4.g	⊢ (𝜑 → 𝐺:𝒫 𝐴–1-1→∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛))
pwfseqlem4.x	⊢ (𝜑 → 𝑋 ⊆ 𝐴)
pwfseqlem4.h	⊢ (𝜑 → 𝐻:ω–1-1-onto→𝑋)
pwfseqlem4.ps	⊢ (𝜓 ↔ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) ∧ ω ≼ 𝑥))
pwfseqlem4.k	⊢ ((𝜑 ∧ 𝜓) → 𝐾:∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛)–1-1→𝑥)
pwfseqlem4.d	⊢ 𝐷 = (𝐺‘{𝑤 ∈ 𝑥 ∣ ((◡𝐾‘𝑤) ∈ ran 𝐺 ∧ ¬ 𝑤 ∈ (◡𝐺‘(◡𝐾‘𝑤)))})
pwfseqlem4.f	⊢ 𝐹 = (𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})))

Assertion

Ref	Expression
pwfseqlem3	⊢ ((𝜑 ∧ 𝜓) → (𝑥𝐹𝑟) ∈ (𝐴 ∖ 𝑥))

Distinct variable groups:   𝑛,𝑟,𝑤,𝑥,𝑧   𝐷,𝑛,𝑧   𝑤,𝐺   𝑤,𝐾   𝐻,𝑟,𝑥,𝑧   𝜑,𝑛,𝑟,𝑥,𝑧   𝜓,𝑛,𝑧   𝐴,𝑛,𝑟,𝑥,𝑧

Allowed substitution hints:   𝜑(𝑤)   𝜓(𝑥,𝑤,𝑟)   𝐴(𝑤)   𝐷(𝑥,𝑤,𝑟)   𝐹(𝑥,𝑧,𝑤,𝑛,𝑟)   𝐺(𝑥,𝑧,𝑛,𝑟)   𝐻(𝑤,𝑛)   𝐾(𝑥,𝑧,𝑛,𝑟)   𝑋(𝑥,𝑧,𝑤,𝑛,𝑟)

Proof of Theorem pwfseqlem3

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		vex 3176	. . . 4 ⊢ 𝑥 ∈ V
2		vex 3176	. . . 4 ⊢ 𝑟 ∈ V
3		fvex 6113	. . . . 5 ⊢ (𝐻‘(card‘𝑥)) ∈ V
4		fvex 6113	. . . . 5 ⊢ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ V
5	3, 4	ifex 4106	. . . 4 ⊢ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) ∈ V
6		pwfseqlem4.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})))
7	6	ovmpt4g 6681	. . . 4 ⊢ ((𝑥 ∈ V ∧ 𝑟 ∈ V ∧ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) ∈ V) → (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})))
8	1, 2, 5, 7	mp3an 1416	. . 3 ⊢ (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
9		pwfseqlem4.ps	. . . . . . . 8 ⊢ (𝜓 ↔ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) ∧ ω ≼ 𝑥))
10	9	simprbi 479	. . . . . . 7 ⊢ (𝜓 → ω ≼ 𝑥)
11	10	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝜓) → ω ≼ 𝑥)
12		domnsym 7971	. . . . . 6 ⊢ (ω ≼ 𝑥 → ¬ 𝑥 ≺ ω)
13	11, 12	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝑥 ≺ ω)
14		isfinite 8432	. . . . 5 ⊢ (𝑥 ∈ Fin ↔ 𝑥 ≺ ω)
15	13, 14	sylnibr 318	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝑥 ∈ Fin)
16	15	iffalsed 4047	. . 3 ⊢ ((𝜑 ∧ 𝜓) → if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
17	8, 16	syl5eq 2656	. 2 ⊢ ((𝜑 ∧ 𝜓) → (𝑥𝐹𝑟) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
18		pwfseqlem4.g	. . . . . . 7 ⊢ (𝜑 → 𝐺:𝒫 𝐴–1-1→∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛))
19		pwfseqlem4.x	. . . . . . 7 ⊢ (𝜑 → 𝑋 ⊆ 𝐴)
20		pwfseqlem4.h	. . . . . . 7 ⊢ (𝜑 → 𝐻:ω–1-1-onto→𝑋)
21		pwfseqlem4.k	. . . . . . 7 ⊢ ((𝜑 ∧ 𝜓) → 𝐾:∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛)–1-1→𝑥)
22		pwfseqlem4.d	. . . . . . 7 ⊢ 𝐷 = (𝐺‘{𝑤 ∈ 𝑥 ∣ ((◡𝐾‘𝑤) ∈ ran 𝐺 ∧ ¬ 𝑤 ∈ (◡𝐺‘(◡𝐾‘𝑤)))})
23	18, 19, 20, 9, 21, 22	pwfseqlem1 9359	. . . . . 6 ⊢ ((𝜑 ∧ 𝜓) → 𝐷 ∈ (∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛) ∖ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛)))
24		eldif 3550	. . . . . 6 ⊢ (𝐷 ∈ (∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛) ∖ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛)) ↔ (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛) ∧ ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛)))
25	23, 24	sylib 207	. . . . 5 ⊢ ((𝜑 ∧ 𝜓) → (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛) ∧ ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛)))
26	25	simpld 474	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → 𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛))
27		eliun 4460	. . . 4 ⊢ (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑𝑚 𝑛) ↔ ∃𝑛 ∈ ω 𝐷 ∈ (𝐴 ↑𝑚 𝑛))
28	26, 27	sylib 207	. . 3 ⊢ ((𝜑 ∧ 𝜓) → ∃𝑛 ∈ ω 𝐷 ∈ (𝐴 ↑𝑚 𝑛))
29		elmapi 7765	. . . . . 6 ⊢ (𝐷 ∈ (𝐴 ↑𝑚 𝑛) → 𝐷:𝑛⟶𝐴)
30	29	ad2antll 761	. . . . 5 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → 𝐷:𝑛⟶𝐴)
31		ssiun2 4499	. . . . . . . . 9 ⊢ (𝑛 ∈ ω → (𝑥 ↑𝑚 𝑛) ⊆ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛))
32	31	ad2antrl 760	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (𝑥 ↑𝑚 𝑛) ⊆ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛))
33	25	simprd 478	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛))
34	33	adantr 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑𝑚 𝑛))
35	32, 34	ssneldd 3571	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ¬ 𝐷 ∈ (𝑥 ↑𝑚 𝑛))
36		vex 3176	. . . . . . . . 9 ⊢ 𝑛 ∈ V
37	1, 36	elmap 7772	. . . . . . . 8 ⊢ (𝐷 ∈ (𝑥 ↑𝑚 𝑛) ↔ 𝐷:𝑛⟶𝑥)
38		ffn 5958	. . . . . . . . 9 ⊢ (𝐷:𝑛⟶𝐴 → 𝐷 Fn 𝑛)
39		ffnfv 6295	. . . . . . . . . 10 ⊢ (𝐷:𝑛⟶𝑥 ↔ (𝐷 Fn 𝑛 ∧ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
40	39	baib 942	. . . . . . . . 9 ⊢ (𝐷 Fn 𝑛 → (𝐷:𝑛⟶𝑥 ↔ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
41	30, 38, 40	3syl 18	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (𝐷:𝑛⟶𝑥 ↔ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
42	37, 41	syl5bb 271	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (𝐷 ∈ (𝑥 ↑𝑚 𝑛) ↔ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
43	35, 42	mtbid 313	. . . . . 6 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ¬ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥)
44		nnon 6963	. . . . . . . . 9 ⊢ (𝑛 ∈ ω → 𝑛 ∈ On)
45	44	ad2antrl 760	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → 𝑛 ∈ On)
46		ssrab2 3650	. . . . . . . . . 10 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ ω
47		omsson 6961	. . . . . . . . . 10 ⊢ ω ⊆ On
48	46, 47	sstri 3577	. . . . . . . . 9 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ On
49		ordom 6966	. . . . . . . . . . . . 13 ⊢ Ord ω
50		simprl 790	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → 𝑛 ∈ ω)
51		ordelss 5656	. . . . . . . . . . . . 13 ⊢ ((Ord ω ∧ 𝑛 ∈ ω) → 𝑛 ⊆ ω)
52	49, 50, 51	sylancr 694	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → 𝑛 ⊆ ω)
53		rexnal 2978	. . . . . . . . . . . . 13 ⊢ (∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥 ↔ ¬ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥)
54	43, 53	sylibr 223	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥)
55		ssrexv 3630	. . . . . . . . . . . 12 ⊢ (𝑛 ⊆ ω → (∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥 → ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥))
56	52, 54, 55	sylc 63	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥)
57		rabn0 3912	. . . . . . . . . . 11 ⊢ ({𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅ ↔ ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥)
58	56, 57	sylibr 223	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅)
59		onint 6887	. . . . . . . . . 10 ⊢ (({𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ On ∧ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})
60	48, 58, 59	sylancr 694	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})
61	48, 60	sseldi 3566	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ On)
62		ontri1 5674	. . . . . . . 8 ⊢ ((𝑛 ∈ On ∧ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ On) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛))
63	45, 61, 62	syl2anc 691	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛))
64		ssintrab 4435	. . . . . . . 8 ⊢ (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ∀𝑧 ∈ ω (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧))
65		nnon 6963	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ ω → 𝑧 ∈ On)
66		ontri1 5674	. . . . . . . . . . . . . . . 16 ⊢ ((𝑛 ∈ On ∧ 𝑧 ∈ On) → (𝑛 ⊆ 𝑧 ↔ ¬ 𝑧 ∈ 𝑛))
67	44, 65, 66	syl2an 493	. . . . . . . . . . . . . . 15 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → (𝑛 ⊆ 𝑧 ↔ ¬ 𝑧 ∈ 𝑛))
68	67	imbi2d 329	. . . . . . . . . . . . . 14 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → ((¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) ↔ (¬ (𝐷‘𝑧) ∈ 𝑥 → ¬ 𝑧 ∈ 𝑛)))
69		con34b 305	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥) ↔ (¬ (𝐷‘𝑧) ∈ 𝑥 → ¬ 𝑧 ∈ 𝑛))
70	68, 69	syl6bbr 277	. . . . . . . . . . . . 13 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → ((¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) ↔ (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
71	70	pm5.74da 719	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) ↔ (𝑧 ∈ ω → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥))))
72		bi2.04 375	. . . . . . . . . . . 12 ⊢ ((𝑧 ∈ ω → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)) ↔ (𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥)))
73	71, 72	syl6bb 275	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) ↔ (𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥))))
74		elnn 6967	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ 𝑛 ∧ 𝑛 ∈ ω) → 𝑧 ∈ ω)
75		pm2.27 41	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ ω → ((𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥) → (𝐷‘𝑧) ∈ 𝑥))
76	74, 75	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝑛 ∧ 𝑛 ∈ ω) → ((𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥) → (𝐷‘𝑧) ∈ 𝑥))
77	76	expcom 450	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ω → (𝑧 ∈ 𝑛 → ((𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥) → (𝐷‘𝑧) ∈ 𝑥)))
78	77	a2d 29	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥)) → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
79	73, 78	sylbid 229	. . . . . . . . . 10 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
80	79	ad2antrl 760	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
81	80	ralimdv2 2944	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (∀𝑧 ∈ ω (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) → ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
82	64, 81	syl5bi 231	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
83	63, 82	sylbird 249	. . . . . 6 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛 → ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
84	43, 83	mt3d 139	. . . . 5 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛)
85	30, 84	ffvelrnd 6268	. . . 4 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝐴)
86		fveq2 6103	. . . . . . . . 9 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → (𝐷‘𝑦) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
87	86	eleq1d 2672	. . . . . . . 8 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ((𝐷‘𝑦) ∈ 𝑥 ↔ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
88	87	notbid 307	. . . . . . 7 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → (¬ (𝐷‘𝑦) ∈ 𝑥 ↔ ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
89		fveq2 6103	. . . . . . . . . 10 ⊢ (𝑧 = 𝑦 → (𝐷‘𝑧) = (𝐷‘𝑦))
90	89	eleq1d 2672	. . . . . . . . 9 ⊢ (𝑧 = 𝑦 → ((𝐷‘𝑧) ∈ 𝑥 ↔ (𝐷‘𝑦) ∈ 𝑥))
91	90	notbid 307	. . . . . . . 8 ⊢ (𝑧 = 𝑦 → (¬ (𝐷‘𝑧) ∈ 𝑥 ↔ ¬ (𝐷‘𝑦) ∈ 𝑥))
92	91	cbvrabv 3172	. . . . . . 7 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} = {𝑦 ∈ ω ∣ ¬ (𝐷‘𝑦) ∈ 𝑥}
93	88, 92	elrab2 3333	. . . . . 6 ⊢ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ ω ∧ ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
94	93	simprbi 479	. . . . 5 ⊢ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥)
95	60, 94	syl 17	. . . 4 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥)
96	85, 95	eldifd 3551	. . 3 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑𝑚 𝑛))) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ (𝐴 ∖ 𝑥))
97	28, 96	rexlimddv 3017	. 2 ⊢ ((𝜑 ∧ 𝜓) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ (𝐴 ∖ 𝑥))
98	17, 97	eqeltrd 2688	1 ⊢ ((𝜑 ∧ 𝜓) → (𝑥𝐹𝑟) ∈ (𝐴 ∖ 𝑥))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 195   ∧ wa 383   ∧ w3a 1031   = wceq 1475   ∈ wcel 1977   ≠ wne 2780  ∀wral 2896  ∃wrex 2897  {crab 2900  Vcvv 3173   ∖ cdif 3537   ⊆ wss 3540  ∅c0 3874  ifcif 4036  𝒫 cpw 4108  ∩ cint 4410  ∪ ciun 4455   class class class wbr 4583   We wwe 4996   × cxp 5036  ^◡ccnv 5037  ran crn 5039  Ord word 5639  Oncon0 5640   Fn wfn 5799  ⟶wf 5800  –1-1→wf1 5801  –1-1-onto→wf1o 5803  ‘cfv 5804  (class class class)co 6549   ↦ cmpt2 6551  ωcom 6957   ↑_𝑚 cmap 7744   ≼ cdom 7839   ≺ csdm 7840  Fincfn 7841  cardccrd 8644

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-inf2 8421

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-reu 2903  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-er 7629  df-map 7746  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845

This theorem is referenced by:  pwfseqlem4a  9362  pwfseqlem4  9363