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

Theorem matunitlindflem1 23006
Description: One direction of matunitlindf 23008. (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 21005 . . . . 5 (𝑅 ∈ Field ↔ (𝑅 ∈ DivRing ∧ 𝑅 ∈ CRing))
21simplbi 502 . . . 4 (𝑅 ∈ Field → 𝑅 ∈ DivRing)
3 drngring 20999 . . . 4 (𝑅 ∈ DivRing → 𝑅 ∈ Ring)
42, 3syl 18 . . 3 (𝑅 ∈ Field → 𝑅 ∈ Ring)
5 eqid 2763 . . . . . . . . 9 (𝑅 freeLMod 𝐼) = (𝑅 freeLMod 𝐼)
65frlmlmod 22067 . . . . . . . 8 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑅 freeLMod 𝐼) ∈ LMod)
76adantlr 728 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝑅 freeLMod 𝐼) ∈ LMod)
8 simpr 490 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → 𝐼 ∈ (Fin ∖ {∅}))
9 eldifi 4069 . . . . . . . . . 10 (𝐼 ∈ (Fin ∖ {∅}) → 𝐼 ∈ Fin)
10 eqid 2763 . . . . . . . . . . 11 (Base‘𝑅) = (Base‘𝑅)
115, 10frlmfibas 22080 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ Fin) → ((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)))
129, 11sylan2 605 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘(𝑅 freeLMod 𝐼)))
13 fvex 6906 . . . . . . . . . 10 (Base‘𝑅) ∈ V
14 curf 8901 . . . . . . . . . 10 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅}) ∧ (Base‘𝑅) ∈ V) → curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼))
1513, 14mp3an3 1479 . . . . . . . . 9 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) → curry 𝑀:𝐼⟶((Base‘𝑅) ↑m 𝐼))
16 feq3 6697 . . . . . . . . . 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 2763 . . . . . . . 8 (Base‘(𝑅 freeLMod 𝐼)) = (Base‘(𝑅 freeLMod 𝐼))
21 eqid 2763 . . . . . . . 8 (Scalar‘(𝑅 freeLMod 𝐼)) = (Scalar‘(𝑅 freeLMod 𝐼))
22 eqid 2763 . . . . . . . 8 ( ·𝑠 ‘(𝑅 freeLMod 𝐼)) = ( ·𝑠 ‘(𝑅 freeLMod 𝐼))
23 eqid 2763 . . . . . . . 8 (0g‘(𝑅 freeLMod 𝐼)) = (0g‘(𝑅 freeLMod 𝐼))
24 eqid 2763 . . . . . . . 8 (0g‘(Scalar‘(𝑅 freeLMod 𝐼))) = (0g‘(Scalar‘(𝑅 freeLMod 𝐼)))
25 eqid 2763 . . . . . . . 8 (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼))
2620, 21, 22, 23, 24, 25islindf4 22156 . . . . . . 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 22071 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → 𝑅 = (Scalar‘(𝑅 freeLMod 𝐼)))
2928fvoveq1d 7449 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (Base‘(𝑅 freeLMod 𝐼)) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
3012, 29eqtrd 2798 . . . . . . . 8 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
3130adantlr 728 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) → ((Base‘𝑅) ↑m 𝐼) = (Base‘((Scalar‘(𝑅 freeLMod 𝐼)) freeLMod 𝐼)))
32 elmapi 8880 . . . . . . . . . 10 (𝑓 ∈ ((Base‘𝑅) ↑m 𝐼) → 𝑓:𝐼⟶(Base‘𝑅))
33 ffn 6717 . . . . . . . . . . . . . . 15 (𝑓:𝐼⟶(Base‘𝑅) → 𝑓 Fn 𝐼)
3433adantl 487 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → 𝑓 Fn 𝐼)
3519ffnd 6718 . . . . . . . . . . . . . . 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 4125 . . . . . . . . . . . . . 14 (𝐼 ∩ 𝐼) = 𝐼
39 eqidd 2764 . . . . . . . . . . . . . 14 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) = (𝑓‘𝑛))
40 eqidd 2764 . . . . . . . . . . . . . 14 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) = (curry 𝑀‘𝑛))
4134, 36, 37, 37, 38, 39, 40offval 7709 . . . . . . . . . . . . 13 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀) = (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛))))
42 simpllr 788 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → 𝐼 ∈ (Fin ∖ {∅}))
43 ffvelcdm 7089 . . . . . . . . . . . . . . . . 17 ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
4443adantll 727 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑓‘𝑛) ∈ (Base‘𝑅))
4519ffvelcdmda 7092 . . . . . . . . . . . . . . . . 17 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ (Base‘(𝑅 freeLMod 𝐼)))
4645adantlr 728 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ (Base‘(𝑅 freeLMod 𝐼)))
47 eqid 2763 . . . . . . . . . . . . . . . 16 (.r‘𝑅) = (.r‘𝑅)
485, 20, 10, 42, 44, 46, 22, 47frlmvscafval 22084 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛)) = ((𝐼 × {(𝑓‘𝑛)}) ∘f (.r‘𝑅)(curry 𝑀‘𝑛)))
49 fvex 6906 . . . . . . . . . . . . . . . . 17 (𝑓‘𝑛) ∈ V
50 fnconstg 6778 . . . . . . . . . . . . . . . . 17 ((𝑓‘𝑛) ∈ V → (𝐼 × {(𝑓‘𝑛)}) Fn 𝐼)
5149, 50mp1i 14 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝐼 × {(𝑓‘𝑛)}) Fn 𝐼)
5215ffvelcdmda 7092 . . . . . . . . . . . . . . . . . . 19 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑛 ∈ 𝐼) → (curry 𝑀‘𝑛) ∈ ((Base‘𝑅) ↑m 𝐼))
53 elmapfn 8898 . . . . . . . . . . . . . . . . . . 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 7217 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ 𝐼 → ((𝐼 × {(𝑓‘𝑛)})‘𝑘) = (𝑓‘𝑛))
5857adantl 487 . . . . . . . . . . . . . . . 16 ((((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝐼 × {(𝑓‘𝑛)})‘𝑘) = (𝑓‘𝑛))
59 ffn 6717 . . . . . . . . . . . . . . . . . . . 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 8903 . . . . . . . . . . . . . . . . . . . 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 7709 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝐼 × {(𝑓‘𝑛)}) ∘f (.r‘𝑅)(curry 𝑀‘𝑛)) = (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
6948, 68eqtrd 2798 . . . . . . . . . . . . . 14 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛)) = (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
7069mpteq2dva 5200 . . . . . . . . . . . . 13 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)( ·𝑠 ‘(𝑅 freeLMod 𝐼))(curry 𝑀‘𝑛))) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
7141, 70eqtrd 2798 . . . . . . . . . . . 12 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
7271oveq2d 7443 . . . . . . . . . . 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 7598 . . . . . . . . . . . . . . . . 17 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑛 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
7776ad5ant245 1384 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛𝑀𝑘) ∈ (Base‘𝑅))
7810, 47ringcl 20489 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ Ring ∧ (𝑓‘𝑛) ∈ (Base‘𝑅) ∧ (𝑛𝑀𝑘) ∈ (Base‘𝑅)) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
7974, 75, 77, 78syl3anc 1398 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ (Base‘𝑅))
8079fmpttd 7123 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅))
8180adantllr 732 . . . . . . . . . . . . 13 (((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑛 ∈ 𝐼) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))):𝐼⟶(Base‘𝑅))
82 elmapg 8870 . . . . . . . . . . . . . . . . 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 2849 . . . . . . . . . . . . . . 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 7234 . . . . . . . . . . . . . . . 16 (𝐼 ∈ (Fin ∖ {∅}) → (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V)
9089ralrimivw 3161 . . . . . . . . . . . . . . 15 (𝐼 ∈ (Fin ∖ {∅}) → ∀𝑛 ∈ 𝐼 (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V)
91 eqid 2763 . . . . . . . . . . . . . . . 16 (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
9291fnmpt 6687 . . . . . . . . . . . . . . 15 (∀𝑛 ∈ 𝐼 (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
9390, 92syl 18 . . . . . . . . . . . . . 14 (𝐼 ∈ (Fin ∖ {∅}) → (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
94 fvexd 6908 . . . . . . . . . . . . . 14 (𝐼 ∈ (Fin ∖ {∅}) → (0g‘(𝑅 freeLMod 𝐼)) ∈ V)
9593, 9, 94fndmfifsupp 9380 . . . . . . . . . . . . 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 22090 . . . . . . . . . . 11 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓:𝐼⟶(Base‘𝑅)) → ((𝑅 freeLMod 𝐼) Σg (𝑛 ∈ 𝐼 ↦ (𝑘 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
9872, 97eqtr2d 2799 . . . . . . . . . 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 2763 . . . . . . . . . . 11 (0g‘𝑅) = (0g‘𝑅)
1015, 100frlm0 22072 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 × {(0g‘𝑅)}) = (0g‘(𝑅 freeLMod 𝐼)))
102101ad4ant13 764 . . . . . . . . 9 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → (𝐼 × {(0g‘𝑅)}) = (0g‘(𝑅 freeLMod 𝐼)))
10399, 102eqeq12d 2779 . . . . . . . 8 ((((𝑅 ∈ Ring ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ (Fin ∖ {∅})) ∧ 𝑓 ∈ ((Base‘𝑅) ↑m 𝐼)) → ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ ((𝑅 freeLMod 𝐼) Σg (𝑓 ∘f ( ·𝑠 ‘(𝑅 freeLMod 𝐼))curry 𝑀)) = (0g‘(𝑅 freeLMod 𝐼))))
10428fveq2d 6897 . . . . . . . . . . . 12 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (0g‘𝑅) = (0g‘(Scalar‘(𝑅 freeLMod 𝐼))))
105104sneqd 4595 . . . . . . . . . . 11 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → {(0g‘𝑅)} = {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))})
106105xpeq2d 5684 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ 𝐼 ∈ (Fin ∖ {∅})) → (𝐼 × {(0g‘𝑅)}) = (𝐼 × {(0g‘(Scalar‘(𝑅 freeLMod 𝐼)))}))
107106eqeq2d 2774 . . . . . . . . 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 3328 . . . . . 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 3119 . . . 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 7225 . . . . . . . . . . . 12 (𝑓:𝐼⟶{(0g‘𝑅)} ↔ (𝑓 Fn 𝐼 ∧ ∀𝑖 ∈ 𝐼 (𝑓‘𝑖) = (0g‘𝑅)))
117 fvex 6906 . . . . . . . . . . . . 13 (0g‘𝑅) ∈ V
118117fconst2 7218 . . . . . . . . . . . 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 2959 . . . . . . . . . . 11 ((𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ¬ (𝑓‘𝑖) = (0g‘𝑅))
123122rexbii 3112 . . . . . . . . . 10 (∃𝑖 ∈ 𝐼 (𝑓‘𝑖) ≠ (0g‘𝑅) ↔ ∃𝑖 ∈ 𝐼 ¬ (𝑓‘𝑖) = (0g‘𝑅))
124 rexnal 3117 . . . . . . . . . 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 4754 . . . . . . . . . . 11 ¬ 𝑖 ∈ (𝐼 ∖ {𝑖})
130 difss 4074 . . . . . . . . . . 11 (𝐼 ∖ {𝑖}) ⊆ 𝐼
131 diffi 9201 . . . . . . . . . . . . 13 (𝐼 ∈ Fin → (𝐼 ∖ {𝑖}) ∈ Fin)
132131ad4antlr 746 . . . . . . . . . . . 12 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)) → (𝐼 ∖ {𝑖}) ∈ Fin)
133 eleq2 2852 . . . . . . . . . . . . . . . . 17 (𝑦 = ∅ → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ ∅))
134133notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = ∅ → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ ∅))
135 sseq1 3937 . . . . . . . . . . . . . . . 16 (𝑦 = ∅ → (𝑦 ⊆ 𝐼 ↔ ∅ ⊆ 𝐼))
136134, 135anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = ∅ → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼)))
137136anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = ∅ → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼))))
138 mpteq1 5196 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = ∅ → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ ∅ ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
139 mpt0 6689 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ∅ ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = ∅
140138, 139eqtrdi 2814 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = ∅ → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = ∅)
141140oveq2d 7443 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = ∅ → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg ∅))
142100gsum0 18885 . . . . . . . . . . . . . . . . . . . 20 (𝑅 Σg ∅) = (0g‘𝑅)
143141, 142eqtrdi 2814 . . . . . . . . . . . . . . . . . . 19 (𝑦 = ∅ → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (0g‘𝑅))
144143oveq1d 7442 . . . . . . . . . . . . . . . . . 18 (𝑦 = ∅ → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)))
145144ifeq1d 4504 . . . . . . . . . . . . . . . . 17 (𝑦 = ∅ → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
146145mpoeq3dv 7506 . . . . . . . . . . . . . . . 16 (𝑦 = ∅ → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
147146fveq2d 6897 . . . . . . . . . . . . . . 15 (𝑦 = ∅ → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
148147eqeq2d 2774 . . . . . . . . . . . . . 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 2161 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑥 → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ 𝑥))
151150notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑥 → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ 𝑥))
152 sseq1 3937 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑥 → (𝑦 ⊆ 𝐼 ↔ 𝑥 ⊆ 𝐼))
153151, 152anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = 𝑥 → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼)))
154153anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = 𝑥 → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑥 ∧ 𝑥 ⊆ 𝐼))))
155 mpteq1 5196 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑥 → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
156155oveq2d 7443 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑥 → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
157156oveq1d 7442 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑥 → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
158157ifeq1d 4504 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑥 → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
159158mpoeq3dv 7506 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑥 → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
160159fveq2d 6897 . . . . . . . . . . . . . . 15 (𝑦 = 𝑥 → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
161160eqeq2d 2774 . . . . . . . . . . . . . 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 2852 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ (𝑥 ∪ {𝑧})))
164163notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = (𝑥 ∪ {𝑧}) → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ (𝑥 ∪ {𝑧})))
165 sseq1 3937 . . . . . . . . . . . . . . . 16 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑦 ⊆ 𝐼 ↔ (𝑥 ∪ {𝑧}) ⊆ 𝐼))
166164, 165anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = (𝑥 ∪ {𝑧}) → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)))
167166anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = (𝑥 ∪ {𝑧}) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼))))
168 mpteq1 5196 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
169168oveq2d 7443 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
170169oveq1d 7442 . . . . . . . . . . . . . . . . . 18 (𝑦 = (𝑥 ∪ {𝑧}) → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
171170ifeq1d 4504 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝑥 ∪ {𝑧}) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
172171mpoeq3dv 7506 . . . . . . . . . . . . . . . 16 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
173172fveq2d 6897 . . . . . . . . . . . . . . 15 (𝑦 = (𝑥 ∪ {𝑧}) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
174173eqeq2d 2774 . . . . . . . . . . . . . 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 2852 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑖 ∈ 𝑦 ↔ 𝑖 ∈ (𝐼 ∖ {𝑖})))
177176notbid 321 . . . . . . . . . . . . . . . 16 (𝑦 = (𝐼 ∖ {𝑖}) → (¬ 𝑖 ∈ 𝑦 ↔ ¬ 𝑖 ∈ (𝐼 ∖ {𝑖})))
178 sseq1 3937 . . . . . . . . . . . . . . . 16 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑦 ⊆ 𝐼 ↔ (𝐼 ∖ {𝑖}) ⊆ 𝐼))
179177, 178anbi12d 644 . . . . . . . . . . . . . . 15 (𝑦 = (𝐼 ∖ {𝑖}) → ((¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼) ↔ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼)))
180179anbi2d 642 . . . . . . . . . . . . . 14 (𝑦 = (𝐼 ∖ {𝑖}) → ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ 𝑦 ∧ 𝑦 ⊆ 𝐼)) ↔ (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ (𝐼 ∖ {𝑖}) ∧ (𝐼 ∖ {𝑖}) ⊆ 𝐼))))
181 mpteq1 5196 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))
182181oveq2d 7443 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
183182oveq1d 7442 . . . . . . . . . . . . . . . . . 18 (𝑦 = (𝐼 ∖ {𝑖}) → ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
184183ifeq1d 4504 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝐼 ∖ {𝑖}) → if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
185184mpoeq3dv 7506 . . . . . . . . . . . . . . . 16 (𝑦 = (𝐼 ∖ {𝑖}) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
186185fveq2d 6897 . . . . . . . . . . . . . . 15 (𝑦 = (𝐼 ∖ {𝑖}) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑦 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
187186eqeq2d 2774 . . . . . . . . . . . . . 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 7558 . . . . . . . . . . . . . . . . . 18 (𝑀 Fn (𝐼 × 𝐼) ↔ 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
19059, 189sylib 221 . . . . . . . . . . . . . . . . 17 (𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
191190adantl 487 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
192 ringgrp 20476 . . . . . . . . . . . . . . . . . 18 (𝑅 ∈ Ring → 𝑅 ∈ Grp)
1934, 192syl 18 . . . . . . . . . . . . . . . . 17 (𝑅 ∈ Field → 𝑅 ∈ Grp)
194 oveq1 7434 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝑗 → (𝑖𝑀𝑘) = (𝑗𝑀𝑘))
195194equcoms 2054 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 = 𝑖 → (𝑖𝑀𝑘) = (𝑗𝑀𝑘))
196195oveq2d 7443 . . . . . . . . . . . . . . . . . . . 20 (𝑗 = 𝑖 → ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)) = ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)))
197 simp1l 1216 . . . . . . . . . . . . . . . . . . . . 21 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → 𝑅 ∈ Grp)
198 fovcdm 7598 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
1991983adant1l 1195 . . . . . . . . . . . . . . . . . . . . 21 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑗𝑀𝑘) ∈ (Base‘𝑅))
200 eqid 2763 . . . . . . . . . . . . . . . . . . . . . 22 (+g‘𝑅) = (+g‘𝑅)
20110, 200, 100grplid 19190 . . . . . . . . . . . . . . . . . . . . 21 ((𝑅 ∈ Grp ∧ (𝑗𝑀𝑘) ∈ (Base‘𝑅)) → ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
202197, 199, 201syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → ((0g‘𝑅)(+g‘𝑅)(𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
203196, 202sylan9eqr 2820 . . . . . . . . . . . . . . . . . . 19 ((((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ 𝑗 = 𝑖) → ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)) = (𝑗𝑀𝑘))
204 eqidd 2764 . . . . . . . . . . . . . . . . . . 19 ((((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) ∧ ¬ 𝑗 = 𝑖) → (𝑗𝑀𝑘) = (𝑗𝑀𝑘))
205203, 204ifeqda 4521 . . . . . . . . . . . . . . . . . 18 (((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝑗 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
206205mpoeq3dva 7504 . . . . . . . . . . . . . . . . 17 ((𝑅 ∈ Grp ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
207193, 206sylan 592 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ (𝑗𝑀𝑘)))
208191, 207eqtr4d 2801 . . . . . . . . . . . . . . 15 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → 𝑀 = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
209208fveq2d 6897 . . . . . . . . . . . . . 14 ((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
210209ad4antr 745 . . . . . . . . . . . . 13 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (¬ 𝑖 ∈ ∅ ∧ ∅ ⊆ 𝐼)) → ((𝐼 maDet 𝑅)‘𝑀) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((0g‘𝑅)(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))))
211 elun1 4182 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 ∈ 𝑥 → 𝑖 ∈ (𝑥 ∪ {𝑧}))
212211con3i 155 . . . . . . . . . . . . . . . . . . . 20 (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) → ¬ 𝑖 ∈ 𝑥)
213 ssun1 4178 . . . . . . . . . . . . . . . . . . . . 21 𝑥 ⊆ (𝑥 ∪ {𝑧})
214 sstr 3920 . . . . . . . . . . . . . . . . . . . . 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 4599 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 ∈ {𝑧} ↔ 𝑖 = 𝑧)
220 elun2 4183 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 ∈ {𝑧} → 𝑖 ∈ (𝑥 ∪ {𝑧}))
221219, 220sylbir 238 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝑧 → 𝑖 ∈ (𝑥 ∪ {𝑧}))
222221necon3bi 2984 . . . . . . . . . . . . . . . . . . . . 21 (¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) → 𝑖 ≠ 𝑧)
223222anim1i 627 . . . . . . . . . . . . . . . . . . . 20 ((¬ 𝑖 ∈ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼))
224 ringcmn 20523 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 9199 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → 𝑥 ∈ Fin)
230227, 228, 229syl2an 608 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) → 𝑥 ∈ Fin)
231230ad5ant13 769 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑥 ∈ Fin)
232215sselda 3912 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 7089 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼) → (𝑓‘𝑖) ∈ (Base‘𝑅))
238237anim2i 629 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑅 ∈ DivRing ∧ (𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼)) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
239238anassrs 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (((𝑅 ∈ DivRing ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ 𝑖 ∈ 𝐼) → (𝑅 ∈ DivRing ∧ (𝑓‘𝑖) ∈ (Base‘𝑅)))
240 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 (invr‘𝑅) = (invr‘𝑅)
24110, 100, 240drnginvrcl 21023 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 20489 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 3457 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 𝑧 ∈ V
259258a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → 𝑧 ∈ V)
260 simplr 781 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ¬ 𝑧 ∈ 𝑥)
261 ssun2 4179 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 {𝑧} ⊆ (𝑥 ∪ {𝑧})
262 sstr 3920 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (({𝑧} ⊆ (𝑥 ∪ {𝑧}) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) → {𝑧} ⊆ 𝐼)
263261, 262mpan 703 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∪ {𝑧}) ⊆ 𝐼 → {𝑧} ⊆ 𝐼)
264258snss 4744 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 7089 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑓:𝐼⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
271270ad4ant24 767 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) → (𝑓‘𝑧) ∈ (Base‘𝑅))
27210, 47ringcl 20489 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 7598 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
2762753expa 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
277248, 276sylanl1 693 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑧 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑧𝑀𝑘) ∈ (Base‘𝑅))
27810, 47ringcl 20489 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 6893 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑛 = 𝑧 → (𝑓‘𝑛) = (𝑓‘𝑧))
283 oveq1 7434 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑛 = 𝑧 → (𝑛𝑀𝑘) = (𝑧𝑀𝑘))
284282, 283oveq12d 7445 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑛 = 𝑧 → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) = ((𝑓‘𝑧)(.r‘𝑅)(𝑧𝑀𝑘)))
285284oveq2d 7443 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 20492 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 2769 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 2820 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 20184 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
295294oveq1d 7442 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘)))(+g‘𝑅)(𝑖𝑀𝑘)))
296 ringabl 20522 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 3457 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 𝑥 ∈ V
301300a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → 𝑥 ∈ V)
302 ssel2 3907 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 7123 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))):𝑥⟶(Base‘𝑅))
306305an32s 665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑥 ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))):𝑥⟶(Base‘𝑅))
307 ovex 7460 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) ∈ V
308 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
309307, 308fnmpti 6690 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝑥
310309a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝑥)
311 fvexd 6908 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐼 ∈ Fin ∧ 𝑥 ⊆ 𝐼) → (0g‘𝑅) ∈ V)
312310, 229, 311fndmfifsupp 9380 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 20141 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 7598 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼 ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
3233223expa 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅) ∧ 𝑖 ∈ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
324321, 323sylan 592 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼) ∧ 𝑘 ∈ 𝐼) → (𝑖𝑀𝑘) ∈ (Base‘𝑅))
32510, 200, 298, 316, 317, 324abl32 20029 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 2798 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) ∧ 𝑘 ∈ 𝐼) → ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘))(+g‘𝑅)((((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑓‘𝑧))(.r‘𝑅)(𝑧𝑀𝑘))))
329328ifeq1d 4504 . . . . . . . . . . . . . . . . . . . . . . . . 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 7504 . . . . . . . . . . . . . . . . . . . . . . 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 6897 . . . . . . . . . . . . . . . . . . . . . 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 2763 . . . . . . . . . . . . . . . . . . . . . . . 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 19164 . . . . . . . . . . . . . . . . . . . . . . . . . 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 22937 . . . . . . . . . . . . . . . . . . . . . . 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 2798 . . . . . . . . . . . . . . . . . . . . 21 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑖 ≠ 𝑧 ∧ (𝑥 ∪ {𝑧}) ⊆ 𝐼)) ∧ ¬ 𝑧 ∈ 𝑥) → ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))))
354 iftrue 4490 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑧𝑀𝑘))
355 oveq1 7434 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 𝑧 → (𝑗𝑀𝑘) = (𝑧𝑀𝑘))
356354, 355eqtr4d 2801 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
357 iffalse 4493 . . . . . . . . . . . . . . . . . . . . . . . . 25 (¬ 𝑗 = 𝑧 → if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘))
358356, 357pm2.61i 184 . . . . . . . . . . . . . . . . . . . . . . . 24 if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)) = (𝑗𝑀𝑘)
359 ifeq2 4489 . . . . . . . . . . . . . . . . . . . . . . . 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 7505 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
362361fveq2i 6896 . . . . . . . . . . . . . . . . . . . . 21 ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝑥 ∪ {𝑧}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
363 ifeq2 4489 . . . . . . . . . . . . . . . . . . . . . . . 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 7505 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘)))) = (𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)))
366365fveq2i 6896 . . . . . . . . . . . . . . . . . . . . 21 ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), if(𝑗 = 𝑧, (𝑧𝑀𝑘), (𝑗𝑀𝑘))))) = ((𝐼 maDet 𝑅)‘(𝑗 ∈ 𝐼, 𝑘 ∈ 𝐼 ↦ if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ 𝑥 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘))))
367353, 362, 3663eqtr3g 2821 . . . . . . . . . . . . . . . . . . . 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 2774 . . . . . . . . . . . . . . . . . 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 9192 . . . . . . . . . . . 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 2763 . . . . . . . . . . . 12 𝐼 = 𝐼
380 fconstmpt 5716 . . . . . . . . . . . . . . . . 17 (𝐼 × {(0g‘𝑅)}) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅))
381380eqeq2i 2776 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)}) ↔ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝑘 ∈ 𝐼 ↦ (0g‘𝑅)))
382 ovex 7460 . . . . . . . . . . . . . . . . . 18 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V
383382rgenw 3083 . . . . . . . . . . . . . . . . 17 ∀𝑘 ∈ 𝐼 (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) ∈ V
384 mpteqb 7021 . . . . . . . . . . . . . . . . 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 2763 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))
390307, 389fnmpti 6690 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼
391390a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) Fn 𝐼)
392 id 23 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → 𝐼 ∈ Fin)
393 fvexd 6908 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → (0g‘𝑅) ∈ V)
394391, 392, 393fndmfifsupp 9380 . . . . . . . . . . . . . . . . . . . . . . . 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 6893 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 = 𝑖 → (𝑓‘𝑛) = (𝑓‘𝑖))
399 oveq1 7434 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 = 𝑖 → (𝑛𝑀𝑘) = (𝑖𝑀𝑘))
400398, 399oveq12d 7445 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 = 𝑖 → ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) = ((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘)))
401400oveq2d 7443 . . . . . . . . . . . . . . . . . . . . . . . 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 2763 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (1r‘𝑅) = (1r‘𝑅)
40610, 100, 47, 405, 240drnginvrl 21026 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 7442 . . . . . . . . . . . . . . . . . . . . . . . . . . 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 20492 . . . . . . . . . . . . . . . . . . . . . . . . . 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 20510 . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 2806 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑖)(.r‘𝑅)(𝑖𝑀𝑘))) = (𝑖𝑀𝑘))
427401, 426sylan9eqr 2820 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ 𝑛 = 𝑖) → (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (𝑖𝑀𝑘))
42810, 200, 387, 388, 395, 254, 396, 397, 427gsumdifsnd 20187 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)))
429 ovex 7460 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)) ∈ V
430 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) = (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))
431429, 430fnmpti 6690 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) Fn 𝐼
432431a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) Fn 𝐼)
433432, 392, 393fndmfifsupp 9380 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝐼 ∈ Fin → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) finSupp (0g‘𝑅))
434433ad4antlr 746 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))) finSupp (0g‘𝑅))
43510, 100, 47, 413, 388, 414, 252, 434gsummulc2 20558 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) → (𝑅 Σg (𝑛 ∈ 𝐼 ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)(𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))))
436428, 435eqtr3d 2800 . . . . . . . . . . . . . . . . . . . . 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 7435 . . . . . . . . . . . . . . . . . . . . 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 20537 . . . . . . . . . . . . . . . . . . . . . 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 2802 . . . . . . . . . . . . . . . . . . 19 (((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ 𝑘 ∈ 𝐼) ∧ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))) = (0g‘𝑅)) → ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)) = (0g‘𝑅))
445444ifeq1d 4504 . . . . . . . . . . . . . . . . . 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 3177 . . . . . . . . . . . . . . . 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 3161 . . . . . . . . . . . 12 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) → ∀𝑗 ∈ 𝐼 (𝐼 = 𝐼 ∧ ∀𝑘 ∈ 𝐼 if(𝑗 = 𝑖, ((𝑅 Σg (𝑛 ∈ (𝐼 ∖ {𝑖}) ↦ (((invr‘𝑅)‘(𝑓‘𝑖))(.r‘𝑅)((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘)))))(+g‘𝑅)(𝑖𝑀𝑘)), (𝑗𝑀𝑘)) = if(𝑗 = 𝑖, (0g‘𝑅), (𝑗𝑀𝑘))))
452 mpoeq123 7499 . . . . . . . . . . . 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 6897 . . . . . . . . 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 22932 . . . . . . . . . 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 2802 . . . . . . . 8 ((((((𝑅 ∈ Field ∧ 𝑀:(𝐼 × 𝐼)⟶(Base‘𝑅)) ∧ 𝐼 ∈ Fin) ∧ 𝑓:𝐼⟶(Base‘𝑅)) ∧ (𝑘 ∈ 𝐼 ↦ (𝑅 Σg (𝑛 ∈ 𝐼 ↦ ((𝑓‘𝑛)(.r‘𝑅)(𝑛𝑀𝑘))))) = (𝐼 × {(0g‘𝑅)})) ∧ (𝑖 ∈ 𝐼 ∧ (𝑓‘𝑖) ≠ (0g‘𝑅))) → ((𝐼 maDet 𝑅)‘𝑀) = (0g‘𝑅))
464463rexlimdvaa 3167 . . . . . . 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 3166 . . 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 1569   ∈ wcel 2146   ≠ wne 2958  ∀wral 3079  ∃wrex 3089  Vcvv 3453   ⊆ wss 3899   ∖ cdif 4047   ∪ cun 4151  ∅c0 4280  ifcif 4484  {csn 4587   class class class wbr 5105   ↦ cmpt 5188   × cxp 5652   Fn wfn 6541  ⟶wf 6542  ‘cfv 6546  (class class class)co 7427   ∈ cmpo 7429   ∘f cof 7698  curry ccur 8293   ↑m cmap 8858  Fincfn 8984   finSupp cfsupp 9364  Basecbs 17399  +gcplusg 17440  .rcmulr 17441  Scalarcsca 17443   ·𝑠 cvsca 17444  0gc0g 17622   Σg cgsu 17623  Grpcgrp 19156  CMndccmn 20006  Abelcabl 20007  1rcur 20419  Ringcrg 20471  CRingccrg 20472  invrcinvr 20629  DivRingcdr 20992  Fieldcfield 20993  LModclmod 21147   freeLMod cfrlm 22064   LIndF clindf 22122   maDet cmdat 22911
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1944  ax-6 2001  ax-7 2042  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2196  ax-12 2215  ax-ext 2735  ax-rep 5234  ax-sep 5251  ax-nul 5262  ax-pow 5330  ax-pr 5394  ax-un 7758  ax-cnex 11266  ax-resscn 11267  ax-1cn 11268  ax-icn 11269  ax-addcl 11270  ax-addrcl 11271  ax-mulcl 11272  ax-mulrcl 11273  ax-mulcom 11274  ax-addass 11275  ax-mulass 11276  ax-distr 11277  ax-i2m1 11278  ax-1ne0 11279  ax-1rid 11280  ax-rnegex 11281  ax-rrecex 11282  ax-cnre 11283  ax-pre-lttri 11284  ax-pre-lttrn 11285  ax-pre-ltadd 11286  ax-pre-mulgt0 11287  ax-addf 11289  ax-mulf 11290
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-xor 1541  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2101  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3455  df-sbc 3742  df-csb 3851  df-ss 3900  df-pss 4016  df-dif 4049  df-in 4093  df-un 4153  df-nul 4281  df-if 4485  df-pw 4561  df-sn 4588  df-pr 4590  df-tp 4592  df-op 4838  df-ot 4861  df-uni 4870  df-int 4910  df-iun 4955  df-iin 4956  df-br 5106  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5549  df-eprel 5554  df-po 5562  df-so 5563  df-fr 5607  df-se 5608  df-we 5609  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6310  df-ord 6371  df-on 6372  df-lim 6373  df-suc 6374  df-iota 6500  df-fun 6548  df-fn 6549  df-f 6550  df-f1 6551  df-fo 6552  df-f1o 6553  df-fv 6554  df-isom 6555  df-riota 7384  df-ov 7430  df-oprab 7431  df-mpo 7432  df-of 7700  df-om 7885  df-1st 8008  df-2nd 8009  df-supp 8188  df-tpos 8254  df-cur 8295  df-frecs 8310  df-wrecs 8341  df-recs 8390  df-rdg 8429  df-1o 8487  df-2o 8488  df-er 8728  df-map 8860  df-pm 8861  df-ixp 8937  df-en 8985  df-dom 8986  df-sdom 8987  df-fin 8988  df-fsupp 9365  df-sup 9444  df-oi 9514  df-card 10030  df-pnf 11355  df-mnf 11356  df-xr 11357  df-ltxr 11358  df-le 11359  df-sub 11553  df-neg 11554  df-div 11984  df-nn 12346  df-2 12415  df-3 12416  df-4 12417  df-5 12418  df-6 12419  df-7 12420  df-8 12421  df-9 12422  df-n0 12617  df-xnn0 12690  df-z 12704  df-dec 12825  df-uz 12976  df-rp 13131  df-fz 13650  df-fzo 13799  df-seq 14155  df-exp 14215  df-hash 14485  df-word 14669  df-lsw 14718  df-concat 14726  df-s1 14753  df-substr 14800  df-pfx 14832  df-splice 14910  df-reverse 14919  df-s2 15010  df-struct 17337  df-sets 17354  df-slot 17372  df-ndx 17384  df-base 17400  df-ress 17421  df-plusg 17453  df-mulr 17454  df-starv 17455  df-sca 17456  df-vsca 17457  df-ip 17458  df-tset 17459  df-ple 17460  df-ds 17462  df-unif 17463  df-hom 17464  df-cco 17465  df-0g 17624  df-gsum 17625  df-prds 17630  df-pws 17632  df-mre 17768  df-mrc 17769  df-acs 17771  df-mgm 18828  df-sgrp 18920  df-mnd 18936  df-mhm 18990  df-submnd 18991  df-efmnd 19077  df-grp 19159  df-minusg 19160  df-sbg 19161  df-mulg 19290  df-subg 19345  df-ghm 19440  df-gim 19485  df-cntz 19543  df-oppg 19572  df-symg 19596  df-pmtr 19668  df-psgn 19717  df-evpm 19718  df-cmn 20008  df-abl 20009  df-mgp 20373  df-rng 20387  df-ur 20420  df-ring 20473  df-cring 20474  df-oppr 20579  df-dvdsr 20599  df-unit 20600  df-invr 20630  df-dvr 20643  df-rhm 20714  df-nzr 20775  df-subrng 20810  df-subrg 20834  df-drng 20994  df-field 20995  df-lmod 21149  df-lss 21219  df-lsp 21259  df-lmhm 21309  df-lbs 21362  df-sra 21460  df-rgmod 21461  df-cnfld 21691  df-zring 21765  df-zrh 21821  df-dsmm 22050  df-frlm 22065  df-uvc 22101  df-lindf 22124  df-mat 22735  df-mdet 22912
This theorem is used by:  matunitlindf  23008
  Copyright terms: Public domain W3C validator