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 38645

Description: Lemma for sdc 38646. (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 6891	. . . . . . 7 ⊢ 𝑍 ∈ V
5		simpl 488	. . . . . . . . . . 11 ⊢ ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → 𝑔:(𝑀...𝑛)⟶𝐴)
6		sdc.6	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
7		ovex 7445	. . . . . . . . . . . 12 ⊢ (𝑀...𝑛) ∈ V
8		elmapg 8843	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑀...𝑛) ∈ V) → (𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛)) ↔ 𝑔:(𝑀...𝑛)⟶𝐴))
9	6, 7, 8	sylancl 598	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛)) ↔ 𝑔:(𝑀...𝑛)⟶𝐴))
10	5, 9	imbitrrid 249	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → 𝑔 ∈ (𝐴 ↑_m (𝑀...𝑛))))
11	10	abssdv 4015	. . . . . . . . 9 ⊢ (𝜑 → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ (𝐴 ↑_m (𝑀...𝑛)))
12		ovex 7445	. . . . . . . . 9 ⊢ (𝐴 ↑_m (𝑀...𝑛)) ∈ V
13		ssexg 5281	. . . . . . . . 9 ⊢ (({𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ (𝐴 ↑_m (𝑀...𝑛)) ∧ (𝐴 ↑_m (𝑀...𝑛)) ∈ V) → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
14	11, 12, 13	sylancl 598	. . . . . . . 8 ⊢ (𝜑 → {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
15	14	ralrimivw 3159	. . . . . . 7 ⊢ (𝜑 → ∀𝑛 ∈ 𝑍 {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
16		abrexex2g 7965	. . . . . . 7 ⊢ ((𝑍 ∈ V ∧ ∀𝑛 ∈ 𝑍 {𝑔 ∣ (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V) → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
17	4, 15, 16	sylancr 599	. . . . . 6 ⊢ (𝜑 → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ∈ V)
18	2, 17	eqeltrid 2865	. . . . 5 ⊢ (𝜑 → 𝐽 ∈ V)
19	18	adantr 486	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐽 ∈ V)
20		sdc.7	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ∈ ℤ)
21	20	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ ℤ)
22		uzid 12961	. . . . . . . 8 ⊢ (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ_≥‘𝑀))
23	21, 22	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ (ℤ_≥‘𝑀))
24	23, 3	eleqtrrdi 2872	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑀 ∈ 𝑍)
25		simprl 783	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔:{𝑀}⟶𝐴)
26		fzsn 13680	. . . . . . . . 9 ⊢ (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
27	21, 26	syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑀...𝑀) = {𝑀})
28	27	feq2d 6685	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑔:(𝑀...𝑀)⟶𝐴 ↔ 𝑔:{𝑀}⟶𝐴))
29	25, 28	mpbird 260	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔:(𝑀...𝑀)⟶𝐴)
30		simprr 785	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝜏)
31		oveq2 7420	. . . . . . . . 9 ⊢ (𝑛 = 𝑀 → (𝑀...𝑛) = (𝑀...𝑀))
32	31	feq2d 6685	. . . . . . . 8 ⊢ (𝑛 = 𝑀 → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ 𝑔:(𝑀...𝑀)⟶𝐴))
33		sdc.3	. . . . . . . 8 ⊢ (𝑛 = 𝑀 → (𝜓 ↔ 𝜏))
34	32, 33	anbi12d 644	. . . . . . 7 ⊢ (𝑛 = 𝑀 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (𝑔:(𝑀...𝑀)⟶𝐴 ∧ 𝜏)))
35	34	rspcev 3577	. . . . . 6 ⊢ ((𝑀 ∈ 𝑍 ∧ (𝑔:(𝑀...𝑀)⟶𝐴 ∧ 𝜏)) → ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
36	24, 29, 30, 35	syl12anc 850	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
37	2	eqabri 2903	. . . . 5 ⊢ (𝑔 ∈ 𝐽 ↔ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓))
38	36, 37	sylibr 237	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝑔 ∈ 𝐽)
39	3	peano2uzs 13010	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝑍 → (𝑘 + 1) ∈ 𝑍)
40	39	ad2antlr 740	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → (𝑘 + 1) ∈ 𝑍)
41		simpr1 1213	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ℎ:(𝑀...(𝑘 + 1))⟶𝐴)
42		simpr3 1215	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → 𝜎)
43		vex 3455	. . . . . . . . . . . . . . . . . 18 ⊢ ℎ ∈ V
44		ovex 7445	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 + 1) ∈ V
45		sdc.5	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑔 = ℎ ∧ 𝑛 = (𝑘 + 1)) → (𝜓 ↔ 𝜎))
46	45	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((𝑔 = ℎ ∧ 𝑛 = (𝑘 + 1)) → (𝜓 ↔ 𝜎)))
47	43, 44, 46	sbc2iedv 3815	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ([ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓 ↔ 𝜎))
48	47	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ([ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓 ↔ 𝜎))
49	42, 48	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)
50		nfv 1947	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛 ℎ:(𝑀...(𝑘 + 1))⟶𝐴
51		nfcv 2923	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑛ℎ
52		nfsbc1v 3759	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑛[(𝑘 + 1) / 𝑛]𝜓
53	51, 52	nfsbcw 3761	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛[ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓
54	50, 53	nfan 1932	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)
55		oveq2 7420	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = (𝑘 + 1) → (𝑀...𝑛) = (𝑀...(𝑘 + 1)))
56	55	feq2d 6685	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑘 + 1) → (ℎ:(𝑀...𝑛)⟶𝐴 ↔ ℎ:(𝑀...(𝑘 + 1))⟶𝐴))
57		sbceq1a 3750	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = (𝑘 + 1) → (𝜓 ↔ [(𝑘 + 1) / 𝑛]𝜓))
58	57	sbcbidv 3794	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑘 + 1) → ([ℎ / 𝑔]𝜓 ↔ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓))
59	56, 58	anbi12d 644	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑘 + 1) → ((ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓) ↔ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)))
60	54, 59	rspce 3566	. . . . . . . . . . . . . . 15 ⊢ (((𝑘 + 1) ∈ 𝑍 ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ [ℎ / 𝑔][(𝑘 + 1) / 𝑛]𝜓)) → ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
61	40, 41, 49, 60	syl12anc 850	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
62	2	eleq2i 2853	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ 𝐽 ↔ ℎ ∈ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)})
63		nfcv 2923	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑔𝑍
64		nfv 1947	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑔 ℎ:(𝑀...𝑛)⟶𝐴
65		nfsbc1v 3759	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑔[ℎ / 𝑔]𝜓
66	64, 65	nfan 1932	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑔(ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)
67	63, 66	nfrexw 3311	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑔∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)
68		feq1 6679	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑔 = ℎ → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ ℎ:(𝑀...𝑛)⟶𝐴))
69		sbceq1a 3750	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑔 = ℎ → (𝜓 ↔ [ℎ / 𝑔]𝜓))
70	68, 69	anbi12d 644	. . . . . . . . . . . . . . . . 17 ⊢ (𝑔 = ℎ → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)))
71	70	rexbidv 3187	. . . . . . . . . . . . . . . 16 ⊢ (𝑔 = ℎ → (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓)))
72	67, 43, 71	elabf 3629	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
73	62, 72	bitri 278	. . . . . . . . . . . . . 14 ⊢ (ℎ ∈ 𝐽 ↔ ∃𝑛 ∈ 𝑍 (ℎ:(𝑀...𝑛)⟶𝐴 ∧ [ℎ / 𝑔]𝜓))
74	61, 73	sylibr 237	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝑍) ∧ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)) → ℎ ∈ 𝐽)
75	74	rexlimdva2 3166	. . . . . . . . . . . 12 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) → ℎ ∈ 𝐽))
76	75	abssdv 4015	. . . . . . . . . . 11 ⊢ (𝜑 → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽)
77	76	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽)
78	18	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → 𝐽 ∈ V)
79		elpw2g 5295	. . . . . . . . . . 11 ⊢ (𝐽 ∈ V → ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ↔ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽))
80	78, 79	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → ({ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽 ↔ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ⊆ 𝐽))
81	77, 80	mpbird 260	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ 𝑥 ∈ 𝐽) → {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ 𝒫 𝐽)
82		oveq2 7420	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑘 → (𝑀...𝑛) = (𝑀...𝑘))
83	82	feq2d 6685	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑘 → (𝑔:(𝑀...𝑛)⟶𝐴 ↔ 𝑔:(𝑀...𝑘)⟶𝐴))
84		sdc.4	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑘 → (𝜓 ↔ 𝜃))
85	83, 84	anbi12d 644	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑘 → ((𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)))
86	85	cbvrexvw 3242	. . . . . . . . . . . . . . . 16 ⊢ (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) ↔ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃))
87		sdc.9	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑍) → ((𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
88	87	reximdva 3176	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃𝑘 ∈ 𝑍 ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
89		rexcom4 3290	. . . . . . . . . . . . . . . . 17 ⊢ (∃𝑘 ∈ 𝑍 ∃ℎ(ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
90	88, 89	imbitrdi 254	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
91	86, 90	biimtrid 245	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
92	91	ss2abdv 4013	. . . . . . . . . . . . . 14 ⊢ (𝜑 → {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} ⊆ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
93	2, 92	eqsstrid 3969	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ⊆ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
94	93	sselda 3931	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → 𝑥 ∈ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
95		vex 3455	. . . . . . . . . . . . 13 ⊢ 𝑥 ∈ V
96		eqeq1 2765	. . . . . . . . . . . . . . . 16 ⊢ (𝑔 = 𝑥 → (𝑔 = (ℎ ↾ (𝑀...𝑘)) ↔ 𝑥 = (ℎ ↾ (𝑀...𝑘))))
97	96	3anbi2d 1469	. . . . . . . . . . . . . . 15 ⊢ (𝑔 = 𝑥 → ((ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
98	97	rexbidv 3187	. . . . . . . . . . . . . 14 ⊢ (𝑔 = 𝑥 → (∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
99	98	exbidv 1954	. . . . . . . . . . . . 13 ⊢ (𝑔 = 𝑥 → (∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎) ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)))
100	95, 99	elab 3633	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ {𝑔 ∣ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑔 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ↔ ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
101	94, 100	sylib 221	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐽) → ∃ℎ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎))
102		abn0 4334	. . . . . . . . . . 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 3206	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∀𝑤 ∈ 𝑍 ∀𝑥 ∈ 𝐽 {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}))
109		sdc.11	. . . . . . 7 ⊢ 𝐹 = (𝑤 ∈ 𝑍, 𝑥 ∈ 𝐽 ↦ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
110	109	fmpo 8068	. . . . . 6 ⊢ (∀𝑤 ∈ 𝑍 ∀𝑥 ∈ 𝐽 {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)} ∈ (𝒫 𝐽 ∖ {∅}) ↔ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
111	108, 110	sylib 221	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
112	20	iftrued 4490	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑀 ∈ ℤ, 𝑀, 0) = 𝑀)
113	112	fveq2d 6881	. . . . . . . . 9 ⊢ (𝜑 → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘𝑀))
114	113, 3	eqtr4di 2814	. . . . . . . 8 ⊢ (𝜑 → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑍)
115	114	xpeq1d 5680	. . . . . . 7 ⊢ (𝜑 → ((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽) = (𝑍 × 𝐽))
116	115	feq2d 6685	. . . . . 6 ⊢ (𝜑 → (𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}) ↔ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅})))
117	116	biimpar 483	. . . . 5 ⊢ ((𝜑 ∧ 𝐹:(𝑍 × 𝐽)⟶(𝒫 𝐽 ∖ {∅})) → 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
118	111, 117	syldan 603	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → 𝐹:((ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) × 𝐽)⟶(𝒫 𝐽 ∖ {∅}))
119		0z 12685	. . . . . 6 ⊢ 0 ∈ ℤ
120	119	elimel 4552	. . . . 5 ⊢ if(𝑀 ∈ ℤ, 𝑀, 0) ∈ ℤ
121		eqid 2761	. . . . 5 ⊢ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))
122	120, 121	axdc4uz 14107	. . . 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 4490	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → if(𝑀 ∈ ℤ, 𝑀, 0) = 𝑀)
125	124	fveq2d 6881	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = (ℤ_≥‘𝑀))
126	125, 3	eqtr4di 2814	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑍)
127	126	feq2d 6685	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ↔ 𝑗:𝑍⟶𝐽))
128	86	abbii 2828	. . . . . . . . 9 ⊢ {𝑔 ∣ ∃𝑛 ∈ 𝑍 (𝑔:(𝑀...𝑛)⟶𝐴 ∧ 𝜓)} = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
129	2, 128	eqtri 2784	. . . . . . . 8 ⊢ 𝐽 = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
130		feq3 6681	. . . . . . . 8 ⊢ (𝐽 = {𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} → (𝑗:𝑍⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}))
131	129, 130	ax-mp 5	. . . . . . 7 ⊢ (𝑗:𝑍⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)})
132	127, 131	bitrdi 290	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ↔ 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}))
133	124	fveqeq2d 6885	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ↔ (𝑗‘𝑀) = 𝑔))
134	126	raleqdv 3320	. . . . . 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 1947	. . . . . . . 8 ⊢ Ⅎ𝑘(𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏))
143		nfcv 2923	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝑗
144		nfcv 2923	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝑍
145		nfre1 3288	. . . . . . . . . . 11 ⊢ Ⅎ𝑘∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)
146	145	nfab 2929	. . . . . . . . . 10 ⊢ Ⅎ𝑘{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
147	143, 144, 146	nff 6697	. . . . . . . . 9 ⊢ Ⅎ𝑘 𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)}
148		nfv 1947	. . . . . . . . 9 ⊢ Ⅎ𝑘(𝑗‘𝑀) = 𝑔
149		nfcv 2923	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝑚
150	129, 146	nfcxfr 2921	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘𝐽
151		nfre1 3288	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)
152	151	nfab 2929	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘{ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)}
153	144, 150, 152	nfmpo 7494	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘(𝑤 ∈ 𝑍, 𝑥 ∈ 𝐽 ↦ {ℎ ∣ ∃𝑘 ∈ 𝑍 (ℎ:(𝑀...(𝑘 + 1))⟶𝐴 ∧ 𝑥 = (ℎ ↾ (𝑀...𝑘)) ∧ 𝜎)})
154	109, 153	nfcxfr 2921	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝐹
155		nfcv 2923	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘(𝑗‘𝑚)
156	149, 154, 155	nfov 7442	. . . . . . . . . . 11 ⊢ Ⅎ𝑘(𝑚𝐹(𝑗‘𝑚))
157	156	nfel2 2941	. . . . . . . . . 10 ⊢ Ⅎ𝑘(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))
158	144, 157	nfralw 3310	. . . . . . . . 9 ⊢ Ⅎ𝑘∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))
159	147, 148, 158	nf3an 1934	. . . . . . . 8 ⊢ Ⅎ𝑘(𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))
160	142, 159	nfan 1932	. . . . . . 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 6689	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ((𝑗‘𝑀):(𝑀...𝑀)⟶𝐴 ↔ 𝑔:{𝑀}⟶𝐴))
167	163, 166	mpbird 260	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → (𝑗‘𝑀):(𝑀...𝑀)⟶𝐴)
168		simpr3 1215	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))
169		fvoveq1 7435	. . . . . . . . . 10 ⊢ (𝑚 = 𝑤 → (𝑗‘(𝑚 + 1)) = (𝑗‘(𝑤 + 1)))
170		id 23	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑤 → 𝑚 = 𝑤)
171		fveq2 6877	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑤 → (𝑗‘𝑚) = (𝑗‘𝑤))
172	170, 171	oveq12d 7430	. . . . . . . . . 10 ⊢ (𝑚 = 𝑤 → (𝑚𝐹(𝑗‘𝑚)) = (𝑤𝐹(𝑗‘𝑤)))
173	169, 172	eleq12d 2855	. . . . . . . . 9 ⊢ (𝑚 = 𝑤 → ((𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)) ↔ (𝑗‘(𝑤 + 1)) ∈ (𝑤𝐹(𝑗‘𝑤))))
174	173	rspccva 3576	. . . . . . . 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 38644	. . . . . 6 ⊢ (((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) ∧ (𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚)))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))
177	176	ex 418	. . . . 5 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗:𝑍⟶{𝑔 ∣ ∃𝑘 ∈ 𝑍 (𝑔:(𝑀...𝑘)⟶𝐴 ∧ 𝜃)} ∧ (𝑗‘𝑀) = 𝑔 ∧ ∀𝑚 ∈ 𝑍 (𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
178	135, 177	sylbid 243	. . . 4 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ((𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
179	178	exlimdv 1966	. . 3 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → (∃𝑗(𝑗:(ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))⟶𝐽 ∧ (𝑗‘if(𝑀 ∈ ℤ, 𝑀, 0)) = 𝑔 ∧ ∀𝑚 ∈ (ℤ_≥‘if(𝑀 ∈ ℤ, 𝑀, 0))(𝑗‘(𝑚 + 1)) ∈ (𝑚𝐹(𝑗‘𝑚))) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒)))
180	123, 179	mpd 16	. 2 ⊢ ((𝜑 ∧ (𝑔:{𝑀}⟶𝐴 ∧ 𝜏)) → ∃𝑓(𝑓:𝑍⟶𝐴 ∧ ∀𝑛 ∈ 𝑍 𝜒))
181	1, 180	exlimddv 1968	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 2145 {cab 2739 ≠ wne 2956 ∀wral 3077 ∃wrex 3087 Vcvv 3451 [wsbc 3739 ∖ cdif 3896 ⊆ wss 3899 ∅c0 4279 ifcif 4482 𝒫 cpw 4557 {csn 4584 × cxp 5649 ↾ cres 5653 ⟶wf 6527 ‘cfv 6531 (class class class)co 7412 ∈ cmpo 7414 ↑_m cmap 8831 0cc0 11181 1c1 11182 + caddc 11184 ℤcz 12674 ℤ_≥cuz 12946 ...cfz 13620

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 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2733 ax-rep 5232 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7740 ax-inf2 9626 ax-dc 10505 ax-cnex 11237 ax-resscn 11238 ax-1cn 11239 ax-icn 11240 ax-addcl 11241 ax-addrcl 11242 ax-mulcl 11243 ax-mulrcl 11244 ax-mulcom 11245 ax-addass 11246 ax-mulass 11247 ax-distr 11248 ax-i2m1 11249 ax-1ne0 11250 ax-1rid 11251 ax-rnegex 11252 ax-rrecex 11253 ax-cnre 11254 ax-pre-lttri 11255 ax-pre-lttrn 11256 ax-pre-ltadd 11257 ax-pre-mulgt0 11258

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 2100 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-reu 3367 df-rab 3414 df-v 3453 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6297 df-ord 6358 df-on 6359 df-lim 6360 df-suc 6361 df-iota 6487 df-fun 6533 df-fn 6534 df-f 6535 df-f1 6536 df-fo 6537 df-f1o 6538 df-fv 6539 df-riota 7369 df-ov 7415 df-oprab 7416 df-mpo 7417 df-om 7867 df-1st 7990 df-2nd 7991 df-frecs 8283 df-wrecs 8314 df-recs 8363 df-rdg 8402 df-1o 8460 df-er 8701 df-map 8833 df-en 8958 df-dom 8959 df-sdom 8960 df-pnf 11326 df-mnf 11327 df-xr 11328 df-ltxr 11329 df-le 11330 df-sub 11524 df-neg 11525 df-nn 12317 df-n0 12588 df-z 12675 df-uz 12947 df-fz 13621

This theorem is used by: sdc 38646

W3C validator