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 38880

Description: Lemma for sdc 38881. (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 6925	. . . . . . 7 ⊢ 𝑍 ∈ V
5		simpl 488	. . . . . . . . . . 11 ⊢ ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → 𝑔:(𝑀...𝑛)⟶𝐴)
6		sdc.6	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
7		ovex 7479	. . . . . . . . . . . 12 ⊢ (𝑀...𝑛) ∈ V
8		elmapg 8890	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑀...𝑛) ∈ V) → (𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛)) ↔ 𝑔:(𝑀...𝑛)⟶𝐴))
9	6, 7, 8	sylancl 598	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛)) ↔ 𝑔:(𝑀...𝑛)⟶𝐴))
10	5, 9	imbitrrid 249	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → 𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛))))
11	10	abssdv 3995	. . . . . . . . 9 ⊢ (𝜑 → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ (𝐴 ↑_m (𝑀...𝑛)))
12		ovex 7479	. . . . . . . . 9 ⊢ (𝐴 ↑_m (𝑀...𝑛)) ∈ V
13		ssexg 5286	. . . . . . . . 9 ⊢ (({𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ (𝐴 ↑_m (𝑀...𝑛)) ∧ (𝐴 ↑_m (𝑀...𝑛)) ∈ V) → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
14	11, 12, 13	sylancl 598	. . . . . . . 8 ⊢ (𝜑 → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
15	14	ralrimivw 3162	. . . . . . 7 ⊢ (𝜑 → ∀𝑛 ∈ 𝑍 {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
16		abrexex2g 8003	. . . . . . 7 ⊢ ((𝑍 ∈ V ∧ ∀𝑛 ∈ 𝑍 {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V) → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
17	4, 15, 16	sylancr 599	. . . . . 6 ⊢ (𝜑 → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
18	2, 17	eqeltrid 2868	. . . . 5 ⊢ (𝜑 → 𝐽 ∈ V)
19	18	adantr 486	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐽 ∈ V)
20		sdc.7	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ∈ ℤ)
21	20	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ ℤ)
22		uzid 13010	. . . . . . . 8 ⊢ (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ_≥‘𝑀))
23	21, 22	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ (ℤ_≥‘𝑀))
24	23, 3	eleqtrrdi 2875	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ 𝑍)
25		simprl 783	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔:{𝑀}⟶𝐴)
26		fzsn 13730	. . . . . . . . 9 ⊢ (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
27	21, 26	syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑀...𝑀) = {𝑀})
28	27	feq2d 6718	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑔:(𝑀...𝑀)⟶𝐴 ↔ 𝑔:{𝑀}⟶𝐴))
29	25, 28	mpbird 260	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔:(𝑀...𝑀)⟶𝐴)
30		simprr 785	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝜏)
31		oveq2 7454	. . . . . . . . 9 ⊢ (𝑛 = 𝑀 → (𝑀...𝑛) = (𝑀...𝑀))
32	31	feq2d 6718	. . . . . . . 8 ⊢ (𝑛 = 𝑀 → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ 𝑔:(𝑀...𝑀)⟶𝐴))
33		sdc.3	. . . . . . . 8 ⊢ (𝑛 = 𝑀 → (𝜓 ↔ 𝜏))
34	32, 33	anbi12d 644	. . . . . . 7 ⊢ (𝑛 = 𝑀 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (𝑔:(𝑀...𝑀)⟶𝐴 ∧ 𝜏)))
35	34	rspcev 3580	. . . . . 6 ⊢ ((𝑀 ∈ 𝑍 ∧ (𝑔:(𝑀...𝑀)⟶𝐴 ∧ 𝜏)) → ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
36	24, 29, 30, 35	syl12anc 850	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
37	2	eqabri 2906	. . . . 5 ⊢ (𝑔 ∈ 𝐽 ↔ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
38	36, 37	sylibr 237	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔 ∈ 𝐽)
39	3	peano2uzs 13059	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝑍 → (𝑘 + 1) ∈ 𝑍)
40	39	ad2antlr 740	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → (𝑘 + 1) ∈ 𝑍)
41		simpr1 1213	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ℎ:(𝑀...(𝑘 + 1))⟶𝐴)
42		simpr3 1215	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → 𝜎)
43		vex 3458	. . . . . . . . . . . . . . . . . 18 ⊢ ℎ ∈ V
44		ovex 7479	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 + 1) ∈ V
45		sdc.5	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑔 = ℎ ∧ 𝑛 = (𝑘 + 1)) → (𝜓 ↔ 𝜎))
46	45	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((𝑔 = ℎ ∧ 𝑛 = (𝑘 + 1)) → (𝜓 ↔ 𝜎)))
47	43, 44, 46	sbc2iedv 3819	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ([ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓 ↔ 𝜎))
48	47	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ([ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓 ↔ 𝜎))
49	42, 48	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)
50		nfv 1949	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛 ℎ:(𝑀...(𝑘 + 1))⟶𝐴
51		nfcv 2926	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑛ℎ
52		nfsbc1v 3762	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑛[(𝑘 + 1) / 𝑛]𝜓
53	51, 52	nfsbcw 3764	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛[ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓
54	50, 53	nfan 1934	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)
55		oveq2 7454	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = (𝑘 + 1) → (𝑀...𝑛) = (𝑀...(𝑘 + 1)))
56	55	feq2d 6718	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑘 + 1) → (ℎ:(𝑀...𝑛)⟶𝐴 ↔ ℎ:(𝑀...(𝑘 + 1))⟶𝐴))
57		sbceq1a 3753	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = (𝑘 + 1) → (𝜓 ↔ [(𝑘 + 1) / 𝑛]𝜓))
58	57	sbcbidv 3797	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑘 + 1) → ([ℎ / 𝑔]𝜓 ↔ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓))
59	56, 58	anbi12d 644	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑘 + 1) → ((ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓) ↔ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)))
60	54, 59	rspce 3569	. . . . . . . . . . . . . . 15 ⊢ (((𝑘 + 1) ∈ 𝑍 ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)) → ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
61	40, 41, 49, 60	syl12anc 850	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
62	2	eleq2i 2856	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ 𝐽 ↔ ℎ ∈ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)})
63		nfcv 2926	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑔𝑍
64		nfv 1949	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑔 ℎ:(𝑀...𝑛)⟶𝐴
65		nfsbc1v 3762	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑔[ℎ / 𝑔]𝜓
66	64, 65	nfan 1934	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑔(ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)
67	63, 66	nfrexw 3314	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑔∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)
68		feq1 6712	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑔 = ℎ → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ ℎ:(𝑀...𝑛)⟶𝐴))
69		sbceq1a 3753	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑔 = ℎ → (𝜓 ↔ [ℎ / 𝑔]𝜓))
70	68, 69	anbi12d 644	. . . . . . . . . . . . . . . . 17 ⊢ (𝑔 = ℎ → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)))
71	70	rexbidv 3190	. . . . . . . . . . . . . . . 16 ⊢ (𝑔 = ℎ → (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)))
72	67, 43, 71	elabf 3632	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
73	62, 72	bitri 278	. . . . . . . . . . . . . 14 ⊢ (ℎ ∈ 𝐽 ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
74	61, 73	sylibr 237	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ℎ ∈ 𝐽)
75	74	rexlimdva2 3169	. . . . . . . . . . . 12 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) → ℎ ∈ 𝐽))
76	75	abssdv 3995	. . . . . . . . . . 11 ⊢ (𝜑 → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽)
77	76	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽)
78	18	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → 𝐽 ∈ V)
79		elpw2g 5300	. . . . . . . . . . 11 ⊢ (𝐽 ∈ V → ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ↔ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽))
80	78, 79	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ↔ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽))
81	77, 80	mpbird 260	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽)
82		oveq2 7454	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑘 → (𝑀...𝑛) = (𝑀...𝑘))
83	82	feq2d 6718	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑘 → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ 𝑔:(𝑀...𝑘)⟶𝐴))
84		sdc.4	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑘 → (𝜓 ↔ 𝜃))
85	83, 84	anbi12d 644	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑘 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)))
86	85	cbvrexvw 3245	. . . . . . . . . . . . . . . 16 ⊢ (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃))
87		sdc.9	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑍) → ((𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
88	87	reximdva 3179	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃𝑘 ∈ 𝑍 ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
89		rexcom4 3293	. . . . . . . . . . . . . . . . 17 ⊢ (∃𝑘 ∈ 𝑍 ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
90	88, 89	imbitrdi 254	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
91	86, 90	biimtrid 245	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
92	91	ss2abdv 3993	. . . . . . . . . . . . . 14 ⊢ (𝜑 → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
93	2, 92	eqsstrid 3951	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ⊆ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
94	93	sselda 3913	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → 𝑥 ∈ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
95		vex 3458	. . . . . . . . . . . . 13 ⊢ 𝑥 ∈ V
96		eqeq1 2767	. . . . . . . . . . . . . . . 16 ⊢ (𝑔 = 𝑥 → (𝑔 = (ℎ ↾ (𝑀...𝑘)) ↔ 𝑥 = (ℎ ↾ (𝑀...𝑘))))
97	96	3anbi2d 1470	. . . . . . . . . . . . . . 15 ⊢ (𝑔 = 𝑥 → ((ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
98	97	rexbidv 3190	. . . . . . . . . . . . . 14 ⊢ (𝑔 = 𝑥 → (∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
99	98	exbidv 1956	. . . . . . . . . . . . 13 ⊢ (𝑔 = 𝑥 → (∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
100	95, 99	elab 3636	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
101	94, 100	sylib 221	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
102		abn0 4337	. . . . . . . . . . 11 ⊢ ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅ ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
103	101, 102	sylibr 237	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅)
104	103	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅)
105		eldifsn 4748	. . . . . . . . 9 ⊢ ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}) ↔ ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ∧ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ≠ ∅))
106	81, 104, 105	sylanbrc 595	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}))
107	106	adantrl 729	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑤 ∈ 𝑍 ∧ 𝑥 ∈ 𝐽)) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}))
108	107	ralrimivva 3209	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∀𝑤 ∈ 𝑍 ∀𝑥 ∈ 𝐽 {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}))
109		sdc.11	. . . . . . 7 ⊢ 𝐹 = (𝑤 ∈ 𝑍, 𝑥 ∈ 𝐽 ↦ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
110	109	fmpo 8107	. . . . . 6 ⊢ (∀𝑤 ∈ 𝑍 ∀𝑥 ∈ 𝐽 {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}) ↔ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
111	108, 110	sylib 221	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
112	20	iftrued 4493	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑀 ∈ ℤ, 𝑀, 0) = 𝑀)
113	112	fveq2d 6915	. . . . . . . . 9 ⊢ (𝜑 → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘𝑀))
114	113, 3	eqtr4di 2816	. . . . . . . 8 ⊢ (𝜑 → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑍)
115	114	xpeq1d 5685	. . . . . . 7 ⊢ (𝜑 → ((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽) = (𝑍 × 𝐽))
116	115	feq2d 6718	. . . . . 6 ⊢ (𝜑 → (𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}) ↔ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅})))
117	116	biimpar 483	. . . . 5 ⊢ ((𝜑 ∧ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅})) → 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
118	111, 117	syldan 603	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
119		0z 12734	. . . . . 6 ⊢ 0 ∈ ℤ
120	119	elimel 4555	. . . . 5 ⊢ if(𝑀 ∈ ℤ, 𝑀, 0) ∈ ℤ
121		eqid 2763	. . . . 5 ⊢ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))
122	120, 121	axdc4uz 14157	. . . 4 ⊢ ((𝐽 ∈ V ∧ 𝑔 ∈ 𝐽 ∧ 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅})) → ∃𝑗(𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))))
123	19, 38, 118, 122	syl3anc 1399	. . 3 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑗(𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))))
124	21	iftrued 4493	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → if(𝑀 ∈ ℤ, 𝑀, 0) = 𝑀)
125	124	fveq2d 6915	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘𝑀))
126	125, 3	eqtr4di 2816	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑍)
127	126	feq2d 6718	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ↔ 𝑗:𝑍⟶𝐽))
128	86	abbii 2830	. . . . . . . . 9 ⊢ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
129	2, 128	eqtri 2786	. . . . . . . 8 ⊢ 𝐽 = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
130		feq3 6714	. . . . . . . 8 ⊢ (𝐽 = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} → (𝑗:𝑍⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}))
131	129, 130	ax-mp 5	. . . . . . 7 ⊢ (𝑗:𝑍⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)})
132	127, 131	bitrdi 290	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}))
133	124	fveqeq2d 6919	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ↔ (𝑗‘𝑀) = 𝑔))
134	126	raleqdv 3323	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)) ↔ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))))
135	132, 133, 134	3anbi123d 1465	. . . . 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 1949	. . . . . . . 8 ⊢ Ⅎ𝑘(𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏))
143		nfcv 2926	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝑗
144		nfcv 2926	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝑍
145		nfre1 3291	. . . . . . . . . . 11 ⊢ Ⅎ𝑘∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)
146	145	nfab 2932	. . . . . . . . . 10 ⊢ Ⅎ𝑘{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
147	143, 144, 146	nff 6730	. . . . . . . . 9 ⊢ Ⅎ𝑘 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
148		nfv 1949	. . . . . . . . 9 ⊢ Ⅎ𝑘(𝑗‘𝑀) = 𝑔
149		nfcv 2926	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝑚
150	129, 146	nfcxfr 2924	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘𝐽
151		nfre1 3291	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)
152	151	nfab 2932	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘{ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)}
153	144, 150, 152	nfmpo 7528	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘(𝑤 ∈ 𝑍, 𝑥 ∈ 𝐽 ↦ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
154	109, 153	nfcxfr 2924	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝐹
155		nfcv 2926	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘(𝑗‘𝑚)
156	149, 154, 155	nfov 7476	. . . . . . . . . . 11 ⊢ Ⅎ𝑘(𝑚𝐹(𝑗‘𝑚))
157	156	nfel2 2944	. . . . . . . . . 10 ⊢ Ⅎ𝑘(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))
158	144, 157	nfralw 3313	. . . . . . . . 9 ⊢ Ⅎ𝑘∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))
159	147, 148, 158	nf3an 1936	. . . . . . . 8 ⊢ Ⅎ𝑘(𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))
160	142, 159	nfan 1934	. . . . . . 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 6722	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ((𝑗‘𝑀):(𝑀...𝑀)⟶𝐴 ↔ 𝑔:{𝑀}⟶𝐴))
167	163, 166	mpbird 260	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → (𝑗‘𝑀):(𝑀...𝑀)⟶𝐴)
168		simpr3 1215	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))
169		fvoveq1 7469	. . . . . . . . . 10 ⊢ (𝑚 = 𝑤 → (𝑗‘(𝑚 + 1)) = (𝑗‘(𝑤 + 1)))
170		id 23	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑤 → 𝑚 = 𝑤)
171		fveq2 6911	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑤 → (𝑗‘𝑚) = (𝑗‘𝑤))
172	170, 171	oveq12d 7464	. . . . . . . . . 10 ⊢ (𝑚 = 𝑤 → (𝑚𝐹(𝑗‘𝑚)) = (𝑤𝐹(𝑗‘𝑤)))
173	169, 172	eleq12d 2858	. . . . . . . . 9 ⊢ (𝑚 = 𝑤 → ((𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)) ↔ (𝑗‘(𝑤 + 1)) ∈ (𝑤𝐹(𝑗‘𝑤))))
174	173	rspccva 3579	. . . . . . . 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 38879	. . . . . 6 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))
177	176	ex 418	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
178	135, 177	sylbid 243	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
179	178	exlimdv 1968	. . 3 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (∃𝑗(𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
180	123, 179	mpd 16	. 2 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))
181	1, 180	exlimddv 1970	1 ⊢ (𝜑 → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∃wex 1812 ∈ wcel 2147 {cab 2741 ≠ wne 2959 ∀wral 3080 ∃wrex 3090 Vcvv 3454 [wsbc 3742 ⊆ wss 3900 ∖ cdif 4048 ∅c0 4281 ifcif 4485 𝒫 cpw 4560 {csn 4588 × cxp 5654 ↾ cres 5658 ⟶wf 6557 ‘cfv 6561 (class class class)co 7446 ∈ cmpo 7448 ↑_m cmap 8878 0cc0 11230 1c1 11231 + caddc 11233 ℤcz 12723 ℤ_≥cuz 12995 ...cfz 13669

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-rep 5236 ax-sep 5253 ax-nul 5264 ax-pow 5332 ax-pr 5396 ax-un 7778 ax-inf2 9672 ax-dc 10554 ax-cnex 11286 ax-resscn 11287 ax-1cn 11288 ax-icn 11289 ax-addcl 11290 ax-addrcl 11291 ax-mulcl 11292 ax-mulrcl 11293 ax-mulcom 11294 ax-addass 11295 ax-mulass 11296 ax-distr 11297 ax-i2m1 11298 ax-1ne0 11299 ax-1rid 11300 ax-rnegex 11301 ax-rrecex 11302 ax-cnre 11303 ax-pre-lttri 11304 ax-pre-lttrn 11305 ax-pre-ltadd 11306 ax-pre-mulgt0 11307

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-op 4839 df-uni 4871 df-iun 4956 df-br 5107 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5551 df-eprel 5556 df-po 5564 df-so 5565 df-fr 5609 df-we 5611 df-xp 5662 df-rel 5663 df-cnv 5664 df-co 5665 df-dm 5666 df-rn 5667 df-res 5668 df-ima 5669 df-pred 6325 df-ord 6386 df-on 6387 df-lim 6388 df-suc 6389 df-iota 6515 df-fun 6563 df-fn 6564 df-f 6565 df-f1 6566 df-fo 6567 df-f1o 6568 df-fv 6569 df-riota 7403 df-ov 7449 df-oprab 7450 df-mpo 7451 df-om 7905 df-1st 8028 df-2nd 8029 df-frecs 8330 df-wrecs 8361 df-recs 8410 df-rdg 8449 df-1o 8507 df-er 8748 df-map 8880 df-en 9005 df-dom 9006 df-sdom 9007 df-pnf 11375 df-mnf 11376 df-xr 11377 df-ltxr 11378 df-le 11379 df-sub 11573 df-neg 11574 df-nn 12366 df-n0 12637 df-z 12724 df-uz 12996 df-fz 13670

This theorem is used by: sdc 38881

W3C validator