Theorem bj-finsumval0 37492

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 7363	. 2 ⊢ (𝐴 FinSum 𝐵) = ( FinSum ‘⟨𝐴, 𝐵⟩)
2		df-bj-finsum 37491	. . 3 ⊢ FinSum = (𝑥 ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))} ↦ (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚))))
3		simpr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → 𝑥 = ⟨𝐴, 𝐵⟩)
4	3	fveq2d 6839	. . . . . . . . 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 7175	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ V)
10	9	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → 𝐵 ∈ V)
11		op1stg 7947	. . . . . . . . . 10 ⊢ ((𝐴 ∈ CMnd ∧ 𝐵 ∈ V) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
12	6, 10, 11	syl2anc 585	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
13	4, 12	eqtrd 2772	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (1st ‘𝑥) = 𝐴)
14	3	fveq2d 6839	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (2nd ‘𝑥) = (2nd ‘⟨𝐴, 𝐵⟩))
15		op2ndg 7948	. . . . . . . . . 10 ⊢ ((𝐴 ∈ CMnd ∧ 𝐵 ∈ V) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
16	6, 10, 15	syl2anc 585	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
17	14, 16	eqtrd 2772	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (2nd ‘𝑥) = 𝐵)
18	17	dmeqd 5855	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → dom (2nd ‘𝑥) = dom 𝐵)
19	7	fdmd 6673	. . . . . . . . . 10 ⊢ (𝜑 → dom 𝐵 = 𝐼)
20	19	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → dom 𝐵 = 𝐼)
21	18, 20	eqtrd 2772	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → dom (2nd ‘𝑥) = 𝐼)
22		f1oeq3 6765	. . . . . . . . . . . . . . 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 730	. . . . . . . . . . . . 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 2738	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 1 = 1)
28		simprl 771	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → (1st ‘𝑥) = 𝐴)
29	28	fveq2d 6839	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → (+g‘(1st ‘𝑥)) = (+g‘𝐴))
30	29	adantrr 718	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (+g‘(1st ‘𝑥)) = (+g‘𝐴))
31		simprrl 781	. . . . . . . . . . . . . . . . . . . . 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 6837	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) ∧ 𝑛 ∈ ℕ) → ((2nd ‘𝑥)‘(𝑓‘𝑛)) = (𝐵‘(𝑓‘𝑛)))
34	33	mpteq2dva 5192	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) → (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))) = (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))
35	34	adantrr 718	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))) = (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))
36	27, 30, 35	seqeq123d 13937	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛)))) = seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛)))))
37		simprr 773	. . . . . . . . . . . . . . . . . 18 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → dom (2nd ‘𝑥) = 𝐼)
38	37	anim1ci 617	. . . . . . . . . . . . . . . . 17 ⊢ ((((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0) → (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼))
39		hashfz1 14273	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ0 → (♯‘(1...𝑚)) = 𝑚)
40	39	eqcomd 2743	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑚 ∈ ℕ0 → 𝑚 = (♯‘(1...𝑚)))
41	40	ad2antrl 729	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → 𝑚 = (♯‘(1...𝑚)))
42		fzfid 13900	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → (1...𝑚) ∈ Fin)
43		19.8a 2189	. . . . . . . . . . . . . . . . . . . 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 14278	. . . . . . . . . . . . . . . . . . 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 773	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → dom (2nd ‘𝑥) = 𝐼)
48	47	fveq2d 6839	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → (♯‘dom (2nd ‘𝑥)) = (♯‘𝐼))
49	41, 46, 48	3eqtrd 2776	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (𝑚 ∈ ℕ0 ∧ dom (2nd ‘𝑥) = 𝐼)) → 𝑚 = (♯‘𝐼))
50	38, 49	sylan2 594	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝑚 = (♯‘𝐼))
51	36, 50	fveq12d 6842	. . . . . . . . . . . . . . 15 ⊢ ((𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚) = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))
52	51	eqeq2d 2748	. . . . . . . . . . . . . 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 730	. . . . . . . . . . . . 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 2738	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 1 = 1)
62		simpl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → (1st ‘𝑥) = 𝐴)
63		tru 1546	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ⊤
64	62, 63	jctir 520	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) → ((1st ‘𝑥) = 𝐴 ∧ ⊤))
65	64	ad2antrl 729	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → ((1st ‘𝑥) = 𝐴 ∧ ⊤))
66		simpl 482	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ⊤) → (1st ‘𝑥) = 𝐴)
67	66	eqcomd 2743	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1st ‘𝑥) = 𝐴 ∧ ⊤) → 𝐴 = (1st ‘𝑥))
68	65, 67	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝐴 = (1st ‘𝑥))
69	68	fveq2d 6839	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (+g‘𝐴) = (+g‘(1st ‘𝑥)))
70		simpl 482	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼) → (2nd ‘𝑥) = 𝐵)
71	70	eqcomd 2743	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼) → 𝐵 = (2nd ‘𝑥))
72	71	ad2antll 730	. . . . . . . . . . . . . . . . . . . . 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 6837	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ ((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼))) ∧ 𝑛 ∈ ℕ) → (𝐵‘(𝑓‘𝑛)) = ((2nd ‘𝑥)‘(𝑓‘𝑛)))
75	74	adantlrr 722	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) ∧ 𝑛 ∈ ℕ) → (𝐵‘(𝑓‘𝑛)) = ((2nd ‘𝑥)‘(𝑓‘𝑛)))
76	75	mpteq2dva 5192	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))) = (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))
77	61, 69, 76	seqeq123d 13937	. . . . . . . . . . . . . . . 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 773	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝑚 ∈ ℕ0)
80	37	ad2antrl 729	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → dom (2nd ‘𝑥) = 𝐼)
81	78, 79, 80, 49	syl12anc 837	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → 𝑚 = (♯‘𝐼))
82	81	eqcomd 2743	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (♯‘𝐼) = 𝑚)
83	77, 82	fveq12d 6842	. . . . . . . . . . . . . . 15 ⊢ ((𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ (((1st ‘𝑥) = 𝐴 ∧ ((2nd ‘𝑥) = 𝐵 ∧ dom (2nd ‘𝑥) = 𝐼)) ∧ 𝑚 ∈ ℕ0)) → (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)) = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚))
84	83	eqeq2d 2748	. . . . . . . . . . . . . 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 837	. . . . . . 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 1923	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) ∧ 𝑚 ∈ ℕ0) → (∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
94	93	rexbidva 3159	. . . 4 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚)) ↔ ∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
95	94	iotabidv 6477	. . 3 ⊢ ((𝜑 ∧ 𝑥 = ⟨𝐴, 𝐵⟩) → (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→dom (2nd ‘𝑥) ∧ 𝑠 = (seq1((+g‘(1st ‘𝑥)), (𝑛 ∈ ℕ ↦ ((2nd ‘𝑥)‘(𝑓‘𝑛))))‘𝑚))) = (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
96		eleq1 2825	. . . . . . . . . 10 ⊢ (𝑡 = 𝐼 → (𝑡 ∈ Fin ↔ 𝐼 ∈ Fin))
97		feq2 6642	. . . . . . . . . 10 ⊢ (𝑡 = 𝐼 → (𝐵:𝑡⟶(Base‘𝐴) ↔ 𝐵:𝐼⟶(Base‘𝐴)))
98	96, 97	anbi12d 633	. . . . . . . . 9 ⊢ (𝑡 = 𝐼 → ((𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)) ↔ (𝐼 ∈ Fin ∧ 𝐵:𝐼⟶(Base‘𝐴))))
99	98	ceqsexgv 3609	. . . . . . . 8 ⊢ (𝐼 ∈ Fin → (∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))) ↔ (𝐼 ∈ Fin ∧ 𝐵:𝐼⟶(Base‘𝐴))))
100	8, 99	syl 17	. . . . . . 7 ⊢ (𝜑 → (∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))) ↔ (𝐼 ∈ Fin ∧ 𝐵:𝐼⟶(Base‘𝐴))))
101	8, 7, 100	mpbir2and 714	. . . . . 6 ⊢ (𝜑 → ∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))))
102		exsimpr 1871	. . . . . 6 ⊢ (∃𝑡(𝑡 = 𝐼 ∧ (𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴))) → ∃𝑡(𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)))
103	101, 102	syl 17	. . . . 5 ⊢ (𝜑 → ∃𝑡(𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)))
104		df-rex 3062	. . . . 5 ⊢ (∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴) ↔ ∃𝑡(𝑡 ∈ Fin ∧ 𝐵:𝑡⟶(Base‘𝐴)))
105	103, 104	sylibr 234	. . . 4 ⊢ (𝜑 → ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))
106		eleq1 2825	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (𝑦 ∈ CMnd ↔ 𝐴 ∈ CMnd))
107		fveq2 6835	. . . . . . . . 9 ⊢ (𝑦 = 𝐴 → (Base‘𝑦) = (Base‘𝐴))
108	107	feq3d 6648	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑧:𝑡⟶(Base‘𝑦) ↔ 𝑧:𝑡⟶(Base‘𝐴)))
109	108	rexbidv 3161	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦) ↔ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴)))
110	106, 109	anbi12d 633	. . . . . 6 ⊢ (𝑦 = 𝐴 → ((𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦)) ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴))))
111		feq1 6641	. . . . . . . 8 ⊢ (𝑧 = 𝐵 → (𝑧:𝑡⟶(Base‘𝐴) ↔ 𝐵:𝑡⟶(Base‘𝐴)))
112	111	rexbidv 3161	. . . . . . 7 ⊢ (𝑧 = 𝐵 → (∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴) ↔ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴)))
113	112	anbi2d 631	. . . . . 6 ⊢ (𝑧 = 𝐵 → ((𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝐴)) ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))))
114	110, 113	opelopabg 5487	. . . . 5 ⊢ ((𝐴 ∈ CMnd ∧ 𝐵 ∈ V) → (⟨𝐴, 𝐵⟩ ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))} ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))))
115	5, 9, 114	syl2anc 585	. . . 4 ⊢ (𝜑 → (⟨𝐴, 𝐵⟩ ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))} ↔ (𝐴 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝐵:𝑡⟶(Base‘𝐴))))
116	5, 105, 115	mpbir2and 714	. . 3 ⊢ (𝜑 → ⟨𝐴, 𝐵⟩ ∈ {⟨𝑦, 𝑧⟩ ∣ (𝑦 ∈ CMnd ∧ ∃𝑡 ∈ Fin 𝑧:𝑡⟶(Base‘𝑦))})
117		iotaex 6469	. . . 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 6951	. 2 ⊢ (𝜑 → ( FinSum ‘⟨𝐴, 𝐵⟩) = (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))
120	1, 119	eqtrid 2784	1 ⊢ (𝜑 → (𝐴 FinSum 𝐵) = (℩𝑠∃𝑚 ∈ ℕ0 ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐼 ∧ 𝑠 = (seq1((+g‘𝐴), (𝑛 ∈ ℕ ↦ (𝐵‘(𝑓‘𝑛))))‘(♯‘𝐼)))))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542  ⊤wtru 1543  ∃wex 1781   ∈ wcel 2114  ∃wrex 3061  Vcvv 3441  ⟨cop 4587  {copab 5161   ↦ cmpt 5180  dom cdm 5625  ℩cio 6447  ⟶wf 6489  –1-1-onto→wf1o 6492  ‘cfv 6493  (class class class)co 7360  1^st c1st 7933  2^nd c2nd 7934  Fincfn 8887  1c1 11031  ℕcn 12149  ℕ₀cn0 12405  ...cfz 13427  seqcseq 13928  ♯chash 14257  Basecbs 17140  +_gcplusg 17181  CMndccmn 19713   FinSum cfinsum 37490

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5225  ax-sep 5242  ax-nul 5252  ax-pow 5311  ax-pr 5378  ax-un 7682  ax-cnex 11086  ax-resscn 11087  ax-1cn 11088  ax-icn 11089  ax-addcl 11090  ax-addrcl 11091  ax-mulcl 11092  ax-mulrcl 11093  ax-mulcom 11094  ax-addass 11095  ax-mulass 11096  ax-distr 11097  ax-i2m1 11098  ax-1ne0 11099  ax-1rid 11100  ax-rnegex 11101  ax-rrecex 11102  ax-cnre 11103  ax-pre-lttri 11104  ax-pre-lttrn 11105  ax-pre-ltadd 11106  ax-pre-mulgt0 11107

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-reu 3352  df-rab 3401  df-v 3443  df-sbc 3742  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4287  df-if 4481  df-pw 4557  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-int 4904  df-iun 4949  df-br 5100  df-opab 5162  df-mpt 5181  df-tr 5207  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6260  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-om 7811  df-1st 7935  df-2nd 7936  df-frecs 8225  df-wrecs 8256  df-recs 8305  df-rdg 8343  df-1o 8399  df-er 8637  df-en 8888  df-dom 8889  df-sdom 8890  df-fin 8891  df-card 9855  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-nn 12150  df-n0 12406  df-z 12493  df-uz 12756  df-fz 13428  df-seq 13929  df-hash 14258  df-bj-finsum 37491

This theorem is referenced by: (None)