Theorem matunitlindflem1 34903

Description: One direction of matunitlindf 34905. (Contributed by Brendan Leahy, 2-Jun-2021.)

Assertion

Ref	Expression
matunitlindflem1	⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))

Proof of Theorem matunitlindflem1

Dummy variables 𝑥 𝑓 𝑦 𝑧 𝑖 𝑗 𝑘 𝑛 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		isfld 19511	. . . . 5 ⊢ (𝑅 ∈ Field ↔ (𝑅 ∈ DivRing ∧ 𝑅 ∈ CRing))
2	1	simplbi 500	. . . 4 ⊢ (𝑅 ∈ Field → 𝑅 ∈ DivRing)
3		drngring 19509	. . . 4 ⊢ (𝑅 ∈ DivRing → 𝑅 ∈ Ring)
4	2, 3	syl 17	. . 3 ⊢ (𝑅 ∈ Field → 𝑅 ∈ Ring)
5		eqid 2821	. . . . . . . . 9 ⊢ (𝑅 freeLMod 𝐼) = (𝑅 freeLMod 𝐼)
6	5	frlmlmod 20893	. . . . . . . 8 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑅 freeLMod 𝐼) ∈ LMod)
7	6	adantlr 713	. . . . . . 7 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑅 freeLMod 𝐼) ∈ LMod)
8		simpr 487	. . . . . . 7 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → 𝐼 ∈ (Fin ∖ {∅}))
9		eldifi 4103	. . . . . . . . . 10 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → 𝐼 ∈ Fin)
10		eqid 2821	. . . . . . . . . . 11 ⊢ (Base‘𝑅) = (Base‘𝑅)
11	5, 10	frlmfibas 20906	. . . . . . . . . 10 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ Fin) → ((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)))
12	9, 11	sylan2 594	. . . . . . . . 9 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)))
13		fvex 6683	. . . . . . . . . 10 ⊢ (Base‘𝑅) ∈ V
14		curf 34885	. . . . . . . . . 10 ⊢ ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅}) ∧ (Base‘𝑅) ∈ V) → curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼))
15	13, 14	mp3an3 1446	. . . . . . . . 9 ⊢ ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) → curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼))
16		feq3 6497	. . . . . . . . . 10 ⊢ (((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)) → (curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼) ↔ curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼))))
17	16	biimpa 479	. . . . . . . . 9 ⊢ ((((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)) ∧ curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼)) → curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼)))
18	12, 15, 17	syl2an 597	. . . . . . . 8 ⊢ (((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅}))) → curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼)))
19	18	anandirs 677	. . . . . . 7 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼)))
20		eqid 2821	. . . . . . . 8 ⊢ (Base‘(𝑅 freeLMod 𝐼)) = (Base‘(𝑅 freeLMod 𝐼))
21		eqid 2821	. . . . . . . 8 ⊢ (Scalar‘(𝑅 freeLMod 𝐼)) = (Scalar‘(𝑅 freeLMod 𝐼))
22		eqid 2821	. . . . . . . 8 ⊢ ( ·𝑠 ‘(𝑅 freeLMod 𝐼)) = ( ·𝑠 ‘(𝑅 freeLMod 𝐼))
23		eqid 2821	. . . . . . . 8 ⊢ (0g‘(𝑅 freeLMod 𝐼)) = (0g‘(𝑅 freeLMod 𝐼))
24		eqid 2821	. . . . . . . 8 ⊢ (0g‘(Scalar‘(𝑅 freeLMod 𝐼))) = (0g‘(Scalar‘(𝑅 freeLMod 𝐼)))
25		eqid 2821	. . . . . . . 8 ⊢ (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))
26	20, 21, 22, 23, 24, 25	islindf4 20982	. . . . . . 7 ⊢ (((𝑅 freeLMod 𝐼) ∈ LMod ∧ 𝐼 ∈ (Fin ∖ {∅}) ∧ curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼))) → (curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∀𝑓 ∈ (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))(((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
27	7, 8, 19, 26	syl3anc 1367	. . . . . 6 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∀𝑓 ∈ (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))(((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
28	5	frlmsca 20897	. . . . . . . . . 10 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → 𝑅 = (Scalar‘(𝑅 freeLMod 𝐼)))
29	28	fvoveq1d 7178	. . . . . . . . 9 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (Base‘(𝑅 freeLMod 𝐼)) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
30	12, 29	eqtrd 2856	. . . . . . . 8 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
31	30	adantlr 713	. . . . . . 7 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
32		elmapi 8428	. . . . . . . . . 10 ⊢ (𝑓 ∈ ((Base‘𝑅) ↑m 𝐼) → 𝑓:𝐼⟶(Base‘𝑅))
33		ffn 6514	. . . . . . . . . . . . . . 15 ⊢ (𝑓:𝐼⟶(Base‘𝑅) → 𝑓 Fn 𝐼)
34	33	adantl 484	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝑓 Fn 𝐼)
35	19	ffnd 6515	. . . . . . . . . . . . . . 15 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → curry 𝑀 Fn 𝐼)
36	35	adantr 483	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → curry 𝑀 Fn 𝐼)
37		simplr 767	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝐼 ∈ (Fin ∖ {∅}))
38		inidm 4195	. . . . . . . . . . . . . 14 ⊢ (𝐼 ∩ 𝐼) = 𝐼
39		eqidd 2822	. . . . . . . . . . . . . 14 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) = (𝑓‘𝑛))
40		eqidd 2822	. . . . . . . . . . . . . 14 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) = (curry 𝑀‘𝑛))
41	34, 36, 37, 37, 38, 39, 40	offval 7416	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀) = (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛))))
42		simpllr 774	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → 𝐼 ∈ (Fin ∖ {∅}))
43		ffvelrn 6849	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
44	43	adantll 712	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
45	19	ffvelrnda 6851	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ (Base‘(𝑅 freeLMod 𝐼)))
46	45	adantlr 713	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ (Base‘(𝑅 freeLMod 𝐼)))
47		eqid 2821	. . . . . . . . . . . . . . . 16 ⊢ (.r‘𝑅) = (.r‘𝑅)
48	5, 20, 10, 42, 44, 46, 22, 47	frlmvscafval 20910	. . . . . . . . . . . . . . 15 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛)) = ((𝐼 × {(𝑓‘𝑛)}) ∘f (.r‘𝑅)(curry 𝑀‘𝑛)))
49		fvex 6683	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓‘𝑛) ∈ V
50		fnconstg 6567	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓‘𝑛) ∈ V → (𝐼 × {(𝑓‘𝑛)}) Fn 𝐼)
51	49, 50	mp1i 13	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝐼 × {(𝑓‘𝑛)}) Fn 𝐼)
52	15	ffvelrnda 6851	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ ((Base‘𝑅) ↑m 𝐼))
53		elmapfn 8429	. . . . . . . . . . . . . . . . . . 19 ⊢ ((curry 𝑀‘𝑛) ∈ ((Base‘𝑅) ↑m 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
54	52, 53	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
55	54	adantlll 716	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
56	55	adantlr 713	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
57	49	fvconst2 6966	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ 𝐼 → ((𝐼 × {(𝑓‘𝑛)})‘𝑘) = (𝑓‘𝑛))
58	57	adantl 484	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝐼 × {(𝑓‘𝑛)})‘𝑘) = (𝑓‘𝑛))
59		ffn 6514	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) → 𝑀 Fn (𝐼 × 𝐼))
60	59	anim2i 618	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)))
61	60	ancoms 461	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)))
62	61	ad4ant23 751	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)))
63		curfv 34887	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑀 Fn (𝐼 × 𝐼) ∧ 𝑛 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘))
64	63	3exp1 1348	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑀 Fn (𝐼 × 𝐼) → (𝑛 ∈ 𝐼 → (𝑘 ∈ 𝐼 → (𝐼 ∈ (Fin ∖ {∅}) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘)))))
65	64	com4r 94	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → (𝑀 Fn (𝐼 × 𝐼) → (𝑛 ∈ 𝐼 → (𝑘 ∈ 𝐼 → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘)))))
66	65	imp41 428	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘))
67	62, 66	sylanl1 678	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘))
68	51, 56, 42, 42, 38, 58, 67	offval 7416	. . . . . . . . . . . . . . 15 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝐼 × {(𝑓‘𝑛)}) ∘f (.r‘𝑅)(curry 𝑀‘𝑛)) = (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
69	48, 68	eqtrd 2856	. . . . . . . . . . . . . 14 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛)) = (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
70	69	mpteq2dva 5161	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛))) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
71	41, 70	eqtrd 2856	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
72	71	oveq2d 7172	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = ((𝑅 freeLMod 𝐼) Σg (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
73		simplll 773	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝑅 ∈ Ring)
74		simp-4l 781	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
75	43	ad4ant23 751	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
76		fovrn 7318	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
77	76	ad5ant245 1357	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
78	10, 47	ringcl 19311	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Ring ∧ (𝑓‘𝑛) ∈ (Base‘𝑅) ∧ (𝑛𝑀𝑘) ∈ (Base‘𝑅)) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
79	74, 75, 77, 78	syl3anc 1367	. . . . . . . . . . . . . . 15 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
80	79	fmpttd 6879	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅))
81	80	adantllr 717	. . . . . . . . . . . . 13 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅))
82		elmapg 8419	. . . . . . . . . . . . . . . . 17 ⊢ (((Base‘𝑅) ∈ V ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅)))
83	13, 82	mpan 688	. . . . . . . . . . . . . . . 16 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅)))
84	83	adantl 484	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅)))
85	12	eleq2d 2898	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼))))
86	84, 85	bitr3d 283	. . . . . . . . . . . . . 14 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼))))
87	86	ad5ant13 755	. . . . . . . . . . . . 13 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼))))
88	81, 87	mpbid 234	. . . . . . . . . . . 12 ⊢ (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼)))
89		mptexg 6984	. . . . . . . . . . . . . . . 16 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V)
90	89	ralrimivw 3183	. . . . . . . . . . . . . . 15 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → ∀𝑛 ∈ 𝐼 (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V)
91		eqid 2821	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
92	91	fnmpt 6488	. . . . . . . . . . . . . . 15 ⊢ (∀𝑛 ∈ 𝐼 (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
93	90, 92	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
94		fvexd 6685	. . . . . . . . . . . . . 14 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → (0g‘(𝑅 freeLMod 𝐼)) ∈ V)
95	93, 9, 94	fndmfifsupp 8846	. . . . . . . . . . . . 13 ⊢ (𝐼 ∈ (Fin ∖ {∅}) → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘(𝑅 freeLMod 𝐼)))
96	95	ad2antlr 725	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘(𝑅 freeLMod 𝐼)))
97	5, 20, 23, 37, 37, 73, 88, 96	frlmgsum 20916	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → ((𝑅 freeLMod 𝐼) Σg (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
98	72, 97	eqtr2d 2857	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)))
99	32, 98	sylan2 594	. . . . . . . . 9 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)))
100		eqid 2821	. . . . . . . . . . 11 ⊢ (0g‘𝑅) = (0g‘𝑅)
101	5, 100	frlm0 20898	. . . . . . . . . 10 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 × {(0g‘𝑅)}) = (0g‘(𝑅 freeLMod 𝐼)))
102	101	ad4ant13 749	. . . . . . . . 9 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (𝐼 × {(0g‘𝑅)}) = (0g‘(𝑅 freeLMod 𝐼)))
103	99, 102	eqeq12d 2837	. . . . . . . 8 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼))))
104	28	fveq2d 6674	. . . . . . . . . . . 12 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (0g‘𝑅) = (0g‘(Scalar‘(𝑅 freeLMod 𝐼))))
105	104	sneqd 4579	. . . . . . . . . . 11 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → {(0g‘𝑅)} = {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))})
106	105	xpeq2d 5585	. . . . . . . . . 10 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 × {(0g‘𝑅)}) = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))
107	106	eqeq2d 2832	. . . . . . . . 9 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑓 = (𝐼 × {(0g‘𝑅)}) ↔ 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))})))
108	107	ad4ant13 749	. . . . . . . 8 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (𝑓 = (𝐼 × {(0g‘𝑅)}) ↔ 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))})))
109	103, 108	imbi12d 347	. . . . . . 7 ⊢ ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)})) ↔ (((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
110	31, 109	raleqbidva 3425	. . . . . 6 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)})) ↔ ∀𝑓 ∈ (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))(((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
111	27, 110	bitr4d 284	. . . . 5 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)}))))
112	111	notbid 320	. . . 4 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ¬ ∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)}))))
113		rexanali 3265	. . . 4 ⊢ (∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) ↔ ¬ ∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)})))
114	112, 113	syl6bbr 291	. . 3 ⊢ (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)}))))
115	4, 114	sylanl1 678	. 2 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)}))))
116		fconstfv 6975	. . . . . . . . . . . 12 ⊢ (𝑓:𝐼⟶{(0g‘𝑅)} ↔ (𝑓 Fn 𝐼 ∧ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅)))
117		fvex 6683	. . . . . . . . . . . . 13 ⊢ (0g‘𝑅) ∈ V
118	117	fconst2 6967	. . . . . . . . . . . 12 ⊢ (𝑓:𝐼⟶{(0g‘𝑅)} ↔ 𝑓 = (𝐼 × {(0g‘𝑅)}))
119	116, 118	sylbb1 239	. . . . . . . . . . 11 ⊢ ((𝑓 Fn 𝐼 ∧ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅)) → 𝑓 = (𝐼 × {(0g‘𝑅)}))
120	119	ex 415	. . . . . . . . . 10 ⊢ (𝑓 Fn 𝐼 → (∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅) → 𝑓 = (𝐼 × {(0g‘𝑅)})))
121	120	con3d 155	. . . . . . . . 9 ⊢ (𝑓 Fn 𝐼 → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ¬ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅)))
122		df-ne 3017	. . . . . . . . . . 11 ⊢ ((𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ¬ (𝑓‘𝑖) = (0g‘𝑅))
123	122	rexbii 3247	. . . . . . . . . 10 ⊢ (∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ∃𝑖 ∈ 𝐼 ¬ (𝑓‘𝑖) = (0g‘𝑅))
124		rexnal 3238	. . . . . . . . . 10 ⊢ (∃𝑖 ∈ 𝐼 ¬ (𝑓‘𝑖) = (0g‘𝑅) ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅))
125	123, 124	bitri 277	. . . . . . . . 9 ⊢ (∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅))
126	121, 125	syl6ibr 254	. . . . . . . 8 ⊢ (𝑓 Fn 𝐼 → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)))
127	33, 126	syl 17	. . . . . . 7 ⊢ (𝑓:𝐼⟶(Base‘𝑅) → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)))
128	127	adantl 484	. . . . . 6 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)))
129		neldifsn 4725	. . . . . . . . . . 11 ⊢ ¬ 𝑖 ∈ (𝐼 ∖ {𝑖})
130		difss 4108	. . . . . . . . . . 11 ⊢ (𝐼 ∖ {𝑖}) ⊆ 𝐼
131		diffi 8750	. . . . . . . . . . . . 13 ⊢ (𝐼 ∈ Fin → (𝐼 ∖ {𝑖}) ∈ Fin)
132	131	ad4antlr 731	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → (𝐼 ∖ {𝑖}) ∈ Fin)
133		eleq2 2901	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = ∅ → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ ∅))
134	133	notbid 320	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = ∅ → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ ∅))
135		sseq1 3992	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = ∅ → (𝑦 ⊆ 𝐼 ↔ ∅ ⊆ 𝐼))
136	134, 135	anbi12d 632	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = ∅ → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼)))
137	136	anbi2d 630	. . . . . . . . . . . . . 14 ⊢ (𝑦 = ∅ → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼))))
138		mpteq1 5154	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 = ∅ → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ ∅ ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
139		mpt0 6490	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ∅ ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = ∅
140	138, 139	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = ∅ → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = ∅)
141	140	oveq2d 7172	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = ∅ → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg ∅))
142	100	gsum0 17894	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑅 Σg ∅) = (0g‘𝑅)
143	141, 142	syl6eq 2872	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = ∅ → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (0g‘𝑅))
144	143	oveq1d 7171	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = ∅ → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)))
145	144	ifeq1d 4485	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = ∅ → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
146	145	mpoeq3dv 7233	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = ∅ → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
147	146	fveq2d 6674	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = ∅ → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
148	147	eqeq2d 2832	. . . . . . . . . . . . . 14 ⊢ (𝑦 = ∅ → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
149	137, 148	imbi12d 347	. . . . . . . . . . . . 13 ⊢ (𝑦 = ∅ → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) ↔ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
150		elequ2 2129	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑥 → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ 𝑥))
151	150	notbid 320	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑥 → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ 𝑥))
152		sseq1 3992	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑥 → (𝑦 ⊆ 𝐼 ↔ 𝑥 ⊆ 𝐼))
153	151, 152	anbi12d 632	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 𝑥 → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)))
154	153	anbi2d 630	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 𝑥 → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼))))
155		mpteq1 5154	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑥 → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
156	155	oveq2d 7172	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑥 → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
157	156	oveq1d 7171	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑥 → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
158	157	ifeq1d 4485	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑥 → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
159	158	mpoeq3dv 7233	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑥 → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
160	159	fveq2d 6674	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 𝑥 → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
161	160	eqeq2d 2832	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 𝑥 → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
162	154, 161	imbi12d 347	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑥 → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) ↔ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
163		eleq2 2901	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ (𝑥 ∪ {𝑧})))
164	163	notbid 320	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ (𝑥 ∪ {𝑧})))
165		sseq1 3992	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (𝑦 ⊆ 𝐼 ↔ (𝑥 ∪ {𝑧}) ⊆ 𝐼))
166	164, 165	anbi12d 632	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)))
167	166	anbi2d 630	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼))))
168		mpteq1 5154	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
169	168	oveq2d 7172	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
170	169	oveq1d 7171	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
171	170	ifeq1d 4485	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
172	171	mpoeq3dv 7233	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
173	172	fveq2d 6674	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
174	173	eqeq2d 2832	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
175	167, 174	imbi12d 347	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝑥 ∪ {𝑧}) → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) ↔ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
176		eleq2 2901	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ (𝐼 ∖ {𝑖})))
177	176	notbid 320	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ (𝐼 ∖ {𝑖})))
178		sseq1 3992	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (𝑦 ⊆ 𝐼 ↔ (𝐼 ∖ {𝑖}) ⊆ 𝐼))
179	177, 178	anbi12d 632	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)))
180	179	anbi2d 630	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼))))
181		mpteq1 5154	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
182	181	oveq2d 7172	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
183	182	oveq1d 7171	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
184	183	ifeq1d 4485	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
185	184	mpoeq3dv 7233	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
186	185	fveq2d 6674	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
187	186	eqeq2d 2832	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
188	180, 187	imbi12d 347	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝐼 ∖ {𝑖}) → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) ↔ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
189		fnov 7282	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑀 Fn (𝐼 × 𝐼) ↔ 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
190	59, 189	sylib 220	. . . . . . . . . . . . . . . . 17 ⊢ (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
191	190	adantl 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
192		ringgrp 19302	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑅 ∈ Ring → 𝑅 ∈ Grp)
193	4, 192	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝑅 ∈ Field → 𝑅 ∈ Grp)
194		oveq1 7163	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑗 → (𝑖𝑀𝑘) = (𝑗𝑀𝑘))
195	194	equcoms 2027	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 𝑖 → (𝑖𝑀𝑘) = (𝑗𝑀𝑘))
196	195	oveq2d 7172	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝑖 → ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)) = ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)))
197		simp1l 1193	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Grp)
198		fovrn 7318	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
199	198	3adant1l 1172	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
200		eqid 2821	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (+g‘𝑅) = (+g‘𝑅)
201	10, 200, 100	grplid 18133	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑅 ∈ Grp ∧ (𝑗𝑀𝑘) ∈ (Base‘𝑅)) → ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
202	197, 199, 201	syl2anc 586	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
203	196, 202	sylan9eqr 2878	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ 𝑗 = 𝑖) → ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)) = (𝑗𝑀𝑘))
204		eqidd 2822	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ ¬ 𝑗 = 𝑖) → (𝑗𝑀𝑘) = (𝑗𝑀𝑘))
205	203, 204	ifeqda 4502	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
206	205	mpoeq3dva 7231	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
207	193, 206	sylan 582	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
208	191, 207	eqtr4d 2859	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
209	208	fveq2d 6674	. . . . . . . . . . . . . 14 ⊢ ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
210	209	ad4antr 730	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
211		elun1 4152	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑖 ∈ 𝑥 → 𝑖 ∈ (𝑥 ∪ {𝑧}))
212	211	con3i 157	. . . . . . . . . . . . . . . . . . . 20 ⊢ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) → ¬ 𝑖 ∈ 𝑥)
213		ssun1 4148	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑥 ⊆ (𝑥 ∪ {𝑧})
214		sstr 3975	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ⊆ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → 𝑥 ⊆ 𝐼)
215	213, 214	mpan 688	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 ∪ {𝑧}) ⊆ 𝐼 → 𝑥 ⊆ 𝐼)
216	212, 215	anim12i 614	. . . . . . . . . . . . . . . . . . 19 ⊢ ((¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼))
217	216	anim2i 618	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)))
218	217	adantr 483	. . . . . . . . . . . . . . . . 17 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)))
219		velsn 4583	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑖 ∈ {𝑧} ↔ 𝑖 = 𝑧)
220		elun2 4153	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑖 ∈ {𝑧} → 𝑖 ∈ (𝑥 ∪ {𝑧}))
221	219, 220	sylbir 237	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑧 → 𝑖 ∈ (𝑥 ∪ {𝑧}))
222	221	necon3bi 3042	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) → 𝑖 ≠ 𝑧)
223	222	anim1i 616	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼))
224		ringcmn 19331	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑅 ∈ Ring → 𝑅 ∈ CMnd)
225	4, 224	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑅 ∈ Field → 𝑅 ∈ CMnd)
226	225	ad7antr 736	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ CMnd)
227		simplr 767	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝐼 ∈ Fin)
228	215	adantl 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → 𝑥 ⊆ 𝐼)
229		ssfi 8738	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → 𝑥 ∈ Fin)
230	227, 228, 229	syl2an 597	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑥 ∈ Fin)
231	230	ad5ant13 755	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑥 ∈ Fin)
232	215	sselda 3967	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((𝑥 ∪ {𝑧}) ⊆ 𝐼 ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
233	232	adantll 712	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
234	233	ad4ant24 752	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
235	4	ad6antr 734	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → 𝑅 ∈ Ring)
236	2	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) → 𝑅 ∈ DivRing)
237		ffvelrn 6849	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼) → (𝑓‘𝑖) ∈ (Base‘𝑅))
238	237	anim2i 618	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ ((𝑅 ∈ DivRing ∧ (𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼)) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
239	238	anassrs 470	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (((𝑅 ∈ DivRing ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
240		eqid 2821	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ (invr‘𝑅) = (invr‘𝑅)
241	10, 100, 240	drnginvrcl 19519	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ ((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
242	241	3expa 1114	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
243	239, 242	sylan 582	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((((𝑅 ∈ DivRing ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
244	243	anasss 469	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((𝑅 ∈ DivRing ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
245	236, 244	sylanl1 678	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
246	245	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
247	43	ad5ant25 760	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
248		simp-4r 782	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
249	76	3expa 1114	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
250	249	an32s 650	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
251	248, 250	sylanl1 678	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
252	235, 247, 251, 78	syl3anc 1367	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
253	10, 47	ringcl 19311	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑅 ∈ Ring ∧ ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
254	235, 246, 252, 253	syl3anc 1367	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
255	254	adantllr 717	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
256	234, 255	syldan 593	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝑥) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
257	256	adantllr 717	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝑥) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
258		vex 3497	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ 𝑧 ∈ V
259	258	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑧 ∈ V)
260		simplr 767	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ¬ 𝑧 ∈ 𝑥)
261		ssun2 4149	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ {𝑧} ⊆ (𝑥 ∪ {𝑧})
262		sstr 3975	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (({𝑧} ⊆ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → {𝑧} ⊆ 𝐼)
263	261, 262	mpan 688	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑥 ∪ {𝑧}) ⊆ 𝐼 → {𝑧} ⊆ 𝐼)
264	258	snss 4718	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (𝑧 ∈ 𝐼 ↔ {𝑧} ⊆ 𝐼)
265	263, 264	sylibr 236	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑥 ∪ {𝑧}) ⊆ 𝐼 → 𝑧 ∈ 𝐼)
266	265	adantl 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → 𝑧 ∈ 𝐼)
267	4	ad6antr 734	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
268	4	ad5antr 732	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → 𝑅 ∈ Ring)
269	245	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
270		ffvelrn 6849	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
271	270	ad4ant24 752	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
272	10, 47	ringcl 19311	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((𝑅 ∈ Ring ∧ ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ (𝑓‘𝑧) ∈ (Base‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
273	268, 269, 271, 272	syl3anc 1367	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
274	273	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
275		fovrn 7318	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
276	275	3expa 1114	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
277	248, 276	sylanl1 678	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
278	10, 47	ringcl 19311	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑅 ∈ Ring ∧ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅) ∧ (𝑧𝑀𝑘) ∈ (Base‘𝑅)) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
279	267, 274, 277, 278	syl3anc 1367	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
280	266, 279	sylanl2 679	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
281	280	adantlr 713	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
282		fveq2 6670	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (𝑛 = 𝑧 → (𝑓‘𝑛) = (𝑓‘𝑧))
283		oveq1 7163	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (𝑛 = 𝑧 → (𝑛𝑀𝑘) = (𝑧𝑀𝑘))
284	282, 283	oveq12d 7174	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (𝑛 = 𝑧 → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) = ((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘)))
285	284	oveq2d 7172	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑛 = 𝑧 → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))))
286	245	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
287	270	ad5ant24 759	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
288	10, 47	ringass 19314	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((𝑅 ∈ Ring ∧ (((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ (𝑓‘𝑧) ∈ (Base‘𝑅) ∧ (𝑧𝑀𝑘) ∈ (Base‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))))
289	267, 286, 287, 277, 288	syl13anc 1368	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))))
290	289	eqcomd 2827	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
291	266, 290	sylanl2 679	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
292	285, 291	sylan9eqr 2878	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 = 𝑧) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
293	292	adantllr 717	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 = 𝑧) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
294	10, 200, 226, 231, 257, 259, 260, 281, 293	gsumunsnd 19078	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
295	294	oveq1d 7171	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)))
296		ringabl 19330	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (𝑅 ∈ Ring → 𝑅 ∈ Abel)
297	4, 296	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑅 ∈ Field → 𝑅 ∈ Abel)
298	297	ad6antr 734	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Abel)
299	225	ad6antr 734	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ CMnd)
300		vex 3497	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ 𝑥 ∈ V
301	300	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑥 ∈ V)
302		ssel2 3962	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((𝑥 ⊆ 𝐼 ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
303	302, 254	sylan2 594	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑥 ⊆ 𝐼 ∧ 𝑛 ∈ 𝑥)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
304	303	anassrs 470	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑛 ∈ 𝑥) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
305	304	fmpttd 6879	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))):𝑥⟶(Base‘𝑅))
306	305	an32s 650	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))):𝑥⟶(Base‘𝑅))
307		ovex 7189	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V
308		eqid 2821	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
309	307, 308	fnmpti 6491	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝑥
310	309	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝑥)
311		fvexd 6685	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (0g‘𝑅) ∈ V)
312	310, 229, 311	fndmfifsupp 8846	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
313	312	adantll 712	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
314	313	ad5ant14 756	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
315	10, 100, 299, 301, 306, 314	gsumcl 19035	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) ∈ (Base‘𝑅))
316	215, 315	sylanl2 679	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) ∈ (Base‘𝑅))
317	265, 279	sylanl2 679	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
318		simpllr 774	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
319		simpl 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → 𝑖 ∈ 𝐼)
320	318, 319	anim12i 614	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼))
321	320	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼))
322		fovrn 7318	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
323	322	3expa 1114	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
324	321, 323	sylan 582	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
325	10, 200, 298, 316, 317, 324	abl32 18928	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
326	325	adantlrl 718	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
327	326	adantlr 713	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
328	295, 327	eqtrd 2856	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
329	328	ifeq1d 4485	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))
330	329	3adant2 1127	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))
331	330	mpoeq3dva 7231	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))))
332	331	fveq2d 6674	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
333		eqid 2821	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝐼 maDet 𝑅) = (𝐼 maDet 𝑅)
334	1	simprbi 499	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑅 ∈ Field → 𝑅 ∈ CRing)
335	334	ad5antr 732	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑅 ∈ CRing)
336		simp-4r 782	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝐼 ∈ Fin)
337	193	ad6antr 734	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Grp)
338	320	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼))
339	338, 323	sylan 582	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
340	10, 200	grpcl 18111	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑅 ∈ Grp ∧ (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) ∈ (Base‘𝑅) ∧ (𝑖𝑀𝑘) ∈ (Base‘𝑅)) → ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) ∈ (Base‘𝑅))
341	337, 315, 339, 340	syl3anc 1367	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) ∈ (Base‘𝑅))
342	228, 341	sylanl2 679	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) ∈ (Base‘𝑅))
343	248, 266	anim12i 614	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼))
344	343, 276	sylan 582	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
345		simp-5r 784	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
346	345, 198	syl3an1 1159	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
347	266, 273	sylan2 594	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
348		simplrl 775	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑖 ∈ 𝐼)
349	265	ad2antll 727	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑧 ∈ 𝐼)
350		simprl 769	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑖 ≠ 𝑧)
351	333, 10, 200, 47, 335, 336, 342, 344, 346, 347, 348, 349, 350	mdetero 21219	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
352	351	adantr 483	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
353	332, 352	eqtrd 2856	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
354		iftrue 4473	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑧𝑀𝑘))
355		oveq1 7163	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑗 = 𝑧 → (𝑗𝑀𝑘) = (𝑧𝑀𝑘))
356	354, 355	eqtr4d 2859	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
357		iffalse 4476	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (¬ 𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
358	356, 357	pm2.61i 184	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘)
359		ifeq2 4472	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
360	358, 359	mp1i 13	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
361	360	mpoeq3ia 7232	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
362	361	fveq2i 6673	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
363		ifeq2 4472	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
364	358, 363	mp1i 13	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
365	364	mpoeq3ia 7232	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
366	365	fveq2i 6673	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
367	353, 362, 366	3eqtr3g 2879	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
368	223, 367	sylanl2 679	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
369	368	eqeq2d 2832	. . . . . . . . . . . . . . . . . 18 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
370	369	biimprd 250	. . . . . . . . . . . . . . . . 17 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
371	218, 370	embantd 59	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
372	371	expcom 416	. . . . . . . . . . . . . . 15 ⊢ (¬ 𝑧 ∈ 𝑥 → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
373	372	com23 86	. . . . . . . . . . . . . 14 ⊢ (¬ 𝑧 ∈ 𝑥 → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
374	373	adantl 484	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑥) → (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
375	149, 162, 175, 188, 210, 374	findcard2s 8759	. . . . . . . . . . . 12 ⊢ ((𝐼 ∖ {𝑖}) ∈ Fin → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
376	132, 375	mpcom 38	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
377	129, 130, 376	mpanr12 703	. . . . . . . . . 10 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
378	377	adantlr 713	. . . . . . . . 9 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
379		eqid 2821	. . . . . . . . . . . 12 ⊢ 𝐼 = 𝐼
380		fconstmpt 5614	. . . . . . . . . . . . . . . . 17 ⊢ (𝐼 × {(0g‘𝑅)}) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅))
381	380	eqeq2i 2834	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅)))
382		ovex 7189	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V
383	382	rgenw 3150	. . . . . . . . . . . . . . . . 17 ⊢ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V
384		mpteqb 6787	. . . . . . . . . . . . . . . . 17 ⊢ (∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V → ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅)) ↔ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)))
385	383, 384	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅)) ↔ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅))
386	381, 385	bitri 277	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅))
387	225	ad5antr 732	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ CMnd)
388		simp-4r 782	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝐼 ∈ Fin)
389		eqid 2821	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
390	307, 389	fnmpti 6491	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼
391	390	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
392		id 22	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝐼 ∈ Fin → 𝐼 ∈ Fin)
393		fvexd 6685	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝐼 ∈ Fin → (0g‘𝑅) ∈ V)
394	391, 392, 393	fndmfifsupp 8846	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
395	394	ad4antlr 731	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
396		simplrl 775	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝑖 ∈ 𝐼)
397	320, 323	sylan 582	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
398		fveq2 6670	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 = 𝑖 → (𝑓‘𝑛) = (𝑓‘𝑖))
399		oveq1 7163	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 = 𝑖 → (𝑛𝑀𝑘) = (𝑖𝑀𝑘))
400	398, 399	oveq12d 7174	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑛 = 𝑖 → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) = ((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘)))
401	400	oveq2d 7172	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑛 = 𝑖 → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))))
402		simpll 765	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) → 𝑅 ∈ Field)
403	2, 237	anim12i 614	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝑅 ∈ Field ∧ (𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼)) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
404	403	anassrs 470	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
405		eqid 2821	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (1r‘𝑅) = (1r‘𝑅)
406	10, 100, 47, 405, 240	drnginvrl 19521	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
407	406	3expa 1114	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
408	404, 407	sylan 582	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
409	408	anasss 469	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
410	409	oveq1d 7171	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)))
411	402, 410	sylanl1 678	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)))
412	411	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)))
413	4	ad5antr 732	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
414	245	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
415	237	ad2ant2lr 746	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (𝑓‘𝑖) ∈ (Base‘𝑅))
416	415	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑓‘𝑖) ∈ (Base‘𝑅))
417	10, 47	ringass 19314	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑅 ∈ Ring ∧ (((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ (𝑓‘𝑖) ∈ (Base‘𝑅) ∧ (𝑖𝑀𝑘) ∈ (Base‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))))
418	413, 414, 416, 397, 417	syl13anc 1368	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))))
419	4	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑅 ∈ Ring)
420	419	3ad2ant1 1129	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
421	322	3adant1l 1172	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
422	10, 47, 405	ringlidm 19321	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑅 ∈ Ring ∧ (𝑖𝑀𝑘) ∈ (Base‘𝑅)) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
423	420, 421, 422	syl2anc 586	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
424	423	ad5ant145 1365	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
425	424	adantlrr 719	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
426	412, 418, 425	3eqtr3d 2864	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))) = (𝑖𝑀𝑘))
427	401, 426	sylan9eqr 2878	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 = 𝑖) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (𝑖𝑀𝑘))
428	10, 200, 387, 388, 395, 254, 396, 397, 427	gsumdifsnd 19081	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
429		ovex 7189	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ V
430		eqid 2821	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))
431	429, 430	fnmpti 6491	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) Fn 𝐼
432	431	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) Fn 𝐼)
433	432, 392, 393	fndmfifsupp 8846	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) finSupp (0g‘𝑅))
434	433	ad4antlr 731	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) finSupp (0g‘𝑅))
435	10, 100, 200, 47, 413, 388, 414, 252, 434	gsummulc2 19357	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
436	428, 435	eqtr3d 2858	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
437	436	adantr 483	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
438		oveq2 7164	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)))
439	438	adantl 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)))
440	4	ad4antr 730	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑅 ∈ Ring)
441	10, 47, 100	ringrz 19338	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑅 ∈ Ring ∧ ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)) = (0g‘𝑅))
442	440, 245, 441	syl2anc 586	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)) = (0g‘𝑅))
443	442	ad2antrr 724	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)) = (0g‘𝑅))
444	437, 439, 443	3eqtrd 2860	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (0g‘𝑅))
445	444	ifeq1d 4485	. . . . . . . . . . . . . . . . . 18 ⊢ (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))
446	445	ex 415	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
447	446	ralimdva 3177	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅) → ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
448	447	imp 409	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))
449	386, 448	sylan2b 595	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))
450	449, 379	jctil 522	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → (𝐼 = 𝐼 ∧ ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
451	450	ralrimivw 3183	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → ∀𝑗 ∈ 𝐼 (𝐼 = 𝐼 ∧ ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
452		mpoeq123 7226	. . . . . . . . . . . 12 ⊢ ((𝐼 = 𝐼 ∧ ∀𝑗 ∈ 𝐼 (𝐼 = 𝐼 ∧ ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
453	379, 451, 452	sylancr 589	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
454	453	an32s 650	. . . . . . . . . 10 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
455	454	fveq2d 6674	. . . . . . . . 9 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))))
456	334	ad3antrrr 728	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑅 ∈ CRing)
457		simplr 767	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝐼 ∈ Fin)
458		simpllr 774	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
459	458, 198	syl3an1 1159	. . . . . . . . . . 11 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
460		simprl 769	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑖 ∈ 𝐼)
461	333, 10, 100, 456, 457, 459, 460	mdetr0 21214	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))) = (0g‘𝑅))
462	461	ad4ant14 750	. . . . . . . . 9 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))) = (0g‘𝑅))
463	378, 455, 462	3eqtrd 2860	. . . . . . . 8 ⊢ ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅))
464	463	rexlimdvaa 3285	. . . . . . 7 ⊢ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → (∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
465	464	expimpd 456	. . . . . 6 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
466	128, 465	sylan2d 606	. . . . 5 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
467	32, 466	sylan2 594	. . . 4 ⊢ ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
468	467	rexlimdva 3284	. . 3 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) → (∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
469	9, 468	sylan2 594	. 2 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
470	115, 469	sylbid 242	1 ⊢ (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114   ≠ wne 3016  ∀wral 3138  ∃wrex 3139  Vcvv 3494   ∖ cdif 3933   ∪ cun 3934   ⊆ wss 3936  ∅c0 4291  ifcif 4467  {csn 4567   class class class wbr 5066   ↦ cmpt 5146   × cxp 5553   Fn wfn 6350  ⟶wf 6351  ‘cfv 6355  (class class class)co 7156   ∈ cmpo 7158   ∘_f cof 7407  curry ccur 7931   ↑_m cmap 8406  Fincfn 8509   finSupp cfsupp 8833  Basecbs 16483  +_gcplusg 16565  ._rcmulr 16566  Scalarcsca 16568   ·_𝑠 cvsca 16569  0_gc0g 16713   Σ_g cgsu 16714  Grpcgrp 18103  CMndccmn 18906  Abelcabl 18907  1_rcur 19251  Ringcrg 19297  CRingccrg 19298  inv_rcinvr 19421  DivRingcdr 19502  Fieldcfield 19503  LModclmod 19634   freeLMod cfrlm 20890   LIndF clindf 20948   maDet cmdat 21193

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 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-cnex 10593  ax-resscn 10594  ax-1cn 10595  ax-icn 10596  ax-addcl 10597  ax-addrcl 10598  ax-mulcl 10599  ax-mulrcl 10600  ax-mulcom 10601  ax-addass 10602  ax-mulass 10603  ax-distr 10604  ax-i2m1 10605  ax-1ne0 10606  ax-1rid 10607  ax-rnegex 10608  ax-rrecex 10609  ax-cnre 10610  ax-pre-lttri 10611  ax-pre-lttrn 10612  ax-pre-ltadd 10613  ax-pre-mulgt0 10614  ax-addf 10616  ax-mulf 10617

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-xor 1502  df-tru 1540  df-fal 1550  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-ot 4576  df-uni 4839  df-int 4877  df-iun 4921  df-iin 4922  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-se 5515  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-isom 6364  df-riota 7114  df-ov 7159  df-oprab 7160  df-mpo 7161  df-of 7409  df-om 7581  df-1st 7689  df-2nd 7690  df-supp 7831  df-tpos 7892  df-cur 7933  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-1o 8102  df-2o 8103  df-oadd 8106  df-er 8289  df-map 8408  df-pm 8409  df-ixp 8462  df-en 8510  df-dom 8511  df-sdom 8512  df-fin 8513  df-fsupp 8834  df-sup 8906  df-oi 8974  df-card 9368  df-pnf 10677  df-mnf 10678  df-xr 10679  df-ltxr 10680  df-le 10681  df-sub 10872  df-neg 10873  df-div 11298  df-nn 11639  df-2 11701  df-3 11702  df-4 11703  df-5 11704  df-6 11705  df-7 11706  df-8 11707  df-9 11708  df-n0 11899  df-xnn0 11969  df-z 11983  df-dec 12100  df-uz 12245  df-rp 12391  df-fz 12894  df-fzo 13035  df-seq 13371  df-exp 13431  df-hash 13692  df-word 13863  df-lsw 13915  df-concat 13923  df-s1 13950  df-substr 14003  df-pfx 14033  df-splice 14112  df-reverse 14121  df-s2 14210  df-struct 16485  df-ndx 16486  df-slot 16487  df-base 16489  df-sets 16490  df-ress 16491  df-plusg 16578  df-mulr 16579  df-starv 16580  df-sca 16581  df-vsca 16582  df-ip 16583  df-tset 16584  df-ple 16585  df-ds 16587  df-unif 16588  df-hom 16589  df-cco 16590  df-0g 16715  df-gsum 16716  df-prds 16721  df-pws 16723  df-mre 16857  df-mrc 16858  df-acs 16860  df-mgm 17852  df-sgrp 17901  df-mnd 17912  df-mhm 17956  df-submnd 17957  df-efmnd 18034  df-grp 18106  df-minusg 18107  df-sbg 18108  df-mulg 18225  df-subg 18276  df-ghm 18356  df-gim 18399  df-cntz 18447  df-oppg 18474  df-symg 18496  df-pmtr 18570  df-psgn 18619  df-evpm 18620  df-cmn 18908  df-abl 18909  df-mgp 19240  df-ur 19252  df-ring 19299  df-cring 19300  df-oppr 19373  df-dvdsr 19391  df-unit 19392  df-invr 19422  df-dvr 19433  df-rnghom 19467  df-drng 19504  df-field 19505  df-subrg 19533  df-lmod 19636  df-lss 19704  df-lsp 19744  df-lmhm 19794  df-lbs 19847  df-sra 19944  df-rgmod 19945  df-nzr 20031  df-cnfld 20546  df-zring 20618  df-zrh 20651  df-dsmm 20876  df-frlm 20891  df-uvc 20927  df-lindf 20950  df-mat 21017  df-mdet 21194

This theorem is referenced by:  matunitlindf  34905