sdclem1 - Mathbox for Jeff Madsen

	Mathbox for Jeff Madsen		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > sdclem1		Structured version Visualization version GIF version

Theorem sdclem1 38771

Description: Lemma for sdc 38772. (Contributed by Jeff Madsen, 2-Sep-2009.)

**Hypotheses**
Ref	Expression
sdc.1	⊢ 𝑍 = (ℤ_≥‘𝑀)
sdc.2	⊢ (𝑔 = (𝑓 ↾ (𝑀...𝑛)) → (𝜓 ↔ 𝜒))
sdc.3	⊢ (𝑛 = 𝑀 → (𝜓 ↔ 𝜏))
sdc.4	⊢ (𝑛 = 𝑘 → (𝜓 ↔ 𝜃))
sdc.5	⊢ ((𝑔 = ℎ ∧ 𝑛 = (𝑘 + 1)) → (𝜓 ↔ 𝜎))
sdc.6	⊢ (𝜑 → 𝐴 ∈ 𝑉)
sdc.7	⊢ (𝜑 → 𝑀 ∈ ℤ)
sdc.8	⊢ (𝜑 → ∃𝑔(𝑔:{𝑀}⟶𝐴 ∧ 𝜏))
sdc.9	⊢ ((𝜑 ∧ 𝑘 ∈ 𝑍) → ((𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
sdc.10	⊢ 𝐽 = {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)}
sdc.11	⊢ 𝐹 = (𝑤 ∈ 𝑍, 𝑥 ∈ 𝐽 ↦ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})

**Assertion**
Ref	Expression
sdclem1	⊢ (𝜑 → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))

Distinct variable groups: 𝑓,𝑔,ℎ,𝑘,𝑛,𝑤,𝑥,𝐴 ℎ,𝐽,𝑘,𝑤,𝑥 𝑓,𝑀,𝑔,ℎ,𝑘,𝑛,𝑤,𝑥 𝜒,𝑔 𝑛,𝐹,𝑤,𝑥 𝜓,𝑓,ℎ,𝑘,𝑥 𝜎,𝑓,𝑔,𝑛,𝑥 𝜑,𝑛,𝑤,𝑥 𝜃,𝑛,𝑤,𝑥 ℎ,𝑉 𝜏,ℎ,𝑘,𝑛,𝑤,𝑥 𝑓,𝑍,𝑔,ℎ,𝑘,𝑛,𝑤,𝑥 𝜑,𝑔,ℎ,𝑘 Allowed substitution hints: 𝜑(𝑓) 𝜓(𝑤, 𝑔, 𝑛) 𝜒(𝑥, 𝑤, 𝑓, ℎ, 𝑘, 𝑛) 𝜃(𝑓, 𝑔, ℎ, 𝑘) 𝜏(𝑓, 𝑔) 𝜎(𝑤, ℎ, 𝑘) 𝐹(𝑓, 𝑔, ℎ, 𝑘) 𝐽(𝑓, 𝑔, 𝑛) 𝑉(𝑥, 𝑤, 𝑓, 𝑔, 𝑘, 𝑛)

Proof of Theorem sdclem1 Dummy variables 𝑗 𝑚 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sdc.8	. 2 ⊢ (𝜑 → ∃𝑔(𝑔:{𝑀}⟶𝐴 ∧ 𝜏))
2		sdc.10	. . . . . 6 ⊢ 𝐽 = {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)}
3		sdc.1	. . . . . . . 8 ⊢ 𝑍 = (ℤ_≥‘𝑀)
4	3	fvexi 6900	. . . . . . 7 ⊢ 𝑍 ∈ V
5		simpl 488	. . . . . . . . . . 11 ⊢ ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → 𝑔:(𝑀...𝑛)⟶𝐴)
6		sdc.6	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
7		ovex 7454	. . . . . . . . . . . 12 ⊢ (𝑀...𝑛) ∈ V
8		elmapg 8863	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑀...𝑛) ∈ V) → (𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛)) ↔ 𝑔:(𝑀...𝑛)⟶𝐴))
9	6, 7, 8	sylancl 598	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛)) ↔ 𝑔:(𝑀...𝑛)⟶𝐴))
10	5, 9	imbitrrid 249	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → 𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛))))
11	10	abssdv 3992	. . . . . . . . 9 ⊢ (𝜑 → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ (𝐴 ↑_m (𝑀...𝑛)))
12		ovex 7454	. . . . . . . . 9 ⊢ (𝐴 ↑_m (𝑀...𝑛)) ∈ V
13		ssexg 5280	. . . . . . . . 9 ⊢ (({𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ (𝐴 ↑_m (𝑀...𝑛)) ∧ (𝐴 ↑_m (𝑀...𝑛)) ∈ V) → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
14	11, 12, 13	sylancl 598	. . . . . . . 8 ⊢ (𝜑 → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
15	14	ralrimivw 3158	. . . . . . 7 ⊢ (𝜑 → ∀𝑛 ∈ 𝑍 {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
16		abrexex2g 7977	. . . . . . 7 ⊢ ((𝑍 ∈ V ∧ ∀𝑛 ∈ 𝑍 {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V) → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
17	4, 15, 16	sylancr 599	. . . . . 6 ⊢ (𝜑 → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
18	2, 17	eqeltrid 2864	. . . . 5 ⊢ (𝜑 → 𝐽 ∈ V)
19	18	adantr 486	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐽 ∈ V)
20		sdc.7	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ∈ ℤ)
21	20	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ ℤ)
22		uzid 12984	. . . . . . . 8 ⊢ (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ_≥‘𝑀))
23	21, 22	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ (ℤ_≥‘𝑀))
24	23, 3	eleqtrrdi 2871	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ 𝑍)
25		simprl 783	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔:{𝑀}⟶𝐴)
26		fzsn 13704	. . . . . . . . 9 ⊢ (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
27	21, 26	syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑀...𝑀) = {𝑀})
28	27	feq2d 6694	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑔:(𝑀...𝑀)⟶𝐴 ↔ 𝑔:{𝑀}⟶𝐴))
29	25, 28	mpbird 260	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔:(𝑀...𝑀)⟶𝐴)
30		simprr 785	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝜏)
31		oveq2 7429	. . . . . . . . 9 ⊢ (𝑛 = 𝑀 → (𝑀...𝑛) = (𝑀...𝑀))
32	31	feq2d 6694	. . . . . . . 8 ⊢ (𝑛 = 𝑀 → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ 𝑔:(𝑀...𝑀)⟶𝐴))
33		sdc.3	. . . . . . . 8 ⊢ (𝑛 = 𝑀 → (𝜓 ↔ 𝜏))
34	32, 33	anbi12d 644	. . . . . . 7 ⊢ (𝑛 = 𝑀 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (𝑔:(𝑀...𝑀)⟶𝐴 ∧ 𝜏)))
35	34	rspcev 3576	. . . . . 6 ⊢ ((𝑀 ∈ 𝑍 ∧ (𝑔:(𝑀...𝑀)⟶𝐴 ∧ 𝜏)) → ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
36	24, 29, 30, 35	syl12anc 850	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
37	2	eqabri 2902	. . . . 5 ⊢ (𝑔 ∈ 𝐽 ↔ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
38	36, 37	sylibr 237	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔 ∈ 𝐽)
39	3	peano2uzs 13033	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝑍 → (𝑘 + 1) ∈ 𝑍)
40	39	ad2antlr 740	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → (𝑘 + 1) ∈ 𝑍)
41		simpr1 1213	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ℎ:(𝑀...(𝑘 + 1))⟶𝐴)
42		simpr3 1215	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → 𝜎)
43		vex 3454	. . . . . . . . . . . . . . . . . 18 ⊢ ℎ ∈ V
44		ovex 7454	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 + 1) ∈ V
45		sdc.5	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑔 = ℎ ∧ 𝑛 = (𝑘 + 1)) → (𝜓 ↔ 𝜎))
46	45	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((𝑔 = ℎ ∧ 𝑛 = (𝑘 + 1)) → (𝜓 ↔ 𝜎)))
47	43, 44, 46	sbc2iedv 3814	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ([ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓 ↔ 𝜎))
48	47	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ([ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓 ↔ 𝜎))
49	42, 48	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)
50		nfv 1946	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛 ℎ:(𝑀...(𝑘 + 1))⟶𝐴
51		nfcv 2922	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑛ℎ
52		nfsbc1v 3758	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑛[(𝑘 + 1) / 𝑛]𝜓
53	51, 52	nfsbcw 3760	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛[ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓
54	50, 53	nfan 1931	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)
55		oveq2 7429	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = (𝑘 + 1) → (𝑀...𝑛) = (𝑀...(𝑘 + 1)))
56	55	feq2d 6694	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑘 + 1) → (ℎ:(𝑀...𝑛)⟶𝐴 ↔ ℎ:(𝑀...(𝑘 + 1))⟶𝐴))
57		sbceq1a 3749	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = (𝑘 + 1) → (𝜓 ↔ [(𝑘 + 1) / 𝑛]𝜓))
58	57	sbcbidv 3793	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑘 + 1) → ([ℎ / 𝑔]𝜓 ↔ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓))
59	56, 58	anbi12d 644	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑘 + 1) → ((ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓) ↔ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)))
60	54, 59	rspce 3565	. . . . . . . . . . . . . . 15 ⊢ (((𝑘 + 1) ∈ 𝑍 ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)) → ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
61	40, 41, 49, 60	syl12anc 850	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
62	2	eleq2i 2852	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ 𝐽 ↔ ℎ ∈ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)})
63		nfcv 2922	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑔𝑍
64		nfv 1946	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑔 ℎ:(𝑀...𝑛)⟶𝐴
65		nfsbc1v 3758	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑔[ℎ / 𝑔]𝜓
66	64, 65	nfan 1931	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑔(ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)
67	63, 66	nfrexw 3310	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑔∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)
68		feq1 6688	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑔 = ℎ → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ ℎ:(𝑀...𝑛)⟶𝐴))
69		sbceq1a 3749	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑔 = ℎ → (𝜓 ↔ [ℎ / 𝑔]𝜓))
70	68, 69	anbi12d 644	. . . . . . . . . . . . . . . . 17 ⊢ (𝑔 = ℎ → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)))
71	70	rexbidv 3186	. . . . . . . . . . . . . . . 16 ⊢ (𝑔 = ℎ → (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)))
72	67, 43, 71	elabf 3628	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
73	62, 72	bitri 278	. . . . . . . . . . . . . 14 ⊢ (ℎ ∈ 𝐽 ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
74	61, 73	sylibr 237	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ℎ ∈ 𝐽)
75	74	rexlimdva2 3165	. . . . . . . . . . . 12 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) → ℎ ∈ 𝐽))
76	75	abssdv 3992	. . . . . . . . . . 11 ⊢ (𝜑 → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽)
77	76	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽)
78	18	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → 𝐽 ∈ V)
79		elpw2g 5294	. . . . . . . . . . 11 ⊢ (𝐽 ∈ V → ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ↔ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽))
80	78, 79	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ↔ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽))
81	77, 80	mpbird 260	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽)
82		oveq2 7429	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑘 → (𝑀...𝑛) = (𝑀...𝑘))
83	82	feq2d 6694	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑘 → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ 𝑔:(𝑀...𝑘)⟶𝐴))
84		sdc.4	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑘 → (𝜓 ↔ 𝜃))
85	83, 84	anbi12d 644	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑘 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)))
86	85	cbvrexvw 3241	. . . . . . . . . . . . . . . 16 ⊢ (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃))
87		sdc.9	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑍) → ((𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
88	87	reximdva 3175	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃𝑘 ∈ 𝑍 ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
89		rexcom4 3289	. . . . . . . . . . . . . . . . 17 ⊢ (∃𝑘 ∈ 𝑍 ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
90	88, 89	imbitrdi 254	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
91	86, 90	biimtrid 245	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
92	91	ss2abdv 3990	. . . . . . . . . . . . . 14 ⊢ (𝜑 → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
93	2, 92	eqsstrid 3946	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ⊆ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
94	93	sselda 3908	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → 𝑥 ∈ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
95		vex 3454	. . . . . . . . . . . . 13 ⊢ 𝑥 ∈ V
96		eqeq1 2764	. . . . . . . . . . . . . . . 16 ⊢ (𝑔 = 𝑥 → (𝑔 = (ℎ ↾ (𝑀...𝑘)) ↔ 𝑥 = (ℎ ↾ (𝑀...𝑘))))
97	96	3anbi2d 1469	. . . . . . . . . . . . . . 15 ⊢ (𝑔 = 𝑥 → ((ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
98	97	rexbidv 3186	. . . . . . . . . . . . . 14 ⊢ (𝑔 = 𝑥 → (∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
99	98	exbidv 1953	. . . . . . . . . . . . 13 ⊢ (𝑔 = 𝑥 → (∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
100	95, 99	elab 3632	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
101	94, 100	sylib 221	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
102		abn0 4333	. . . . . . . . . . 11 ⊢ ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅ ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
103	101, 102	sylibr 237	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅)
104	103	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅)
105		eldifsn 4744	. . . . . . . . 9 ⊢ ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}) ↔ ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ∧ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅))
106	81, 104, 105	sylanbrc 595	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}))
107	106	adantrl 729	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑤 ∈ 𝑍 ∧ 𝑥 ∈ 𝐽)) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}))
108	107	ralrimivva 3205	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∀𝑤 ∈ 𝑍 ∀𝑥 ∈ 𝐽 {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}))
109		sdc.11	. . . . . . 7 ⊢ 𝐹 = (𝑤 ∈ 𝑍, 𝑥 ∈ 𝐽 ↦ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
110	109	fmpo 8080	. . . . . 6 ⊢ (∀𝑤 ∈ 𝑍 ∀𝑥 ∈ 𝐽 {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}) ↔ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
111	108, 110	sylib 221	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
112	20	iftrued 4489	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑀 ∈ ℤ, 𝑀, 0) = 𝑀)
113	112	fveq2d 6890	. . . . . . . . 9 ⊢ (𝜑 → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘𝑀))
114	113, 3	eqtr4di 2813	. . . . . . . 8 ⊢ (𝜑 → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑍)
115	114	xpeq1d 5679	. . . . . . 7 ⊢ (𝜑 → ((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽) = (𝑍 × 𝐽))
116	115	feq2d 6694	. . . . . 6 ⊢ (𝜑 → (𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}) ↔ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅})))
117	116	biimpar 483	. . . . 5 ⊢ ((𝜑 ∧ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅})) → 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
118	111, 117	syldan 603	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
119		0z 12708	. . . . . 6 ⊢ 0 ∈ ℤ
120	119	elimel 4551	. . . . 5 ⊢ if(𝑀 ∈ ℤ, 𝑀, 0) ∈ ℤ
121		eqid 2760	. . . . 5 ⊢ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))
122	120, 121	axdc4uz 14131	. . . 4 ⊢ ((𝐽 ∈ V ∧ 𝑔 ∈ 𝐽 ∧ 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅})) → ∃𝑗(𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))))
123	19, 38, 118, 122	syl3anc 1398	. . 3 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑗(𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))))
124	21	iftrued 4489	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → if(𝑀 ∈ ℤ, 𝑀, 0) = 𝑀)
125	124	fveq2d 6890	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘𝑀))
126	125, 3	eqtr4di 2813	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑍)
127	126	feq2d 6694	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ↔ 𝑗:𝑍⟶𝐽))
128	86	abbii 2827	. . . . . . . . 9 ⊢ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
129	2, 128	eqtri 2783	. . . . . . . 8 ⊢ 𝐽 = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
130		feq3 6690	. . . . . . . 8 ⊢ (𝐽 = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} → (𝑗:𝑍⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}))
131	129, 130	ax-mp 5	. . . . . . 7 ⊢ (𝑗:𝑍⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)})
132	127, 131	bitrdi 290	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}))
133	124	fveqeq2d 6894	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ↔ (𝑗‘𝑀) = 𝑔))
134	126	raleqdv 3319	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)) ↔ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))))
135	132, 133, 134	3anbi123d 1464	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) ↔ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))))
136		sdc.2	. . . . . . 7 ⊢ (𝑔 = (𝑓 ↾ (𝑀...𝑛)) → (𝜓 ↔ 𝜒))
137	6	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → 𝐴 ∈ 𝑉)
138	20	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → 𝑀 ∈ ℤ)
139	1	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ∃𝑔(𝑔:{𝑀}⟶𝐴 ∧ 𝜏))
140		simpll 779	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → 𝜑)
141	140, 87	sylan 592	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) ∧ 𝑘 ∈ 𝑍) → ((𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
142		nfv 1946	. . . . . . . 8 ⊢ Ⅎ𝑘(𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏))
143		nfcv 2922	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝑗
144		nfcv 2922	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝑍
145		nfre1 3287	. . . . . . . . . . 11 ⊢ Ⅎ𝑘∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)
146	145	nfab 2928	. . . . . . . . . 10 ⊢ Ⅎ𝑘{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
147	143, 144, 146	nff 6706	. . . . . . . . 9 ⊢ Ⅎ𝑘 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
148		nfv 1946	. . . . . . . . 9 ⊢ Ⅎ𝑘(𝑗‘𝑀) = 𝑔
149		nfcv 2922	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝑚
150	129, 146	nfcxfr 2920	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘𝐽
151		nfre1 3287	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)
152	151	nfab 2928	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘{ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)}
153	144, 150, 152	nfmpo 7503	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘(𝑤 ∈ 𝑍, 𝑥 ∈ 𝐽 ↦ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
154	109, 153	nfcxfr 2920	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝐹
155		nfcv 2922	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘(𝑗‘𝑚)
156	149, 154, 155	nfov 7451	. . . . . . . . . . 11 ⊢ Ⅎ𝑘(𝑚𝐹(𝑗‘𝑚))
157	156	nfel2 2940	. . . . . . . . . 10 ⊢ Ⅎ𝑘(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))
158	144, 157	nfralw 3309	. . . . . . . . 9 ⊢ Ⅎ𝑘∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))
159	147, 148, 158	nf3an 1933	. . . . . . . 8 ⊢ Ⅎ𝑘(𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))
160	142, 159	nfan 1931	. . . . . . 7 ⊢ Ⅎ𝑘((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))))
161		simpr1 1213	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)})
162	161, 131	sylibr 237	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → 𝑗:𝑍⟶𝐽)
163	25	adantr 486	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → 𝑔:{𝑀}⟶𝐴)
164		simpr2 1214	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → (𝑗‘𝑀) = 𝑔)
165	138, 26	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → (𝑀...𝑀) = {𝑀})
166	164, 165	feq12d 6698	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ((𝑗‘𝑀):(𝑀...𝑀)⟶𝐴 ↔ 𝑔:{𝑀}⟶𝐴))
167	163, 166	mpbird 260	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → (𝑗‘𝑀):(𝑀...𝑀)⟶𝐴)
168		simpr3 1215	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))
169		fvoveq1 7444	. . . . . . . . . 10 ⊢ (𝑚 = 𝑤 → (𝑗‘(𝑚 + 1)) = (𝑗‘(𝑤 + 1)))
170		id 23	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑤 → 𝑚 = 𝑤)
171		fveq2 6886	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑤 → (𝑗‘𝑚) = (𝑗‘𝑤))
172	170, 171	oveq12d 7439	. . . . . . . . . 10 ⊢ (𝑚 = 𝑤 → (𝑚𝐹(𝑗‘𝑚)) = (𝑤𝐹(𝑗‘𝑤)))
173	169, 172	eleq12d 2854	. . . . . . . . 9 ⊢ (𝑚 = 𝑤 → ((𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)) ↔ (𝑗‘(𝑤 + 1)) ∈ (𝑤𝐹(𝑗‘𝑤))))
174	173	rspccva 3575	. . . . . . . 8 ⊢ ((∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)) ∧ 𝑤 ∈ 𝑍) → (𝑗‘(𝑤 + 1)) ∈ (𝑤𝐹(𝑗‘𝑤)))
175	168, 174	sylan 592	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) ∧ 𝑤 ∈ 𝑍) → (𝑗‘(𝑤 + 1)) ∈ (𝑤𝐹(𝑗‘𝑤)))
176	3, 136, 33, 84, 45, 137, 138, 139, 141, 2, 109, 160, 162, 167, 175	sdclem2 38770	. . . . . 6 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))
177	176	ex 418	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
178	135, 177	sylbid 243	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
179	178	exlimdv 1965	. . 3 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (∃𝑗(𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
180	123, 179	mpd 16	. 2 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))
181	1, 180	exlimddv 1967	1 ⊢ (𝜑 → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1569 ∃wex 1811 ∈ wcel 2144 {cab 2738 ≠ wne 2955 ∀wral 3076 ∃wrex 3086 Vcvv 3450 [wsbc 3738 ⊆ wss 3895 ∖ cdif 4045 ∅c0 4278 ifcif 4481 𝒫 cpw 4556 {csn 4584 × cxp 5648 ↾ cres 5652 ⟶wf 6535 ‘cfv 6539 (class class class)co 7421 ∈ cmpo 7423 ↑_m cmap 8851 0cc0 11204 1c1 11205 + caddc 11207 ℤcz 12697 ℤ_≥cuz 12969 ...cfz 13643

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5326 ax-pr 5390 ax-un 7752 ax-inf2 9646 ax-dc 10528 ax-cnex 11260 ax-resscn 11261 ax-1cn 11262 ax-icn 11263 ax-addcl 11264 ax-addrcl 11265 ax-mulcl 11266 ax-mulrcl 11267 ax-mulcom 11268 ax-addass 11269 ax-mulass 11270 ax-distr 11271 ax-i2m1 11272 ax-1ne0 11273 ax-1rid 11274 ax-rnegex 11275 ax-rrecex 11276 ax-cnre 11277 ax-pre-lttri 11278 ax-pre-lttrn 11279 ax-pre-ltadd 11280 ax-pre-mulgt0 11281

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3847 df-ss 3896 df-pss 4014 df-dif 4047 df-in 4091 df-un 4151 df-nul 4279 df-if 4482 df-pw 4558 df-sn 4585 df-pr 4587 df-op 4835 df-uni 4867 df-iun 4952 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5545 df-eprel 5550 df-po 5558 df-so 5559 df-fr 5603 df-we 5605 df-xp 5656 df-rel 5657 df-cnv 5658 df-co 5659 df-dm 5660 df-rn 5661 df-res 5662 df-ima 5663 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6541 df-fn 6542 df-f 6543 df-f1 6544 df-fo 6545 df-f1o 6546 df-fv 6547 df-riota 7378 df-ov 7424 df-oprab 7425 df-mpo 7426 df-om 7879 df-1st 8002 df-2nd 8003 df-frecs 8303 df-wrecs 8334 df-recs 8383 df-rdg 8422 df-1o 8480 df-er 8721 df-map 8853 df-en 8978 df-dom 8979 df-sdom 8980 df-pnf 11349 df-mnf 11350 df-xr 11351 df-ltxr 11352 df-le 11353 df-sub 11547 df-neg 11548 df-nn 12340 df-n0 12611 df-z 12698 df-uz 12970 df-fz 13644

This theorem is used by: sdc 38772

W3C validator