MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  matunitlindflem1 Structured version   Visualization version   GIF version

Theorem matunitlindflem1 22994
Description: One direction of matunitlindf 22996. (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.
StepHypRef Expression
1 isfld 20993 . . . . 5 (𝑅 ∈ Field ↔ (𝑅 ∈ DivRing ∧ 𝑅 ∈ CRing))
21simplbi 502 . . . 4 (𝑅 ∈ Field → 𝑅 ∈ DivRing)
3 drngring 20987 . . . 4 (𝑅 ∈ DivRing → 𝑅 ∈ Ring)
42, 3syl 18 . . 3 (𝑅 ∈ Field → 𝑅 ∈ Ring)
5 eqid 2761 . . . . . . . . 9 (𝑅 freeLMod 𝐼) = (𝑅 freeLMod 𝐼)
65frlmlmod 22055 . . . . . . . 8 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑅 freeLMod 𝐼) ∈ LMod)
76adantlr 728 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑅 freeLMod 𝐼) ∈ LMod)
8 simpr 490 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → 𝐼 ∈ (Fin ∖ {∅}))
9 eldifi 4078 . . . . . . . . . 10 (𝐼 ∈ (Fin ∖ {∅}) → 𝐼 ∈ Fin)
10 eqid 2761 . . . . . . . . . . 11 (Base‘𝑅) = (Base‘𝑅)
115, 10frlmfibas 22068 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ Fin) → ((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)))
129, 11sylan2 605 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)))
13 fvex 6898 . . . . . . . . . 10 (Base‘𝑅) ∈ V
14 curf 8890 . . . . . . . . . 10 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅}) ∧ (Base‘𝑅) ∈ V) → curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼))
1513, 14mp3an3 1479 . . . . . . . . 9 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) → curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼))
16 feq3 6689 . . . . . . . . . 10 (((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)) → (curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼) ↔ curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼))))
1716biimpa 482 . . . . . . . . 9 ((((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)) ∧ curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼)) → curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼)))
1812, 15, 17syl2an 608 . . . . . . . 8 (((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅}))) → curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼)))
1918anandirs 692 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼)))
20 eqid 2761 . . . . . . . 8 (Base‘(𝑅 freeLMod 𝐼)) = (Base‘(𝑅 freeLMod 𝐼))
21 eqid 2761 . . . . . . . 8 (Scalar‘(𝑅 freeLMod 𝐼)) = (Scalar‘(𝑅 freeLMod 𝐼))
22 eqid 2761 . . . . . . . 8 ( ·𝑠 ‘(𝑅 freeLMod 𝐼)) = ( ·𝑠 ‘(𝑅 freeLMod 𝐼))
23 eqid 2761 . . . . . . . 8 (0g‘(𝑅 freeLMod 𝐼)) = (0g‘(𝑅 freeLMod 𝐼))
24 eqid 2761 . . . . . . . 8 (0g‘(Scalar‘(𝑅 freeLMod 𝐼))) = (0g‘(Scalar‘(𝑅 freeLMod 𝐼)))
25 eqid 2761 . . . . . . . 8 (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))
2620, 21, 22, 23, 24, 25islindf4 22144 . . . . . . 7 (((𝑅 freeLMod 𝐼) ∈ LMod ∧ 𝐼 ∈ (Fin ∖ {∅}) ∧ curry 𝑀:𝐼⟶(Base‘(𝑅 freeLMod 𝐼))) → (curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∀𝑓 ∈ (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))(((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
277, 8, 19, 26syl3anc 1398 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∀𝑓 ∈ (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))(((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
285frlmsca 22059 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → 𝑅 = (Scalar‘(𝑅 freeLMod 𝐼)))
2928fvoveq1d 7442 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (Base‘(𝑅 freeLMod 𝐼)) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
3012, 29eqtrd 2796 . . . . . . . 8 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
3130adantlr 728 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
32 elmapi 8869 . . . . . . . . . 10 (𝑓 ∈ ((Base‘𝑅) ↑m 𝐼) → 𝑓:𝐼⟶(Base‘𝑅))
33 ffn 6709 . . . . . . . . . . . . . . 15 (𝑓:𝐼⟶(Base‘𝑅) → 𝑓 Fn 𝐼)
3433adantl 487 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝑓 Fn 𝐼)
3519ffnd 6710 . . . . . . . . . . . . . . 15 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → curry 𝑀 Fn 𝐼)
3635adantr 486 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → curry 𝑀 Fn 𝐼)
37 simplr 781 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝐼 ∈ (Fin ∖ {∅}))
38 inidm 4172 . . . . . . . . . . . . . 14 (𝐼 ∩ 𝐼) = 𝐼
39 eqidd 2762 . . . . . . . . . . . . . 14 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) = (𝑓‘𝑛))
40 eqidd 2762 . . . . . . . . . . . . . 14 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) = (curry 𝑀‘𝑛))
4134, 36, 37, 37, 38, 39, 40offval 7702 . . . . . . . . . . . . 13 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀) = (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛))))
42 simpllr 788 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → 𝐼 ∈ (Fin ∖ {∅}))
43 ffvelcdm 7081 . . . . . . . . . . . . . . . . 17 ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
4443adantll 727 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
4519ffvelcdmda 7084 . . . . . . . . . . . . . . . . 17 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ (Base‘(𝑅 freeLMod 𝐼)))
4645adantlr 728 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ (Base‘(𝑅 freeLMod 𝐼)))
47 eqid 2761 . . . . . . . . . . . . . . . 16 (.r‘𝑅) = (.r‘𝑅)
485, 20, 10, 42, 44, 46, 22, 47frlmvscafval 22072 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛)) = ((𝐼 × {(𝑓‘𝑛)}) ∘f (.r‘𝑅)(curry 𝑀‘𝑛)))
49 fvex 6898 . . . . . . . . . . . . . . . . 17 (𝑓‘𝑛) ∈ V
50 fnconstg 6770 . . . . . . . . . . . . . . . . 17 ((𝑓‘𝑛) ∈ V → (𝐼 × {(𝑓‘𝑛)}) Fn 𝐼)
5149, 50mp1i 14 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝐼 × {(𝑓‘𝑛)}) Fn 𝐼)
5215ffvelcdmda 7084 . . . . . . . . . . . . . . . . . . 19 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ ((Base‘𝑅) ↑m 𝐼))
53 elmapfn 8887 . . . . . . . . . . . . . . . . . . 19 ((curry 𝑀‘𝑛) ∈ ((Base‘𝑅) ↑m 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
5452, 53syl 18 . . . . . . . . . . . . . . . . . 18 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
5554adantlll 731 . . . . . . . . . . . . . . . . 17 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
5655adantlr 728 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) Fn 𝐼)
5749fvconst2 7210 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ 𝐼 → ((𝐼 × {(𝑓‘𝑛)})‘𝑘) = (𝑓‘𝑛))
5857adantl 487 . . . . . . . . . . . . . . . 16 ((((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝐼 × {(𝑓‘𝑛)})‘𝑘) = (𝑓‘𝑛))
59 ffn 6709 . . . . . . . . . . . . . . . . . . . 20 (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) → 𝑀 Fn (𝐼 × 𝐼))
6059anim2i 629 . . . . . . . . . . . . . . . . . . 19 ((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)))
6160ancoms 464 . . . . . . . . . . . . . . . . . 18 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)))
6261ad4ant23 766 . . . . . . . . . . . . . . . . 17 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)))
63 curfv 8892 . . . . . . . . . . . . . . . . . . . 20 (((𝑀 Fn (𝐼 × 𝐼) ∧ 𝑛 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘))
64633exp1 1371 . . . . . . . . . . . . . . . . . . 19 (𝑀 Fn (𝐼 × 𝐼) → (𝑛 ∈ 𝐼 → (𝑘 ∈ 𝐼 → (𝐼 ∈ (Fin ∖ {∅}) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘)))))
6564com4r 95 . . . . . . . . . . . . . . . . . 18 (𝐼 ∈ (Fin ∖ {∅}) → (𝑀 Fn (𝐼 × 𝐼) → (𝑛 ∈ 𝐼 → (𝑘 ∈ 𝐼 → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘)))))
6665imp41 431 . . . . . . . . . . . . . . . . 17 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝑀 Fn (𝐼 × 𝐼)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘))
6762, 66sylanl1 693 . . . . . . . . . . . . . . . 16 ((((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((curry 𝑀‘𝑛)‘𝑘) = (𝑛𝑀𝑘))
6851, 56, 42, 42, 38, 58, 67offval 7702 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝐼 × {(𝑓‘𝑛)}) ∘f (.r‘𝑅)(curry 𝑀‘𝑛)) = (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
6948, 68eqtrd 2796 . . . . . . . . . . . . . 14 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛)) = (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
7069mpteq2dva 5198 . . . . . . . . . . . . 13 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛))) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
7141, 70eqtrd 2796 . . . . . . . . . . . 12 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
7271oveq2d 7436 . . . . . . . . . . 11 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = ((𝑅 freeLMod 𝐼) Σg (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
73 simplll 787 . . . . . . . . . . . 12 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝑅 ∈ Ring)
74 simp-4l 795 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
7543ad4ant23 766 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
76 fovcdm 7591 . . . . . . . . . . . . . . . . 17 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
7776ad5ant245 1384 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
7810, 47ringcl 20477 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ Ring ∧ (𝑓‘𝑛) ∈ (Base‘𝑅) ∧ (𝑛𝑀𝑘) ∈ (Base‘𝑅)) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
7974, 75, 77, 78syl3anc 1398 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
8079fmpttd 7115 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅))
8180adantllr 732 . . . . . . . . . . . . 13 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅))
82 elmapg 8859 . . . . . . . . . . . . . . . . 17 (((Base‘𝑅) ∈ V ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅)))
8313, 82mpan 703 . . . . . . . . . . . . . . . 16 (𝐼 ∈ (Fin ∖ {∅}) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅)))
8483adantl 487 . . . . . . . . . . . . . . 15 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅)))
8512eleq2d 2847 . . . . . . . . . . . . . . 15 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ ((Base‘𝑅) ↑m 𝐼) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼))))
8684, 85bitr3d 284 . . . . . . . . . . . . . 14 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼))))
8786ad5ant13 769 . . . . . . . . . . . . 13 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅) ↔ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼))))
8881, 87mpbid 235 . . . . . . . . . . . 12 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘(𝑅 freeLMod 𝐼)))
89 mptexg 7227 . . . . . . . . . . . . . . . 16 (𝐼 ∈ (Fin ∖ {∅}) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V)
9089ralrimivw 3159 . . . . . . . . . . . . . . 15 (𝐼 ∈ (Fin ∖ {∅}) → ∀𝑛 ∈ 𝐼 (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V)
91 eqid 2761 . . . . . . . . . . . . . . . 16 (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
9291fnmpt 6679 . . . . . . . . . . . . . . 15 (∀𝑛 ∈ 𝐼 (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
9390, 92syl 18 . . . . . . . . . . . . . 14 (𝐼 ∈ (Fin ∖ {∅}) → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
94 fvexd 6900 . . . . . . . . . . . . . 14 (𝐼 ∈ (Fin ∖ {∅}) → (0g‘(𝑅 freeLMod 𝐼)) ∈ V)
9593, 9, 94fndmfifsupp 9370 . . . . . . . . . . . . 13 (𝐼 ∈ (Fin ∖ {∅}) → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘(𝑅 freeLMod 𝐼)))
9695ad2antlr 740 . . . . . . . . . . . 12 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘(𝑅 freeLMod 𝐼)))
975, 20, 23, 37, 37, 73, 88, 96frlmgsum 22078 . . . . . . . . . . 11 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → ((𝑅 freeLMod 𝐼) Σg (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
9872, 97eqtr2d 2797 . . . . . . . . . 10 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)))
9932, 98sylan2 605 . . . . . . . . 9 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)))
100 eqid 2761 . . . . . . . . . . 11 (0g‘𝑅) = (0g‘𝑅)
1015, 100frlm0 22060 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 × {(0g‘𝑅)}) = (0g‘(𝑅 freeLMod 𝐼)))
102101ad4ant13 764 . . . . . . . . 9 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (𝐼 × {(0g‘𝑅)}) = (0g‘(𝑅 freeLMod 𝐼)))
10399, 102eqeq12d 2777 . . . . . . . 8 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼))))
10428fveq2d 6889 . . . . . . . . . . . 12 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (0g‘𝑅) = (0g‘(Scalar‘(𝑅 freeLMod 𝐼))))
105104sneqd 4596 . . . . . . . . . . 11 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → {(0g‘𝑅)} = {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))})
106105xpeq2d 5681 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 × {(0g‘𝑅)}) = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))
107106eqeq2d 2772 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑓 = (𝐼 × {(0g‘𝑅)}) ↔ 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))})))
108107ad4ant13 764 . . . . . . . 8 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (𝑓 = (𝐼 × {(0g‘𝑅)}) ↔ 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))})))
109103, 108imbi12d 347 . . . . . . 7 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)})) ↔ (((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
11031, 109raleqbidva 3326 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)})) ↔ ∀𝑓 ∈ (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))(((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼)) → 𝑓 = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))))
11127, 110bitr4d 285 . . . . 5 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)}))))
112111notbid 321 . . . 4 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ¬ ∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)}))))
113 rexanali 3117 . . . 4 (∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) ↔ ¬ ∀𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) → 𝑓 = (𝐼 × {(0g‘𝑅)})))
114112, 113bitr4di 292 . . 3 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)}))))
1154, 114sylanl1 693 . 2 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) ↔ ∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)}))))
116 fconstfv 7218 . . . . . . . . . . . 12 (𝑓:𝐼⟶{(0g‘𝑅)} ↔ (𝑓 Fn 𝐼 ∧ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅)))
117 fvex 6898 . . . . . . . . . . . . 13 (0g‘𝑅) ∈ V
118117fconst2 7211 . . . . . . . . . . . 12 (𝑓:𝐼⟶{(0g‘𝑅)} ↔ 𝑓 = (𝐼 × {(0g‘𝑅)}))
119116, 118sylbb1 240 . . . . . . . . . . 11 ((𝑓 Fn 𝐼 ∧ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅)) → 𝑓 = (𝐼 × {(0g‘𝑅)}))
120119ex 418 . . . . . . . . . 10 (𝑓 Fn 𝐼 → (∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅) → 𝑓 = (𝐼 × {(0g‘𝑅)})))
121120con3d 153 . . . . . . . . 9 (𝑓 Fn 𝐼 → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ¬ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅)))
122 df-ne 2957 . . . . . . . . . . 11 ((𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ¬ (𝑓‘𝑖) = (0g‘𝑅))
123122rexbii 3110 . . . . . . . . . 10 (∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ∃𝑖 ∈ 𝐼 ¬ (𝑓‘𝑖) = (0g‘𝑅))
124 rexnal 3115 . . . . . . . . . 10 (∃𝑖 ∈ 𝐼 ¬ (𝑓‘𝑖) = (0g‘𝑅) ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅))
125123, 124bitri 278 . . . . . . . . 9 (∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅))
126121, 125imbitrrdi 255 . . . . . . . 8 (𝑓 Fn 𝐼 → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)))
12733, 126syl 18 . . . . . . 7 (𝑓:𝐼⟶(Base‘𝑅) → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)))
128127adantl 487 . . . . . 6 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (¬ 𝑓 = (𝐼 × {(0g‘𝑅)}) → ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)))
129 neldifsn 4755 . . . . . . . . . . 11 ¬ 𝑖 ∈ (𝐼 ∖ {𝑖})
130 difss 4083 . . . . . . . . . . 11 (𝐼 ∖ {𝑖}) ⊆ 𝐼
131 diffi 9190 . . . . . . . . . . . . 13 (𝐼 ∈ Fin → (𝐼 ∖ {𝑖}) ∈ Fin)
132131ad4antlr 746 . . . . . . . . . . . 12 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → (𝐼 ∖ {𝑖}) ∈ Fin)
133 eleq2 2850 . . . . . . . . . . . . . . . . 17 (𝑦 = ∅ → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ ∅))
134133notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = ∅ → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ ∅))
135 sseq1 3956 . . . . . . . . . . . . . . . 16 (𝑦 = ∅ → (𝑦 ⊆ 𝐼 ↔ ∅ ⊆ 𝐼))
136134, 135anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = ∅ → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼)))
137136anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = ∅ → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼))))
138 mpteq1 5194 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = ∅ → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ ∅ ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
139 mpt0 6681 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ∅ ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = ∅
140138, 139eqtrdi 2812 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = ∅ → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = ∅)
141140oveq2d 7436 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = ∅ → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg ∅))
142100gsum0 18873 . . . . . . . . . . . . . . . . . . . 20 (𝑅 Σg ∅) = (0g‘𝑅)
143141, 142eqtrdi 2812 . . . . . . . . . . . . . . . . . . 19 (𝑦 = ∅ → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (0g‘𝑅))
144143oveq1d 7435 . . . . . . . . . . . . . . . . . 18 (𝑦 = ∅ → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)))
145144ifeq1d 4502 . . . . . . . . . . . . . . . . 17 (𝑦 = ∅ → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
146145mpoeq3dv 7499 . . . . . . . . . . . . . . . 16 (𝑦 = ∅ → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
147146fveq2d 6889 . . . . . . . . . . . . . . 15 (𝑦 = ∅ → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
148147eqeq2d 2772 . . . . . . . . . . . . . 14 (𝑦 = ∅ → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
149137, 148imbi12d 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 2160 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑥 → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ 𝑥))
151150notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑥 → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ 𝑥))
152 sseq1 3956 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑥 → (𝑦 ⊆ 𝐼 ↔ 𝑥 ⊆ 𝐼))
153151, 152anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = 𝑥 → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)))
154153anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = 𝑥 → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼))))
155 mpteq1 5194 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑥 → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
156155oveq2d 7436 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑥 → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
157156oveq1d 7435 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑥 → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
158157ifeq1d 4502 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑥 → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
159158mpoeq3dv 7499 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑥 → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
160159fveq2d 6889 . . . . . . . . . . . . . . 15 (𝑦 = 𝑥 → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
161160eqeq2d 2772 . . . . . . . . . . . . . 14 (𝑦 = 𝑥 → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
162154, 161imbi12d 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 2850 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ (𝑥 ∪ {𝑧})))
164163notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = (𝑥 ∪ {𝑧}) → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ (𝑥 ∪ {𝑧})))
165 sseq1 3956 . . . . . . . . . . . . . . . 16 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑦 ⊆ 𝐼 ↔ (𝑥 ∪ {𝑧}) ⊆ 𝐼))
166164, 165anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = (𝑥 ∪ {𝑧}) → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)))
167166anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = (𝑥 ∪ {𝑧}) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼))))
168 mpteq1 5194 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
169168oveq2d 7436 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
170169oveq1d 7435 . . . . . . . . . . . . . . . . . 18 (𝑦 = (𝑥 ∪ {𝑧}) → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
171170ifeq1d 4502 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝑥 ∪ {𝑧}) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
172171mpoeq3dv 7499 . . . . . . . . . . . . . . . 16 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
173172fveq2d 6889 . . . . . . . . . . . . . . 15 (𝑦 = (𝑥 ∪ {𝑧}) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
174173eqeq2d 2772 . . . . . . . . . . . . . 14 (𝑦 = (𝑥 ∪ {𝑧}) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
175167, 174imbi12d 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 2850 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ (𝐼 ∖ {𝑖})))
177176notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = (𝐼 ∖ {𝑖}) → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ (𝐼 ∖ {𝑖})))
178 sseq1 3956 . . . . . . . . . . . . . . . 16 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑦 ⊆ 𝐼 ↔ (𝐼 ∖ {𝑖}) ⊆ 𝐼))
179177, 178anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = (𝐼 ∖ {𝑖}) → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)))
180179anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = (𝐼 ∖ {𝑖}) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼))))
181 mpteq1 5194 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
182181oveq2d 7436 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
183182oveq1d 7435 . . . . . . . . . . . . . . . . . 18 (𝑦 = (𝐼 ∖ {𝑖}) → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
184183ifeq1d 4502 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝐼 ∖ {𝑖}) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
185184mpoeq3dv 7499 . . . . . . . . . . . . . . . 16 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
186185fveq2d 6889 . . . . . . . . . . . . . . 15 (𝑦 = (𝐼 ∖ {𝑖}) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
187186eqeq2d 2772 . . . . . . . . . . . . . 14 (𝑦 = (𝐼 ∖ {𝑖}) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
188180, 187imbi12d 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 7551 . . . . . . . . . . . . . . . . . 18 (𝑀 Fn (𝐼 × 𝐼) ↔ 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
19059, 189sylib 221 . . . . . . . . . . . . . . . . 17 (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
191190adantl 487 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
192 ringgrp 20464 . . . . . . . . . . . . . . . . . 18 (𝑅 ∈ Ring → 𝑅 ∈ Grp)
1934, 192syl 18 . . . . . . . . . . . . . . . . 17 (𝑅 ∈ Field → 𝑅 ∈ Grp)
194 oveq1 7427 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝑗 → (𝑖𝑀𝑘) = (𝑗𝑀𝑘))
195194equcoms 2053 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 = 𝑖 → (𝑖𝑀𝑘) = (𝑗𝑀𝑘))
196195oveq2d 7436 . . . . . . . . . . . . . . . . . . . 20 (𝑗 = 𝑖 → ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)) = ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)))
197 simp1l 1216 . . . . . . . . . . . . . . . . . . . . 21 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Grp)
198 fovcdm 7591 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
1991983adant1l 1195 . . . . . . . . . . . . . . . . . . . . 21 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
200 eqid 2761 . . . . . . . . . . . . . . . . . . . . . 22 (+g‘𝑅) = (+g‘𝑅)
20110, 200, 100grplid 19178 . . . . . . . . . . . . . . . . . . . . 21 ((𝑅 ∈ Grp ∧ (𝑗𝑀𝑘) ∈ (Base‘𝑅)) → ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
202197, 199, 201syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
203196, 202sylan9eqr 2818 . . . . . . . . . . . . . . . . . . 19 ((((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ 𝑗 = 𝑖) → ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)) = (𝑗𝑀𝑘))
204 eqidd 2762 . . . . . . . . . . . . . . . . . . 19 ((((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ ¬ 𝑗 = 𝑖) → (𝑗𝑀𝑘) = (𝑗𝑀𝑘))
205203, 204ifeqda 4519 . . . . . . . . . . . . . . . . . 18 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
206205mpoeq3dva 7497 . . . . . . . . . . . . . . . . 17 ((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
207193, 206sylan 592 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
208191, 207eqtr4d 2799 . . . . . . . . . . . . . . 15 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
209208fveq2d 6889 . . . . . . . . . . . . . 14 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
210209ad4antr 745 . . . . . . . . . . . . 13 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
211 elun1 4128 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 ∈ 𝑥 → 𝑖 ∈ (𝑥 ∪ {𝑧}))
212211con3i 155 . . . . . . . . . . . . . . . . . . . 20 (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) → ¬ 𝑖 ∈ 𝑥)
213 ssun1 4124 . . . . . . . . . . . . . . . . . . . . 21 𝑥 ⊆ (𝑥 ∪ {𝑧})
214 sstr 3939 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ⊆ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → 𝑥 ⊆ 𝐼)
215213, 214mpan 703 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∪ {𝑧}) ⊆ 𝐼 → 𝑥 ⊆ 𝐼)
216212, 215anim12i 625 . . . . . . . . . . . . . . . . . . 19 ((¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼))
217216anim2i 629 . . . . . . . . . . . . . . . . . 18 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)))
218217adantr 486 . . . . . . . . . . . . . . . . 17 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)))
219 velsn 4600 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 ∈ {𝑧} ↔ 𝑖 = 𝑧)
220 elun2 4129 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 ∈ {𝑧} → 𝑖 ∈ (𝑥 ∪ {𝑧}))
221219, 220sylbir 238 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝑧 → 𝑖 ∈ (𝑥 ∪ {𝑧}))
222221necon3bi 2982 . . . . . . . . . . . . . . . . . . . . 21 (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) → 𝑖 ≠ 𝑧)
223222anim1i 627 . . . . . . . . . . . . . . . . . . . 20 ((¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼))
224 ringcmn 20511 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑅 ∈ Ring → 𝑅 ∈ CMnd)
2254, 224syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑅 ∈ Field → 𝑅 ∈ CMnd)
226225ad7antr 751 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ CMnd)
227 simplr 781 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝐼 ∈ Fin)
228215adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → 𝑥 ⊆ 𝐼)
229 ssfi 9188 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → 𝑥 ∈ Fin)
230227, 228, 229syl2an 608 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑥 ∈ Fin)
231230ad5ant13 769 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑥 ∈ Fin)
232215sselda 3931 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝑥 ∪ {𝑧}) ⊆ 𝐼 ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
233232adantll 727 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
234233ad4ant24 767 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
2354ad6antr 749 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → 𝑅 ∈ Ring)
2362ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) → 𝑅 ∈ DivRing)
237 ffvelcdm 7081 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼) → (𝑓‘𝑖) ∈ (Base‘𝑅))
238237anim2i 629 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑅 ∈ DivRing ∧ (𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼)) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
239238anassrs 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (((𝑅 ∈ DivRing ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
240 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 (invr‘𝑅) = (invr‘𝑅)
24110, 100, 240drnginvrcl 21011 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
2422413expa 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
243239, 242sylan 592 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((((𝑅 ∈ DivRing ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
244243anasss 472 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝑅 ∈ DivRing ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
245236, 244sylanl1 693 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
246245ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
24743ad5ant25 774 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
248 simp-4r 796 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
249763expa 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
250249an32s 665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
251248, 250sylanl1 693 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
252235, 247, 251, 78syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
25310, 47ringcl 20477 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑅 ∈ Ring ∧ ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
254235, 246, 252, 253syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
255254adantllr 732 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
256234, 255syldan 603 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝑥) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
257256adantllr 732 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 ∈ 𝑥) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
258 vex 3455 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 𝑧 ∈ V
259258a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑧 ∈ V)
260 simplr 781 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ¬ 𝑧 ∈ 𝑥)
261 ssun2 4125 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 {𝑧} ⊆ (𝑥 ∪ {𝑧})
262 sstr 3939 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (({𝑧} ⊆ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → {𝑧} ⊆ 𝐼)
263261, 262mpan 703 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∪ {𝑧}) ⊆ 𝐼 → {𝑧} ⊆ 𝐼)
264258snss 4745 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑧 ∈ 𝐼 ↔ {𝑧} ⊆ 𝐼)
265263, 264sylibr 237 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑥 ∪ {𝑧}) ⊆ 𝐼 → 𝑧 ∈ 𝐼)
266265adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → 𝑧 ∈ 𝐼)
2674ad6antr 749 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
2684ad5antr 747 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → 𝑅 ∈ Ring)
269245adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
270 ffvelcdm 7081 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
271270ad4ant24 767 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
27210, 47ringcl 20477 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑅 ∈ Ring ∧ ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ (𝑓‘𝑧) ∈ (Base‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
273268, 269, 271, 272syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
274273adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
275 fovcdm 7591 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
2762753expa 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
277248, 276sylanl1 693 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
27810, 47ringcl 20477 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑅 ∈ Ring ∧ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅) ∧ (𝑧𝑀𝑘) ∈ (Base‘𝑅)) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
279267, 274, 277, 278syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
280266, 279sylanl2 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
281280adantlr 728 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
282 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑛 = 𝑧 → (𝑓‘𝑛) = (𝑓‘𝑧))
283 oveq1 7427 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑛 = 𝑧 → (𝑛𝑀𝑘) = (𝑧𝑀𝑘))
284282, 283oveq12d 7438 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑛 = 𝑧 → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) = ((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘)))
285284oveq2d 7436 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑛 = 𝑧 → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))))
286245ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
287270ad5ant24 773 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
28810, 47ringass 20480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑅 ∈ Ring ∧ (((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ (𝑓‘𝑧) ∈ (Base‘𝑅) ∧ (𝑧𝑀𝑘) ∈ (Base‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))))
289267, 286, 287, 277, 288syl13anc 1399 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))))
290289eqcomd 2767 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
291266, 290sylanl2 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
292285, 291sylan9eqr 2818 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 = 𝑧) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
293292adantllr 732 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 = 𝑧) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))
29410, 200, 226, 231, 257, 259, 260, 281, 293gsumunsnd 20172 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
295294oveq1d 7435 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)))
296 ringabl 20510 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑅 ∈ Ring → 𝑅 ∈ Abel)
2974, 296syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑅 ∈ Field → 𝑅 ∈ Abel)
298297ad6antr 749 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Abel)
299225ad6antr 749 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ CMnd)
300 vex 3455 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 𝑥 ∈ V
301300a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑥 ∈ V)
302 ssel2 3926 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 ⊆ 𝐼 ∧ 𝑛 ∈ 𝑥) → 𝑛 ∈ 𝐼)
303302, 254sylan2 605 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑥 ⊆ 𝐼 ∧ 𝑛 ∈ 𝑥)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
304303anassrs 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑛 ∈ 𝑥) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ (Base‘𝑅))
305304fmpttd 7115 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))):𝑥⟶(Base‘𝑅))
306305an32s 665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))):𝑥⟶(Base‘𝑅))
307 ovex 7453 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V
308 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
309307, 308fnmpti 6682 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝑥
310309a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝑥)
311 fvexd 6900 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (0g‘𝑅) ∈ V)
312310, 229, 311fndmfifsupp 9370 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
313312adantll 727 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
314313ad5ant14 770 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
31510, 100, 299, 301, 306, 314gsumcl 20129 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) ∈ (Base‘𝑅))
316215, 315sylanl2 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) ∈ (Base‘𝑅))
317265, 279sylanl2 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)) ∈ (Base‘𝑅))
318 simpllr 788 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
319 simpl 488 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → 𝑖 ∈ 𝐼)
320318, 319anim12i 625 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼))
321320adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼))
322 fovcdm 7591 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
3233223expa 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
324321, 323sylan 592 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
32510, 200, 298, 316, 317, 324abl32 20017 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
326325adantlrl 733 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
327326adantlr 728 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
328295, 327eqtrd 2796 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
329328ifeq1d 4502 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))
3303293adant2 1149 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))
331330mpoeq3dva 7497 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))))
332331fveq2d 6889 . . . . . . . . . . . . . . . . . . . . . 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 2761 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝐼 maDet 𝑅) = (𝐼 maDet 𝑅)
3341simprbi 503 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑅 ∈ Field → 𝑅 ∈ CRing)
335334ad5antr 747 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑅 ∈ CRing)
336 simp-4r 796 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝐼 ∈ Fin)
337193ad6antr 749 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Grp)
338320adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼))
339338, 323sylan 592 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
34010, 200grpcl 19152 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑅 ∈ Grp ∧ (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) ∈ (Base‘𝑅) ∧ (𝑖𝑀𝑘) ∈ (Base‘𝑅)) → ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) ∈ (Base‘𝑅))
341337, 315, 339, 340syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) ∈ (Base‘𝑅))
342228, 341sylanl2 694 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) ∈ (Base‘𝑅))
343248, 266anim12i 625 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼))
344343, 276sylan 592 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
345 simp-5r 798 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
346345, 198syl3an1 1181 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
347266, 273sylan2 605 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧)) ∈ (Base‘𝑅))
348 simplrl 789 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑖 ∈ 𝐼)
349265ad2antll 742 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑧 ∈ 𝐼)
350 simprl 783 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑖 ≠ 𝑧)
351333, 10, 200, 47, 335, 336, 342, 344, 346, 347, 348, 349, 350mdetero 22925 . . . . . . . . . . . . . . . . . . . . . . 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(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
352351adantr 486 . . . . . . . . . . . . . . . . . . . . . 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(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
353332, 352eqtrd 2796 . . . . . . . . . . . . . . . . . . . . 21 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
354 iftrue 4488 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑧𝑀𝑘))
355 oveq1 7427 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 𝑧 → (𝑗𝑀𝑘) = (𝑧𝑀𝑘))
356354, 355eqtr4d 2799 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
357 iffalse 4491 . . . . . . . . . . . . . . . . . . . . . . . . 25 (¬ 𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
358356, 357pm2.61i 184 . . . . . . . . . . . . . . . . . . . . . . . 24 if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘)
359 ifeq2 4487 . . . . . . . . . . . . . . . . . . . . . . . 24 (if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
360358, 359mp1i 14 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
361360mpoeq3ia 7498 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
362361fveq2i 6888 . . . . . . . . . . . . . . . . . . . . 21 ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
363 ifeq2 4487 . . . . . . . . . . . . . . . . . . . . . . . 24 (if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
364358, 363mp1i 14 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
365364mpoeq3ia 7498 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
366365fveq2i 6888 . . . . . . . . . . . . . . . . . . . . 21 ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
367353, 362, 3663eqtr3g 2819 . . . . . . . . . . . . . . . . . . . 20 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
368223, 367sylanl2 694 . . . . . . . . . . . . . . . . . . 19 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
369368eqeq2d 2772 . . . . . . . . . . . . . . . . . 18 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) ↔ ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
370369biimprd 251 . . . . . . . . . . . . . . . . 17 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → (((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
371218, 370embantd 60 . . . . . . . . . . . . . . . 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‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
372371expcom 419 . . . . . . . . . . . . . . 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‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
373372com23 87 . . . . . . . . . . . . . 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‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
374373adantl 487 . . . . . . . . . . . . 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‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))))
375149, 162, 175, 188, 210, 374findcard2s 9181 . . . . . . . . . . . 12 ((𝐼 ∖ {𝑖}) ∈ Fin → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))))
376132, 375mpcom 39 . . . . . . . . . . 11 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
377129, 130, 376mpanr12 718 . . . . . . . . . 10 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
378377adantlr 728 . . . . . . . . 9 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
379 eqid 2761 . . . . . . . . . . . 12 𝐼 = 𝐼
380 fconstmpt 5713 . . . . . . . . . . . . . . . . 17 (𝐼 × {(0g‘𝑅)}) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅))
381380eqeq2i 2774 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅)))
382 ovex 7453 . . . . . . . . . . . . . . . . . 18 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V
383382rgenw 3081 . . . . . . . . . . . . . . . . 17 ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V
384 mpteqb 7013 . . . . . . . . . . . . . . . . 17 (∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V → ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅)) ↔ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)))
385383, 384ax-mp 5 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅)) ↔ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅))
386381, 385bitri 278 . . . . . . . . . . . . . . 15 ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅))
387225ad5antr 747 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ CMnd)
388 simp-4r 796 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝐼 ∈ Fin)
389 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
390307, 389fnmpti 6682 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼
391390a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
392 id 23 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → 𝐼 ∈ Fin)
393 fvexd 6900 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → (0g‘𝑅) ∈ V)
394391, 392, 393fndmfifsupp 9370 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
395394ad4antlr 746 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) finSupp (0g‘𝑅))
396 simplrl 789 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝑖 ∈ 𝐼)
397320, 323sylan 592 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
398 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 = 𝑖 → (𝑓‘𝑛) = (𝑓‘𝑖))
399 oveq1 7427 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 = 𝑖 → (𝑛𝑀𝑘) = (𝑖𝑀𝑘))
400398, 399oveq12d 7438 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 = 𝑖 → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) = ((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘)))
401400oveq2d 7436 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = 𝑖 → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))))
402 simpll 779 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) → 𝑅 ∈ Field)
4032, 237anim12i 625 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑅 ∈ Field ∧ (𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼)) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
404403anassrs 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
405 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (1r‘𝑅) = (1r‘𝑅)
40610, 100, 47, 405, 240drnginvrl 21014 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
4074063expa 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
408404, 407sylan 592 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) ∧ (𝑓‘𝑖) ≠ (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
409408anasss 472 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖)) = (1r‘𝑅))
410409oveq1d 7435 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑅 ∈ Field ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)))
411402, 410sylanl1 693 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)))
412411adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)))
4134ad5antr 747 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
414245adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅))
415237ad2ant2lr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (𝑓‘𝑖) ∈ (Base‘𝑅))
416415adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑓‘𝑖) ∈ (Base‘𝑅))
41710, 47ringass 20480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑅 ∈ Ring ∧ (((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅) ∧ (𝑓‘𝑖) ∈ (Base‘𝑅) ∧ (𝑖𝑀𝑘) ∈ (Base‘𝑅))) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))))
418413, 414, 416, 397, 417syl13anc 1399 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑖))(.r‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))))
4194adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑅 ∈ Ring)
4204193ad2ant1 1151 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Ring)
4213223adant1l 1195 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
42210, 47, 405ringlidm 20498 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑅 ∈ Ring ∧ (𝑖𝑀𝑘) ∈ (Base‘𝑅)) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
423420, 421, 422syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
424423ad5ant145 1396 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
425424adantlrr 734 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((1r‘𝑅)(.r‘𝑅)(𝑖𝑀𝑘)) = (𝑖𝑀𝑘))
426412, 418, 4253eqtr3d 2804 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))) = (𝑖𝑀𝑘))
427401, 426sylan9eqr 2818 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 = 𝑖) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (𝑖𝑀𝑘))
42810, 200, 387, 388, 395, 254, 396, 397, 427gsumdifsnd 20175 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
429 ovex 7453 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ V
430 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))
431429, 430fnmpti 6682 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) Fn 𝐼
432431a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) Fn 𝐼)
433432, 392, 393fndmfifsupp 9370 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) finSupp (0g‘𝑅))
434433ad4antlr 746 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) finSupp (0g‘𝑅))
43510, 100, 47, 413, 388, 414, 252, 434gsummulc2 20546 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
436428, 435eqtr3d 2798 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
437436adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
438 oveq2 7428 . . . . . . . . . . . . . . . . . . . . 21 ((𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)))
439438adantl 487 . . . . . . . . . . . . . . . . . . . 20 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)))
4404ad4antr 745 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑅 ∈ Ring)
44110, 47, 100ringrz 20525 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑅 ∈ Ring ∧ ((invr‘𝑅)‘(𝑓‘𝑖)) ∈ (Base‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)) = (0g‘𝑅))
442440, 245, 441syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)) = (0g‘𝑅))
443442ad2antrr 739 . . . . . . . . . . . . . . . . . . . 20 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(0g‘𝑅)) = (0g‘𝑅))
444437, 439, 4433eqtrd 2800 . . . . . . . . . . . . . . . . . . 19 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (0g‘𝑅))
445444ifeq1d 4502 . . . . . . . . . . . . . . . . . 18 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))
446445ex 418 . . . . . . . . . . . . . . . . 17 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
447446ralimdva 3175 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅) → ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
448447imp 412 . . . . . . . . . . . . . . 15 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))
449386, 448sylan2b 606 . . . . . . . . . . . . . 14 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))
450449, 379jctil 529 . . . . . . . . . . . . 13 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → (𝐼 = 𝐼 ∧ ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
451450ralrimivw 3159 . . . . . . . . . . . 12 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → ∀𝑗 ∈ 𝐼 (𝐼 = 𝐼 ∧ ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
452 mpoeq123 7492 . . . . . . . . . . . 12 ((𝐼 = 𝐼 ∧ ∀𝑗 ∈ 𝐼 (𝐼 = 𝐼 ∧ ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
453379, 451, 452sylancr 599 . . . . . . . . . . 11 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
454453an32s 665 . . . . . . . . . 10 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
455454fveq2d 6889 . . . . . . . . 9 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))))
456334ad3antrrr 743 . . . . . . . . . . 11 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑅 ∈ CRing)
457 simplr 781 . . . . . . . . . . 11 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝐼 ∈ Fin)
458 simpllr 788 . . . . . . . . . . . 12 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅))
459458, 198syl3an1 1181 . . . . . . . . . . 11 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
460 simprl 783 . . . . . . . . . . 11 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → 𝑖 ∈ 𝐼)
461333, 10, 100, 456, 457, 459, 460mdetr0 22920 . . . . . . . . . 10 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))) = (0g‘𝑅))
462461ad4ant14 765 . . . . . . . . 9 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘)))) = (0g‘𝑅))
463378, 455, 4623eqtrd 2800 . . . . . . . 8 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅))
464463rexlimdvaa 3165 . . . . . . 7 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → (∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
465464expimpd 459 . . . . . 6 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅)) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
466128, 465sylan2d 617 . . . . 5 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
46732, 466sylan2 605 . . . 4 ((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
468467rexlimdva 3164 . . 3 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) → (∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
4699, 468sylan2 605 . 2 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (∃𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ∧ ¬ 𝑓 = (𝐼 × {(0g‘𝑅)})) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
470115, 469sylbid 243 1 (((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (¬ curry 𝑀 LIndF (𝑅 freeLMod 𝐼) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  ∃wrex 3087  Vcvv 3451   ∖ cdif 3896   ∪ cun 3897   ⊆ wss 3899  ∅c0 4279  ifcif 4482  {csn 4584   class class class wbr 5103   ↦ cmpt 5186   × cxp 5649   Fn wfn 6533  ⟶wf 6534  ‘cfv 6538  (class class class)co 7420   ∈ cmpo 7422   ∘f cof 7691  curry ccur 8282   ↑m cmap 8847  Fincfn 8973   finSupp cfsupp 9353  Basecbs 17387  +gcplusg 17428  .rcmulr 17429  Scalarcsca 17431   ·𝑠 cvsca 17432  0gc0g 17610   Σg cgsu 17611  Grpcgrp 19144  CMndccmn 19994  Abelcabl 19995  1rcur 20407  Ringcrg 20459  CRingccrg 20460  invrcinvr 20617  DivRingcdr 20980  Fieldcfield 20981  LModclmod 21135   freeLMod cfrlm 22052   LIndF clindf 22110   maDet cmdat 22899
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-addf 11279  ax-mulf 11280
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-xor 1542  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-ot 4593  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-om 7878  df-1st 8001  df-2nd 8002  df-supp 8178  df-tpos 8243  df-cur 8284  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-2o 8477  df-er 8717  df-map 8849  df-pm 8850  df-ixp 8926  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-fsupp 9354  df-sup 9434  df-oi 9504  df-card 10020  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-4 12407  df-5 12408  df-6 12409  df-7 12410  df-8 12411  df-9 12412  df-n0 12607  df-xnn0 12680  df-z 12694  df-dec 12815  df-uz 12966  df-rp 13121  df-fz 13640  df-fzo 13789  df-seq 14145  df-exp 14205  df-hash 14475  df-word 14659  df-lsw 14708  df-concat 14716  df-s1 14743  df-substr 14789  df-pfx 14821  df-splice 14899  df-reverse 14908  df-s2 14999  df-struct 17325  df-sets 17342  df-slot 17360  df-ndx 17372  df-base 17388  df-ress 17409  df-plusg 17441  df-mulr 17442  df-starv 17443  df-sca 17444  df-vsca 17445  df-ip 17446  df-tset 17447  df-ple 17448  df-ds 17450  df-unif 17451  df-hom 17452  df-cco 17453  df-0g 17612  df-gsum 17613  df-prds 17618  df-pws 17620  df-mre 17756  df-mrc 17757  df-acs 17759  df-mgm 18816  df-sgrp 18908  df-mnd 18924  df-mhm 18978  df-submnd 18979  df-efmnd 19065  df-grp 19147  df-minusg 19148  df-sbg 19149  df-mulg 19278  df-subg 19333  df-ghm 19428  df-gim 19473  df-cntz 19531  df-oppg 19560  df-symg 19584  df-pmtr 19656  df-psgn 19705  df-evpm 19706  df-cmn 19996  df-abl 19997  df-mgp 20361  df-rng 20375  df-ur 20408  df-ring 20461  df-cring 20462  df-oppr 20567  df-dvdsr 20587  df-unit 20588  df-invr 20618  df-dvr 20631  df-rhm 20702  df-nzr 20763  df-subrng 20798  df-subrg 20822  df-drng 20982  df-field 20983  df-lmod 21137  df-lss 21207  df-lsp 21247  df-lmhm 21297  df-lbs 21350  df-sra 21448  df-rgmod 21449  df-cnfld 21679  df-zring 21753  df-zrh 21809  df-dsmm 22038  df-frlm 22053  df-uvc 22089  df-lindf 22112  df-mat 22723  df-mdet 22900
This theorem is used by:  matunitlindf  22996
  Copyright terms: Public domain W3C validator