Theorem bj-finsumval0 37329

Description: Value of a finite sum. (Contributed by BJ, 9-Jun-2019.) (Proof shortened by AV, 5-May-2021.)

Hypotheses

Ref	Expression
bj-finsumval0.1	⊢ (𝜑 → 𝐴 ∈ CMnd)
bj-finsumval0.2	⊢ (𝜑 → 𝐼 ∈ Fin)
bj-finsumval0.3	⊢ (𝜑 → 𝐵:𝐼⟶(Base‘𝐴))

Assertion

Ref	Expression
bj-finsumval0	⊢ (𝜑 → (𝐴 FinSum 𝐵) = (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))

Distinct variable groups:   𝐴,𝑠,𝑓,𝑚,𝑛   𝐵,𝑓,𝑚,𝑛,𝑠   𝑓,𝐼,𝑛   𝜑,𝑓,𝑚,𝑠

Allowed substitution hints:   𝜑(𝑛)   𝐼(𝑚,𝑠)

Proof of Theorem bj-finsumval0

Dummy variables 𝑡 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-ov 7349	. 2 ⊢ (𝐴 FinSum 𝐵) = ( FinSum ‘⟨𝐴, 𝐵⟩)
2		df-bj-finsum 37328	. . 3 ⊢ FinSum = (𝑥 ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))} ↦ (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚))))
3		simpr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → 𝑥 = ⟨𝐴, 𝐵⟩)
4	3	fveq2d 6826	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (1st ‘𝑥) = (1st ‘⟨𝐴, 𝐵⟩))
5		bj-finsumval0.1	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ CMnd)
6	5	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → 𝐴 ∈ CMnd)
7		bj-finsumval0.3	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵:𝐼⟶(Base‘𝐴))
8		bj-finsumval0.2	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐼 ∈ Fin)
9	7, 8	fexd 7161	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ V)
10	9	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → 𝐵 ∈ V)
11		op1stg 7933	. . . . . . . . . 10 ⊢ ((𝐴 ∈ CMnd ∧ 𝐵 ∈ V) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
12	6, 10, 11	syl2anc 584	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
13	4, 12	eqtrd 2766	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (1st ‘𝑥) = 𝐴)
14	3	fveq2d 6826	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (2nd ‘𝑥) = (2nd ‘⟨𝐴, 𝐵⟩))
15		op2ndg 7934	. . . . . . . . . 10 ⊢ ((𝐴 ∈ CMnd ∧ 𝐵 ∈ V) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
16	6, 10, 15	syl2anc 584	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
17	14, 16	eqtrd 2766	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (2nd ‘𝑥) = 𝐵)
18	17	dmeqd 5844	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → dom (2nd ‘𝑥) = dom 𝐵)
19	7	fdmd 6661	. . . . . . . . . 10 ⊢ (𝜑 → dom 𝐵 = 𝐼)
20	19	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → dom 𝐵 = 𝐼)
21	18, 20	eqtrd 2766	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → dom (2nd ‘𝑥) = 𝐼)
22		f1oeq3 6753	. . . . . . . . . . . . . . 15 ⊢ (dom (2nd ‘𝑥) = 𝐼 → (𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ↔ 𝑓:(1...𝑚)–1-1-onto→𝐼))
23	22	biimpd 229	. . . . . . . . . . . . . 14 ⊢ (dom (2nd ‘𝑥) = 𝐼 → (𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) → 𝑓:(1...𝑚)–1-1-onto→𝐼))
24	23	ad2antll 729	. . . . . . . . . . . . 13 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → (𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) → 𝑓:(1...𝑚)–1-1-onto→𝐼))
25	24	adantrd 491	. . . . . . . . . . . 12 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) → 𝑓:(1...𝑚)–1-1-onto→𝐼))
26	25	adantr 480	. . . . . . . . . . 11 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) → 𝑓:(1...𝑚)–1-1-onto→𝐼))
27		eqidd 2732	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 1 = 1)
28		simprl 770	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → (1st ‘𝑥) = 𝐴)
29	28	fveq2d 6826	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → (+g‘(1st ‘𝑥)) = (+g‘𝐴))
30	29	adantrr 717	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (+g‘(1st ‘𝑥)) = (+g‘𝐴))
31		simprrl 780	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → (2nd ‘𝑥) = 𝐵)
32	31	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) ∧ 𝑛 ∈ ℕ) → (2nd ‘𝑥) = 𝐵)
33	32	fveq1d 6824	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) ∧ 𝑛 ∈ ℕ) → ((2nd ‘𝑥)‘(𝑓‘𝑛)) = (𝐵‘(𝑓‘𝑛)))
34	33	mpteq2dva 5182	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))) = (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))
35	34	adantrr 717	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))) = (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))
36	27, 30, 35	seqeq123d 13917	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛)))) = seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛)))))
37		simprr 772	. . . . . . . . . . . . . . . . . 18 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → dom (2nd ‘𝑥) = 𝐼)
38	37	anim1ci 616	. . . . . . . . . . . . . . . . 17 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼))
39		hashfz1 14253	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ0 → (♯‘(1...𝑚)) = 𝑚)
40	39	eqcomd 2737	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑚 ∈ ℕ0 → 𝑚 = (♯‘(1...𝑚)))
41	40	ad2antrl 728	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → 𝑚 = (♯‘(1...𝑚)))
42		fzfid 13880	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → (1...𝑚) ∈ Fin)
43		19.8a 2184	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) → ∃𝑓 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥))
44	43	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → ∃𝑓 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥))
45		hasheqf1oi 14258	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1...𝑚) ∈ Fin → (∃𝑓 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) → (♯‘(1...𝑚)) = (♯‘dom (2nd ‘𝑥))))
46	42, 44, 45	sylc 65	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → (♯‘(1...𝑚)) = (♯‘dom (2nd ‘𝑥)))
47		simprr 772	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → dom (2nd ‘𝑥) = 𝐼)
48	47	fveq2d 6826	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → (♯‘dom (2nd ‘𝑥)) = (♯‘𝐼))
49	41, 46, 48	3eqtrd 2770	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → 𝑚 = (♯‘𝐼))
50	38, 49	sylan2 593	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝑚 = (♯‘𝐼))
51	36, 50	fveq12d 6829	. . . . . . . . . . . . . . 15 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚) = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))
52	51	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚) ↔ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))))
53	52	biimpd 229	. . . . . . . . . . . . 13 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚) → 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))))
54	53	impancom 451	. . . . . . . . . . . 12 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) → ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))))
55	54	com12 32	. . . . . . . . . . 11 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) → 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))))
56	26, 55	jcad 512	. . . . . . . . . 10 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) → (𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
57	22	biimprd 248	. . . . . . . . . . . . . 14 ⊢ (dom (2nd ‘𝑥) = 𝐼 → (𝑓:(1...𝑚)–1-1-onto→𝐼 → 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥)))
58	57	ad2antll 729	. . . . . . . . . . . . 13 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → (𝑓:(1...𝑚)–1-1-onto→𝐼 → 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥)))
59	58	adantr 480	. . . . . . . . . . . 12 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → (𝑓:(1...𝑚)–1-1-onto→𝐼 → 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥)))
60	59	adantrd 491	. . . . . . . . . . 11 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))) → 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥)))
61		eqidd 2732	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 1 = 1)
62		simpl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → (1st ‘𝑥) = 𝐴)
63		tru 1545	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ⊤
64	62, 63	jctir 520	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → ((1st ‘𝑥) = 𝐴 ∧ ⊤))
65	64	ad2antrl 728	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → ((1st ‘𝑥) = 𝐴 ∧ ⊤))
66		simpl 482	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ⊤) → (1st ‘𝑥) = 𝐴)
67	66	eqcomd 2737	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ⊤) → 𝐴 = (1st ‘𝑥))
68	65, 67	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝐴 = (1st ‘𝑥))
69	68	fveq2d 6826	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (+g‘𝐴) = (+g‘(1st ‘𝑥)))
70		simpl 482	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼) → (2nd ‘𝑥) = 𝐵)
71	70	eqcomd 2737	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼) → 𝐵 = (2nd ‘𝑥))
72	71	ad2antll 729	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → 𝐵 = (2nd ‘𝑥))
73	72	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) ∧ 𝑛 ∈ ℕ) → 𝐵 = (2nd ‘𝑥))
74	73	fveq1d 6824	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) ∧ 𝑛 ∈ ℕ) → (𝐵‘(𝑓‘𝑛)) = ((2nd ‘𝑥)‘(𝑓‘𝑛)))
75	74	adantlrr 721	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) ∧ 𝑛 ∈ ℕ) → (𝐵‘(𝑓‘𝑛)) = ((2nd ‘𝑥)‘(𝑓‘𝑛)))
76	75	mpteq2dva 5182	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))) = (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))
77	61, 69, 76	seqeq123d 13917	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛)))) = seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛)))))
78	59	impcom 407	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥))
79		simprr 772	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝑚 ∈ ℕ0)
80	37	ad2antrl 728	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → dom (2nd ‘𝑥) = 𝐼)
81	78, 79, 80, 49	syl12anc 836	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝑚 = (♯‘𝐼))
82	81	eqcomd 2737	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (♯‘𝐼) = 𝑚)
83	77, 82	fveq12d 6829	. . . . . . . . . . . . . . 15 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)) = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚))
84	83	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)) ↔ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)))
85	84	biimpd 229	. . . . . . . . . . . . 13 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)) → 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)))
86	85	impancom 451	. . . . . . . . . . . 12 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))) → ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)))
87	86	com12 32	. . . . . . . . . . 11 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))) → 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)))
88	60, 87	jcad 512	. . . . . . . . . 10 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))) → (𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚))))
89	56, 88	impbid 212	. . . . . . . . 9 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ (𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
90	89	ex 412	. . . . . . . 8 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → (𝑚 ∈ ℕ0 → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ (𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))))))
91	13, 17, 21, 90	syl12anc 836	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (𝑚 ∈ ℕ0 → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ (𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼))))))
92	91	imp 406	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) ∧ 𝑚 ∈ ℕ0) → ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ (𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
93	92	exbidv 1922	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) ∧ 𝑚 ∈ ℕ0) → (∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
94	93	rexbidva 3154	. . . 4 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ ∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
95	94	iotabidv 6465	. . 3 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚))) = (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
96		eleq1 2819	. . . . . . . . . 10 ⊢ (𝑡 = 𝐼 → (𝑡 ∈ Fin ↔ 𝐼 ∈ Fin))
97		feq2 6630	. . . . . . . . . 10 ⊢ (𝑡 = 𝐼 → (𝐵:𝑡⟶(Base‘𝐴) ↔ 𝐵:𝐼⟶(Base‘𝐴)))
98	96, 97	anbi12d 632	. . . . . . . . 9 ⊢ (𝑡 = 𝐼 → ((𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)) ↔ (𝐼 ∈ Fin ∧ 𝐵:𝐼⟶(Base‘𝐴))))
99	98	ceqsexgv 3604	. . . . . . . 8 ⊢ (𝐼 ∈ Fin → (∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))) ↔ (𝐼 ∈ Fin ∧ 𝐵:𝐼⟶(Base‘𝐴))))
100	8, 99	syl 17	. . . . . . 7 ⊢ (𝜑 → (∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))) ↔ (𝐼 ∈ Fin ∧ 𝐵:𝐼⟶(Base‘𝐴))))
101	8, 7, 100	mpbir2and 713	. . . . . 6 ⊢ (𝜑 → ∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))))
102		exsimpr 1870	. . . . . 6 ⊢ (∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))) → ∃𝑡(𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)))
103	101, 102	syl 17	. . . . 5 ⊢ (𝜑 → ∃𝑡(𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)))
104		df-rex 3057	. . . . 5 ⊢ (∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴) ↔ ∃𝑡(𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)))
105	103, 104	sylibr 234	. . . 4 ⊢ (𝜑 → ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))
106		eleq1 2819	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (𝑦 ∈ CMnd ↔ 𝐴 ∈ CMnd))
107		fveq2 6822	. . . . . . . . 9 ⊢ (𝑦 = 𝐴 → (Base‘𝑦) = (Base‘𝐴))
108	107	feq3d 6636	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑧:𝑡⟶(Base‘𝑦) ↔ 𝑧:𝑡⟶(Base‘𝐴)))
109	108	rexbidv 3156	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦) ↔ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴)))
110	106, 109	anbi12d 632	. . . . . 6 ⊢ (𝑦 = 𝐴 → ((𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦)) ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴))))
111		feq1 6629	. . . . . . . 8 ⊢ (𝑧 = 𝐵 → (𝑧:𝑡⟶(Base‘𝐴) ↔ 𝐵:𝑡⟶(Base‘𝐴)))
112	111	rexbidv 3156	. . . . . . 7 ⊢ (𝑧 = 𝐵 → (∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴) ↔ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴)))
113	112	anbi2d 630	. . . . . 6 ⊢ (𝑧 = 𝐵 → ((𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴)) ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))))
114	110, 113	opelopabg 5476	. . . . 5 ⊢ ((𝐴 ∈ CMnd ∧ 𝐵 ∈ V) → (⟨𝐴, 𝐵⟩ ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))} ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))))
115	5, 9, 114	syl2anc 584	. . . 4 ⊢ (𝜑 → (⟨𝐴, 𝐵⟩ ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))} ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))))
116	5, 105, 115	mpbir2and 713	. . 3 ⊢ (𝜑 → ⟨𝐴, 𝐵⟩ ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))})
117		iotaex 6457	. . . 4 ⊢ (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))) ∈ V
118	117	a1i 11	. . 3 ⊢ (𝜑 → (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))) ∈ V)
119	2, 95, 116, 118	fvmptd2 6937	. 2 ⊢ (𝜑 → ( FinSum ‘⟨𝐴, 𝐵⟩) = (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
120	1, 119	eqtrid 2778	1 ⊢ (𝜑 → (𝐴 FinSum 𝐵) = (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1541  ⊤wtru 1542  ∃wex 1780   ∈ wcel 2111  ∃wrex 3056  Vcvv 3436  ⟨cop 4579  {copab 5151   ↦ cmpt 5170  dom cdm 5614  ℩cio 6435  ⟶wf 6477  –1-1-onto→wf1o 6480  ‘cfv 6481  (class class class)co 7346  1^st c1st 7919  2^nd c2nd 7920  Fincfn 8869  1c1 11007  ℕcn 12125  ℕ₀cn0 12381  ...cfz 13407  seqcseq 13908  ♯chash 14237  Basecbs 17120  +_gcplusg 17161  CMndccmn 19692   FinSum cfinsum 37327

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-rep 5215  ax-sep 5232  ax-nul 5242  ax-pow 5301  ax-pr 5368  ax-un 7668  ax-cnex 11062  ax-resscn 11063  ax-1cn 11064  ax-icn 11065  ax-addcl 11066  ax-addrcl 11067  ax-mulcl 11068  ax-mulrcl 11069  ax-mulcom 11070  ax-addass 11071  ax-mulass 11072  ax-distr 11073  ax-i2m1 11074  ax-1ne0 11075  ax-1rid 11076  ax-rnegex 11077  ax-rrecex 11078  ax-cnre 11079  ax-pre-lttri 11080  ax-pre-lttrn 11081  ax-pre-ltadd 11082  ax-pre-mulgt0 11083

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-nel 3033  df-ral 3048  df-rex 3057  df-reu 3347  df-rab 3396  df-v 3438  df-sbc 3737  df-csb 3846  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3917  df-nul 4281  df-if 4473  df-pw 4549  df-sn 4574  df-pr 4576  df-op 4580  df-uni 4857  df-int 4896  df-iun 4941  df-br 5090  df-opab 5152  df-mpt 5171  df-tr 5197  df-id 5509  df-eprel 5514  df-po 5522  df-so 5523  df-fr 5567  df-we 5569  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-pred 6248  df-ord 6309  df-on 6310  df-lim 6311  df-suc 6312  df-iota 6437  df-fun 6483  df-fn 6484  df-f 6485  df-f1 6486  df-fo 6487  df-f1o 6488  df-fv 6489  df-riota 7303  df-ov 7349  df-oprab 7350  df-mpo 7351  df-om 7797  df-1st 7921  df-2nd 7922  df-frecs 8211  df-wrecs 8242  df-recs 8291  df-rdg 8329  df-1o 8385  df-er 8622  df-en 8870  df-dom 8871  df-sdom 8872  df-fin 8873  df-card 9832  df-pnf 11148  df-mnf 11149  df-xr 11150  df-ltxr 11151  df-le 11152  df-sub 11346  df-neg 11347  df-nn 12126  df-n0 12382  df-z 12469  df-uz 12733  df-fz 13408  df-seq 13909  df-hash 14238  df-bj-finsum 37328

This theorem is referenced by: (None)