Theorem pwfseqlem3 10729

Description: Lemma for pwfseq 10733. Using the construction 𝐷 from pwfseqlem1 10727, 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 3492	. . . 4 ⊢ 𝑥 ∈ V
2		vex 3492	. . . 4 ⊢ 𝑟 ∈ V
3		fvex 6933	. . . . 5 ⊢ (𝐻‘(card‘𝑥)) ∈ V
4		fvex 6933	. . . . 5 ⊢ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ V
5	3, 4	ifex 4598	. . . 4 ⊢ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) ∈ V
6		pwfseqlem4.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})))
7	6	ovmpt4g 7597	. . . 4 ⊢ ((𝑥 ∈ V ∧ 𝑟 ∈ V ∧ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) ∈ V) → (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})))
8	1, 2, 5, 7	mp3an 1461	. . 3 ⊢ (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
9		pwfseqlem4.ps	. . . . . . . 8 ⊢ (𝜓 ↔ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) ∧ ω ≼ 𝑥))
10	9	simprbi 496	. . . . . . 7 ⊢ (𝜓 → ω ≼ 𝑥)
11	10	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝜓) → ω ≼ 𝑥)
12		domnsym 9165	. . . . . 6 ⊢ (ω ≼ 𝑥 → ¬ 𝑥 ≺ ω)
13	11, 12	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝑥 ≺ ω)
14		isfinite 9721	. . . . 5 ⊢ (𝑥 ∈ Fin ↔ 𝑥 ≺ ω)
15	13, 14	sylnibr 329	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝑥 ∈ Fin)
16	15	iffalsed 4559	. . 3 ⊢ ((𝜑 ∧ 𝜓) → if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
17	8, 16	eqtrid 2792	. 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 10727	. . . . . 6 ⊢ ((𝜑 ∧ 𝜓) → 𝐷 ∈ (∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∖ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)))
24		eldif 3986	. . . . . 6 ⊢ (𝐷 ∈ (∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∖ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)) ↔ (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)))
25	23, 24	sylib 218	. . . . 5 ⊢ ((𝜑 ∧ 𝜓) → (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛)))
26	25	simpld 494	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → 𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛))
27		eliun 5019	. . . 4 ⊢ (𝐷 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↔ ∃𝑛 ∈ ω 𝐷 ∈ (𝐴 ↑m 𝑛))
28	26, 27	sylib 218	. . 3 ⊢ ((𝜑 ∧ 𝜓) → ∃𝑛 ∈ ω 𝐷 ∈ (𝐴 ↑m 𝑛))
29		elmapi 8907	. . . . . 6 ⊢ (𝐷 ∈ (𝐴 ↑m 𝑛) → 𝐷:𝑛⟶𝐴)
30	29	ad2antll 728	. . . . 5 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝐷:𝑛⟶𝐴)
31		ssiun2 5070	. . . . . . . . 9 ⊢ (𝑛 ∈ ω → (𝑥 ↑m 𝑛) ⊆ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
32	31	ad2antrl 727	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝑥 ↑m 𝑛) ⊆ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
33	25	simprd 495	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝜓) → ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
34	33	adantr 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ¬ 𝐷 ∈ ∪ 𝑛 ∈ ω (𝑥 ↑m 𝑛))
35	32, 34	ssneldd 4011	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ¬ 𝐷 ∈ (𝑥 ↑m 𝑛))
36		vex 3492	. . . . . . . . 9 ⊢ 𝑛 ∈ V
37	1, 36	elmap 8929	. . . . . . . 8 ⊢ (𝐷 ∈ (𝑥 ↑m 𝑛) ↔ 𝐷:𝑛⟶𝑥)
38		ffn 6747	. . . . . . . . 9 ⊢ (𝐷:𝑛⟶𝐴 → 𝐷 Fn 𝑛)
39		ffnfv 7153	. . . . . . . . . 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 7909	. . . . . . . . 9 ⊢ (𝑛 ∈ ω → 𝑛 ∈ On)
45	44	ad2antrl 727	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ∈ On)
46		ssrab2 4103	. . . . . . . . . 10 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ ω
47		omsson 7907	. . . . . . . . . 10 ⊢ ω ⊆ On
48	46, 47	sstri 4018	. . . . . . . . 9 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ On
49		ordom 7913	. . . . . . . . . . . . 13 ⊢ Ord ω
50		simprl 770	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ∈ ω)
51		ordelss 6411	. . . . . . . . . . . . 13 ⊢ ((Ord ω ∧ 𝑛 ∈ ω) → 𝑛 ⊆ ω)
52	49, 50, 51	sylancr 586	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ⊆ ω)
53		rexnal 3106	. . . . . . . . . . . . 13 ⊢ (∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥 ↔ ¬ ∀𝑧 ∈ 𝑛 (𝐷‘𝑧) ∈ 𝑥)
54	43, 53	sylibr 234	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥)
55		ssrexv 4078	. . . . . . . . . . . 12 ⊢ (𝑛 ⊆ ω → (∃𝑧 ∈ 𝑛 ¬ (𝐷‘𝑧) ∈ 𝑥 → ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥))
56	52, 54, 55	sylc 65	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥)
57		rabn0 4412	. . . . . . . . . . 11 ⊢ ({𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅ ↔ ∃𝑧 ∈ ω ¬ (𝐷‘𝑧) ∈ 𝑥)
58	56, 57	sylibr 234	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅)
59		onint 7826	. . . . . . . . . 10 ⊢ (({𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ⊆ On ∧ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ≠ ∅) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})
60	48, 58, 59	sylancr 586	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥})
61	48, 60	sselid 4006	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ On)
62		ontri1 6429	. . . . . . . 8 ⊢ ((𝑛 ∈ On ∧ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ On) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛))
63	45, 61, 62	syl2anc 583	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ¬ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ 𝑛))
64		ssintrab 4995	. . . . . . . 8 ⊢ (𝑛 ⊆ ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ ∀𝑧 ∈ ω (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧))
65		nnon 7909	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ ω → 𝑧 ∈ On)
66		ontri1 6429	. . . . . . . . . . . . . . . 16 ⊢ ((𝑛 ∈ On ∧ 𝑧 ∈ On) → (𝑛 ⊆ 𝑧 ↔ ¬ 𝑧 ∈ 𝑛))
67	44, 65, 66	syl2an 595	. . . . . . . . . . . . . . 15 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → (𝑛 ⊆ 𝑧 ↔ ¬ 𝑧 ∈ 𝑛))
68	67	imbi2d 340	. . . . . . . . . . . . . 14 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → ((¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) ↔ (¬ (𝐷‘𝑧) ∈ 𝑥 → ¬ 𝑧 ∈ 𝑛)))
69		con34b 316	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥) ↔ (¬ (𝐷‘𝑧) ∈ 𝑥 → ¬ 𝑧 ∈ 𝑛))
70	68, 69	bitr4di 289	. . . . . . . . . . . . 13 ⊢ ((𝑛 ∈ ω ∧ 𝑧 ∈ ω) → ((¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧) ↔ (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
71	70	pm5.74da 803	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) ↔ (𝑧 ∈ ω → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥))))
72		bi2.04 387	. . . . . . . . . . . 12 ⊢ ((𝑧 ∈ ω → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)) ↔ (𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥)))
73	71, 72	bitrdi 287	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ω → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) ↔ (𝑧 ∈ 𝑛 → (𝑧 ∈ ω → (𝐷‘𝑧) ∈ 𝑥))))
74		elnn 7914	. . . . . . . . . . . . . 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 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ((𝑧 ∈ ω → (¬ (𝐷‘𝑧) ∈ 𝑥 → 𝑛 ⊆ 𝑧)) → (𝑧 ∈ 𝑛 → (𝐷‘𝑧) ∈ 𝑥)))
81	80	ralimdv2 3169	. . . . . . . 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 7119	. . . 4 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝐴)
86		fveq2 6920	. . . . . . . . 9 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → (𝐷‘𝑦) = (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}))
87	86	eleq1d 2829	. . . . . . . 8 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ((𝐷‘𝑦) ∈ 𝑥 ↔ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
88	87	notbid 318	. . . . . . 7 ⊢ (𝑦 = ∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → (¬ (𝐷‘𝑦) ∈ 𝑥 ↔ ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
89		fveq2 6920	. . . . . . . . . 10 ⊢ (𝑧 = 𝑦 → (𝐷‘𝑧) = (𝐷‘𝑦))
90	89	eleq1d 2829	. . . . . . . . 9 ⊢ (𝑧 = 𝑦 → ((𝐷‘𝑧) ∈ 𝑥 ↔ (𝐷‘𝑦) ∈ 𝑥))
91	90	notbid 318	. . . . . . . 8 ⊢ (𝑧 = 𝑦 → (¬ (𝐷‘𝑧) ∈ 𝑥 ↔ ¬ (𝐷‘𝑦) ∈ 𝑥))
92	91	cbvrabv 3454	. . . . . . 7 ⊢ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} = {𝑦 ∈ ω ∣ ¬ (𝐷‘𝑦) ∈ 𝑥}
93	88, 92	elrab2 3711	. . . . . 6 ⊢ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ↔ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ ω ∧ ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥))
94	93	simprbi 496	. . . . 5 ⊢ (∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} ∈ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥} → ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥)
95	60, 94	syl 17	. . . 4 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → ¬ (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ 𝑥)
96	85, 95	eldifd 3987	. . 3 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝑛 ∈ ω ∧ 𝐷 ∈ (𝐴 ↑m 𝑛))) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ (𝐴 ∖ 𝑥))
97	28, 96	rexlimddv 3167	. 2 ⊢ ((𝜑 ∧ 𝜓) → (𝐷‘∩ {𝑧 ∈ ω ∣ ¬ (𝐷‘𝑧) ∈ 𝑥}) ∈ (𝐴 ∖ 𝑥))
98	17, 97	eqeltrd 2844	1 ⊢ ((𝜑 ∧ 𝜓) → (𝑥𝐹𝑟) ∈ (𝐴 ∖ 𝑥))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1537   ∈ wcel 2108   ≠ wne 2946  ∀wral 3067  ∃wrex 3076  {crab 3443  Vcvv 3488   ∖ cdif 3973   ⊆ wss 3976  ∅c0 4352  ifcif 4548  𝒫 cpw 4622  ∩ cint 4970  ∪ ciun 5015   class class class wbr 5166   We wwe 5651   × cxp 5698  ^◡ccnv 5699  ran crn 5701  Ord word 6394  Oncon0 6395   Fn wfn 6568  ⟶wf 6569  –1-1→wf1 6570  –1-1-onto→wf1o 6572  ‘cfv 6573  (class class class)co 7448   ∈ cmpo 7450  ωcom 7903   ↑_m cmap 8884   ≼ cdom 9001   ≺ csdm 9002  Fincfn 9003  cardccrd 10004

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-inf2 9710

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-ral 3068  df-rex 3077  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-ov 7451  df-oprab 7452  df-mpo 7453  df-om 7904  df-1st 8030  df-2nd 8031  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-1o 8522  df-er 8763  df-map 8886  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007

This theorem is referenced by:  pwfseqlem4a  10730  pwfseqlem4  10731