Theorem pwfseqlem3 10583

Description: Lemma for pwfseq 10587. Using the construction 𝐷 from pwfseqlem1 10581, 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→∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛))
pwfseqlem4.x	⊢ (𝜑 → 𝑋 ⊆ 𝐴)
pwfseqlem4.h	⊢ (𝜑 → 𝐻:ω–1-1-onto→𝑋)
pwfseqlem4.ps	⊢ (𝜓 ↔ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) ∧ ω ≼ 𝑥))
pwfseqlem4.k	⊢ ((𝜑 ∧ 𝜓) → 𝐾:∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)–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 3446	. . . 4 ⊢ 𝑥 ∈ V
2		vex 3446	. . . 4 ⊢ 𝑟 ∈ V
3		fvex 6855	. . . . 5 ⊢ (𝐻‘(card‘𝑥)) ∈ V
4		fvex 6855	. . . . 5 ⊢ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ V
5	3, 4	ifex 4532	. . . 4 ⊢ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) ∈ V
6		pwfseqlem4.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})))
7	6	ovmpt4g 7515	. . . 4 ⊢ ((𝑥 ∈ V ∧ 𝑟 ∈ V ∧ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) ∈ V) → (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})))
8	1, 2, 5, 7	mp3an 1464	. . 3 ⊢ (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
9		pwfseqlem4.ps	. . . . . . . 8 ⊢ (𝜓 ↔ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) ∧ ω ≼ 𝑥))
10	9	simprbi 497	. . . . . . 7 ⊢ (𝜓 → ω ≼ 𝑥)
11	10	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝜓) → ω ≼ 𝑥)
12		domnsym 9043	. . . . . 6 ⊢ (ω ≼ 𝑥 → ¬ 𝑥 ≺ ω)
13	11, 12	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝑥 ≺ ω)
14		isfinite 9573	. . . . 5 ⊢ (𝑥 ∈ Fin ↔ 𝑥 ≺ ω)
15	13, 14	sylnibr 329	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝑥 ∈ Fin)
16	15	iffalsed 4492	. . 3 ⊢ ((𝜑 ∧ 𝜓) → if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
17	8, 16	eqtrid 2784	. 2 ⊢ ((𝜑 ∧ 𝜓) → (𝑥𝐹𝑟) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
18		pwfseqlem4.g	. . . . . . 7 ⊢ (𝜑 → 𝐺:𝒫 𝐴–1-1→∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛))
19		pwfseqlem4.x	. . . . . . 7 ⊢ (𝜑 → 𝑋 ⊆ 𝐴)
20		pwfseqlem4.h	. . . . . . 7 ⊢ (𝜑 → 𝐻:ω–1-1-onto→𝑋)
21		pwfseqlem4.k	. . . . . . 7 ⊢ ((𝜑 ∧ 𝜓) → 𝐾:∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)–1-1→𝑥)
22		pwfseqlem4.d	. . . . . . 7 ⊢ 𝐷 = (𝐺‘{𝑤 ∈ 𝑥 ∣ ((◡𝐾‘𝑤) ∈ ran 𝐺 ∧ ¬ 𝑤 ∈ (◡𝐺‘(◡𝐾‘𝑤)))})
23	18, 19, 20, 9, 21, 22	pwfseqlem1 10581	. . . . . 6 ⊢ ((𝜑 ∧ 𝜓) → 𝐷 ∈ (∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∖ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)))
24		eldif 3913	. . . . . 6 ⊢ (𝐷 ∈ (∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∖ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)) ↔ (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)))
25	23, 24	sylib 218	. . . . 5 ⊢ ((𝜑 ∧ 𝜓) → (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)))
26	25	simpld 494	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → 𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛))
27		eliun 4952	. . . 4 ⊢ (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↔ ∃𝑛 ∈ ω 𝐷 ∈ (𝐴 ↑m 𝑛))
28	26, 27	sylib 218	. . 3 ⊢ ((𝜑 ∧ 𝜓) → ∃𝑛 ∈ ω 𝐷 ∈ (𝐴 ↑m 𝑛))
29		elmapi 8798	. . . . . 6 ⊢ (𝐷 ∈ (𝐴 ↑m 𝑛) → 𝐷:𝑛⟶𝐴)
30	29	ad2antll 730	. . . . 5 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝐷:𝑛⟶𝐴)
31		ssiun2 5005	. . . . . . . . 9 ⊢ (𝑛 ∈ ω → (𝑥 ↑m 𝑛) ⊆ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
32	31	ad2antrl 729	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝑥 ↑m 𝑛) ⊆ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
33	25	simprd 495	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
34	33	adantr 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
35	32, 34	ssneldd 3938	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ¬ 𝐷 ∈ (𝑥 ↑m 𝑛))
36		vex 3446	. . . . . . . . 9 ⊢ 𝑛 ∈ V
37	1, 36	elmap 8821	. . . . . . . 8 ⊢ (𝐷 ∈ (𝑥 ↑m 𝑛) ↔ 𝐷:𝑛⟶𝑥)
38		ffn 6670	. . . . . . . . 9 ⊢ (𝐷:𝑛⟶𝐴 → 𝐷 Fn 𝑛)
39		ffnfv 7073	. . . . . . . . . 10 ⊢ (𝐷:𝑛⟶𝑥 ↔ (𝐷 Fn 𝑛 ∧ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
40	39	baib 535	. . . . . . . . 9 ⊢ (𝐷 Fn 𝑛 → (𝐷:𝑛⟶𝑥 ↔ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
41	30, 38, 40	3syl 18	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝐷:𝑛⟶𝑥 ↔ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
42	37, 41	bitrid 283	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝐷 ∈ (𝑥 ↑m 𝑛) ↔ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
43	35, 42	mtbid 324	. . . . . 6 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ¬ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥)
44		nnon 7824	. . . . . . . . 9 ⊢ (𝑛 ∈ ω → 𝑛 ∈ On)
45	44	ad2antrl 729	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ∈ On)
46		ssrab2 4034	. . . . . . . . . 10 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ ω
47		omsson 7822	. . . . . . . . . 10 ⊢ ω ⊆ On
48	46, 47	sstri 3945	. . . . . . . . 9 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ On
49		ordom 7828	. . . . . . . . . . . . 13 ⊢ Ord ω
50		simprl 771	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ∈ ω)
51		ordelss 6341	. . . . . . . . . . . . 13 ⊢ ((Ord ω ∧ 𝑛 ∈ ω) → 𝑛 ⊆ ω)
52	49, 50, 51	sylancr 588	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ⊆ ω)
53		rexnal 3090	. . . . . . . . . . . . 13 ⊢ (∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥 ↔ ¬ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥)
54	43, 53	sylibr 234	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥)
55		ssrexv 4005	. . . . . . . . . . . 12 ⊢ (𝑛 ⊆ ω → (∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥 → ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥))
56	52, 54, 55	sylc 65	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥)
57		rabn0 4343	. . . . . . . . . . 11 ⊢ ({𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅ ↔ ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥)
58	56, 57	sylibr 234	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅)
59		onint 7745	. . . . . . . . . 10 ⊢ (({𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ On ∧ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})
60	48, 58, 59	sylancr 588	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})
61	48, 60	sselid 3933	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ On)
62		ontri1 6359	. . . . . . . 8 ⊢ ((𝑛 ∈ On ∧ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ On) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛))
63	45, 61, 62	syl2anc 585	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛))
64		ssintrab 4928	. . . . . . . 8 ⊢ (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ∀𝑧 ∈ ω (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧))
65		nnon 7824	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ ω → 𝑧 ∈ On)
66		ontri1 6359	. . . . . . . . . . . . . . . 16 ⊢ ((𝑛 ∈ On ∧ 𝑧 ∈ On) → (𝑛 ⊆ 𝑧 ↔ ¬ 𝑧 ∈ 𝑛))
67	44, 65, 66	syl2an 597	. . . . . . . . . . . . . . 15 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → (𝑛 ⊆ 𝑧 ↔ ¬ 𝑧 ∈ 𝑛))
68	67	imbi2d 340	. . . . . . . . . . . . . 14 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → ((¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) ↔ (¬ (𝐷‘𝑧) ∈ 𝑥 → ¬ 𝑧 ∈ 𝑛)))
69		con34b 316	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥) ↔ (¬ (𝐷‘𝑧) ∈ 𝑥 → ¬ 𝑧 ∈ 𝑛))
70	68, 69	bitr4di 289	. . . . . . . . . . . . 13 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → ((¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) ↔ (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
71	70	pm5.74da 804	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) ↔ (𝑧 ∈ ω → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥))))
72		bi2.04 387	. . . . . . . . . . . 12 ⊢ ((𝑧 ∈ ω → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)) ↔ (𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥)))
73	71, 72	bitrdi 287	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) ↔ (𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥))))
74		elnn 7829	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ 𝑛 ∧ 𝑛 ∈ ω) → 𝑧 ∈ ω)
75		pm2.27 42	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ ω → ((𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥) → (𝐷‘𝑧) ∈ 𝑥))
76	74, 75	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝑛 ∧ 𝑛 ∈ ω) → ((𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥) → (𝐷‘𝑧) ∈ 𝑥))
77	76	expcom 413	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ω → (𝑧 ∈ 𝑛 → ((𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥) → (𝐷‘𝑧) ∈ 𝑥)))
78	77	a2d 29	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥)) → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
79	73, 78	sylbid 240	. . . . . . . . . 10 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
80	79	ad2antrl 729	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
81	80	ralimdv2 3147	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (∀𝑧 ∈ ω (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) → ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
82	64, 81	biimtrid 242	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
83	63, 82	sylbird 260	. . . . . 6 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛 → ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥))
84	43, 83	mt3d 148	. . . . 5 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛)
85	30, 84	ffvelcdmd 7039	. . . 4 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝐴)
86		fveq2 6842	. . . . . . . . 9 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → (𝐷‘𝑦) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
87	86	eleq1d 2822	. . . . . . . 8 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ((𝐷‘𝑦) ∈ 𝑥 ↔ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
88	87	notbid 318	. . . . . . 7 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → (¬ (𝐷‘𝑦) ∈ 𝑥 ↔ ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
89		fveq2 6842	. . . . . . . . . 10 ⊢ (𝑧 = 𝑦 → (𝐷‘𝑧) = (𝐷‘𝑦))
90	89	eleq1d 2822	. . . . . . . . 9 ⊢ (𝑧 = 𝑦 → ((𝐷‘𝑧) ∈ 𝑥 ↔ (𝐷‘𝑦) ∈ 𝑥))
91	90	notbid 318	. . . . . . . 8 ⊢ (𝑧 = 𝑦 → (¬ (𝐷‘𝑧) ∈ 𝑥 ↔ ¬ (𝐷‘𝑦) ∈ 𝑥))
92	91	cbvrabv 3411	. . . . . . 7 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} = {𝑦 ∈ ω ∣ ¬ (𝐷‘𝑦) ∈ 𝑥}
93	88, 92	elrab2 3651	. . . . . 6 ⊢ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ ω ∧ ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
94	93	simprbi 497	. . . . 5 ⊢ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥)
95	60, 94	syl 17	. . . 4 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥)
96	85, 95	eldifd 3914	. . 3 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ (𝐴 ∖ 𝑥))
97	28, 96	rexlimddv 3145	. 2 ⊢ ((𝜑 ∧ 𝜓) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ (𝐴 ∖ 𝑥))
98	17, 97	eqeltrd 2837	1 ⊢ ((𝜑 ∧ 𝜓) → (𝑥𝐹𝑟) ∈ (𝐴 ∖ 𝑥))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1542   ∈ wcel 2114   ≠ wne 2933  ∀wral 3052  ∃wrex 3062  {crab 3401  Vcvv 3442   ∖ cdif 3900   ⊆ wss 3903  ∅c0 4287  ifcif 4481  𝒫 cpw 4556  ∩ cint 4904  ∪ ciun 4948   class class class wbr 5100   We wwe 5584   × cxp 5630  ^◡ccnv 5631  ran crn 5633  Ord word 6324  Oncon0 6325   Fn wfn 6495  ⟶wf 6496  –1-1→wf1 6497  –1-1-onto→wf1o 6499  ‘cfv 6500  (class class class)co 7368   ∈ cmpo 7370  ωcom 7818   ↑_m cmap 8775   ≼ cdom 8893   ≺ csdm 8894  Fincfn 8895  cardccrd 9859

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-inf2 9562

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-er 8645  df-map 8777  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899

This theorem is referenced by:  pwfseqlem4a  10584  pwfseqlem4  10585