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

Theorem mdetunilem4 20421
Description: Lemma for mdetuni 20428. (Contributed by SO, 15-Jul-2018.)
Hypotheses
Ref Expression
mdetuni.a 𝐴 = (𝑁 Mat 𝑅)
mdetuni.b 𝐵 = (Base‘𝐴)
mdetuni.k 𝐾 = (Base‘𝑅)
mdetuni.0g 0 = (0g𝑅)
mdetuni.1r 1 = (1r𝑅)
mdetuni.pg + = (+g𝑅)
mdetuni.tg · = (.r𝑅)
mdetuni.n (𝜑𝑁 ∈ Fin)
mdetuni.r (𝜑𝑅 ∈ Ring)
mdetuni.ff (𝜑𝐷:𝐵𝐾)
mdetuni.al (𝜑 → ∀𝑥𝐵𝑦𝑁𝑧𝑁 ((𝑦𝑧 ∧ ∀𝑤𝑁 (𝑦𝑥𝑤) = (𝑧𝑥𝑤)) → (𝐷𝑥) = 0 ))
mdetuni.li (𝜑 → ∀𝑥𝐵𝑦𝐵𝑧𝐵𝑤𝑁 (((𝑥 ↾ ({𝑤} × 𝑁)) = ((𝑦 ↾ ({𝑤} × 𝑁)) ∘𝑓 + (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑦 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝑥) = ((𝐷𝑦) + (𝐷𝑧))))
mdetuni.sc (𝜑 → ∀𝑥𝐵𝑦𝐾𝑧𝐵𝑤𝑁 (((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝑥) = (𝑦 · (𝐷𝑧))))
Assertion
Ref Expression
mdetunilem4 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ (𝐻𝑁 ∧ (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺)))
Distinct variable groups:   𝜑,𝑥,𝑦,𝑧,𝑤   𝑥,𝐵,𝑦,𝑧,𝑤   𝑥,𝐾,𝑦,𝑧,𝑤   𝑥,𝑁,𝑦,𝑧,𝑤   𝑥,𝐷,𝑦,𝑧,𝑤   𝑥, · ,𝑦,𝑧,𝑤   𝑥, + ,𝑦,𝑧,𝑤   𝑥, 0 ,𝑦,𝑧,𝑤   𝑥, 1 ,𝑦,𝑧,𝑤   𝑥,𝑅,𝑦,𝑧,𝑤   𝑥,𝐴,𝑦,𝑧,𝑤   𝑥,𝐸,𝑦,𝑧,𝑤   𝑥,𝐹,𝑦,𝑧,𝑤   𝑥,𝐺,𝑦,𝑧,𝑤   𝑥,𝐻,𝑦,𝑧,𝑤

Proof of Theorem mdetunilem4
StepHypRef Expression
1 simp32 1098 . 2 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ (𝐻𝑁 ∧ (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))) → (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))))
2 simp33 1099 . 2 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ (𝐻𝑁 ∧ (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))) → (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))
3 simp1 1061 . . 3 ((𝐻𝑁 ∧ (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁))) → 𝐻𝑁)
4 simp23 1096 . . . 4 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ 𝐻𝑁) → 𝐺𝐵)
5 simp3 1063 . . . 4 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ 𝐻𝑁) → 𝐻𝑁)
6 simp21 1094 . . . . 5 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ 𝐻𝑁) → 𝐸𝐵)
7 simp22 1095 . . . . 5 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ 𝐻𝑁) → 𝐹𝐾)
8 mdetuni.sc . . . . . 6 (𝜑 → ∀𝑥𝐵𝑦𝐾𝑧𝐵𝑤𝑁 (((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝑥) = (𝑦 · (𝐷𝑧))))
983ad2ant1 1082 . . . . 5 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ 𝐻𝑁) → ∀𝑥𝐵𝑦𝐾𝑧𝐵𝑤𝑁 (((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝑥) = (𝑦 · (𝐷𝑧))))
10 reseq1 5390 . . . . . . . . . 10 (𝑥 = 𝐸 → (𝑥 ↾ ({𝑤} × 𝑁)) = (𝐸 ↾ ({𝑤} × 𝑁)))
1110eqeq1d 2624 . . . . . . . . 9 (𝑥 = 𝐸 → ((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ↔ (𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁)))))
12 reseq1 5390 . . . . . . . . . 10 (𝑥 = 𝐸 → (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)))
1312eqeq1d 2624 . . . . . . . . 9 (𝑥 = 𝐸 → ((𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) ↔ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))))
1411, 13anbi12d 747 . . . . . . . 8 (𝑥 = 𝐸 → (((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) ↔ ((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)))))
15 fveq2 6191 . . . . . . . . 9 (𝑥 = 𝐸 → (𝐷𝑥) = (𝐷𝐸))
1615eqeq1d 2624 . . . . . . . 8 (𝑥 = 𝐸 → ((𝐷𝑥) = (𝑦 · (𝐷𝑧)) ↔ (𝐷𝐸) = (𝑦 · (𝐷𝑧))))
1714, 16imbi12d 334 . . . . . . 7 (𝑥 = 𝐸 → ((((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝑥) = (𝑦 · (𝐷𝑧))) ↔ (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝑦 · (𝐷𝑧)))))
18172ralbidv 2989 . . . . . 6 (𝑥 = 𝐸 → (∀𝑧𝐵𝑤𝑁 (((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝑥) = (𝑦 · (𝐷𝑧))) ↔ ∀𝑧𝐵𝑤𝑁 (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝑦 · (𝐷𝑧)))))
19 sneq 4187 . . . . . . . . . . . 12 (𝑦 = 𝐹 → {𝑦} = {𝐹})
2019xpeq2d 5139 . . . . . . . . . . 11 (𝑦 = 𝐹 → (({𝑤} × 𝑁) × {𝑦}) = (({𝑤} × 𝑁) × {𝐹}))
2120oveq1d 6665 . . . . . . . . . 10 (𝑦 = 𝐹 → ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))))
2221eqeq2d 2632 . . . . . . . . 9 (𝑦 = 𝐹 → ((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ↔ (𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁)))))
2322anbi1d 741 . . . . . . . 8 (𝑦 = 𝐹 → (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) ↔ ((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)))))
24 oveq1 6657 . . . . . . . . 9 (𝑦 = 𝐹 → (𝑦 · (𝐷𝑧)) = (𝐹 · (𝐷𝑧)))
2524eqeq2d 2632 . . . . . . . 8 (𝑦 = 𝐹 → ((𝐷𝐸) = (𝑦 · (𝐷𝑧)) ↔ (𝐷𝐸) = (𝐹 · (𝐷𝑧))))
2623, 25imbi12d 334 . . . . . . 7 (𝑦 = 𝐹 → ((((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝑦 · (𝐷𝑧))) ↔ (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝑧)))))
27262ralbidv 2989 . . . . . 6 (𝑦 = 𝐹 → (∀𝑧𝐵𝑤𝑁 (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝑦 · (𝐷𝑧))) ↔ ∀𝑧𝐵𝑤𝑁 (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝑧)))))
2818, 27rspc2va 3323 . . . . 5 (((𝐸𝐵𝐹𝐾) ∧ ∀𝑥𝐵𝑦𝐾𝑧𝐵𝑤𝑁 (((𝑥 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝑦}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝑥 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝑥) = (𝑦 · (𝐷𝑧)))) → ∀𝑧𝐵𝑤𝑁 (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝑧))))
296, 7, 9, 28syl21anc 1325 . . . 4 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ 𝐻𝑁) → ∀𝑧𝐵𝑤𝑁 (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝑧))))
30 reseq1 5390 . . . . . . . . 9 (𝑧 = 𝐺 → (𝑧 ↾ ({𝑤} × 𝑁)) = (𝐺 ↾ ({𝑤} × 𝑁)))
3130oveq2d 6666 . . . . . . . 8 (𝑧 = 𝐺 → ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁))))
3231eqeq2d 2632 . . . . . . 7 (𝑧 = 𝐺 → ((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ↔ (𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁)))))
33 reseq1 5390 . . . . . . . 8 (𝑧 = 𝐺 → (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)))
3433eqeq2d 2632 . . . . . . 7 (𝑧 = 𝐺 → ((𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) ↔ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))))
3532, 34anbi12d 747 . . . . . 6 (𝑧 = 𝐺 → (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) ↔ ((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)))))
36 fveq2 6191 . . . . . . . 8 (𝑧 = 𝐺 → (𝐷𝑧) = (𝐷𝐺))
3736oveq2d 6666 . . . . . . 7 (𝑧 = 𝐺 → (𝐹 · (𝐷𝑧)) = (𝐹 · (𝐷𝐺)))
3837eqeq2d 2632 . . . . . 6 (𝑧 = 𝐺 → ((𝐷𝐸) = (𝐹 · (𝐷𝑧)) ↔ (𝐷𝐸) = (𝐹 · (𝐷𝐺))))
3935, 38imbi12d 334 . . . . 5 (𝑧 = 𝐺 → ((((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝑧))) ↔ (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺)))))
40 sneq 4187 . . . . . . . . . 10 (𝑤 = 𝐻 → {𝑤} = {𝐻})
4140xpeq1d 5138 . . . . . . . . 9 (𝑤 = 𝐻 → ({𝑤} × 𝑁) = ({𝐻} × 𝑁))
4241reseq2d 5396 . . . . . . . 8 (𝑤 = 𝐻 → (𝐸 ↾ ({𝑤} × 𝑁)) = (𝐸 ↾ ({𝐻} × 𝑁)))
4341xpeq1d 5138 . . . . . . . . 9 (𝑤 = 𝐻 → (({𝑤} × 𝑁) × {𝐹}) = (({𝐻} × 𝑁) × {𝐹}))
4441reseq2d 5396 . . . . . . . . 9 (𝑤 = 𝐻 → (𝐺 ↾ ({𝑤} × 𝑁)) = (𝐺 ↾ ({𝐻} × 𝑁)))
4543, 44oveq12d 6668 . . . . . . . 8 (𝑤 = 𝐻 → ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁))) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))))
4642, 45eqeq12d 2637 . . . . . . 7 (𝑤 = 𝐻 → ((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁))) ↔ (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁)))))
4740difeq2d 3728 . . . . . . . . . 10 (𝑤 = 𝐻 → (𝑁 ∖ {𝑤}) = (𝑁 ∖ {𝐻}))
4847xpeq1d 5138 . . . . . . . . 9 (𝑤 = 𝐻 → ((𝑁 ∖ {𝑤}) × 𝑁) = ((𝑁 ∖ {𝐻}) × 𝑁))
4948reseq2d 5396 . . . . . . . 8 (𝑤 = 𝐻 → (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))
5048reseq2d 5396 . . . . . . . 8 (𝑤 = 𝐻 → (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))
5149, 50eqeq12d 2637 . . . . . . 7 (𝑤 = 𝐻 → ((𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) ↔ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁))))
5246, 51anbi12d 747 . . . . . 6 (𝑤 = 𝐻 → (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) ↔ ((𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))))
5352imbi1d 331 . . . . 5 (𝑤 = 𝐻 → ((((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺))) ↔ (((𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺)))))
5439, 53rspc2va 3323 . . . 4 (((𝐺𝐵𝐻𝑁) ∧ ∀𝑧𝐵𝑤𝑁 (((𝐸 ↾ ({𝑤} × 𝑁)) = ((({𝑤} × 𝑁) × {𝐹}) ∘𝑓 · (𝑧 ↾ ({𝑤} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝑤}) × 𝑁)) = (𝑧 ↾ ((𝑁 ∖ {𝑤}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝑧)))) → (((𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺))))
554, 5, 29, 54syl21anc 1325 . . 3 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ 𝐻𝑁) → (((𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺))))
563, 55syl3an3 1361 . 2 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ (𝐻𝑁 ∧ (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))) → (((𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺))))
571, 2, 56mp2and 715 1 ((𝜑 ∧ (𝐸𝐵𝐹𝐾𝐺𝐵) ∧ (𝐻𝑁 ∧ (𝐸 ↾ ({𝐻} × 𝑁)) = ((({𝐻} × 𝑁) × {𝐹}) ∘𝑓 · (𝐺 ↾ ({𝐻} × 𝑁))) ∧ (𝐸 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)) = (𝐺 ↾ ((𝑁 ∖ {𝐻}) × 𝑁)))) → (𝐷𝐸) = (𝐹 · (𝐷𝐺)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 384  w3a 1037   = wceq 1483  wcel 1990  wne 2794  wral 2912  cdif 3571  {csn 4177   × cxp 5112  cres 5116  wf 5884  cfv 5888  (class class class)co 6650  𝑓 cof 6895  Fincfn 7955  Basecbs 15857  +gcplusg 15941  .rcmulr 15942  0gc0g 16100  1rcur 18501  Ringcrg 18547   Mat cmat 20213
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ral 2917  df-rex 2918  df-rab 2921  df-v 3202  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-if 4087  df-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-opab 4713  df-xp 5120  df-res 5126  df-iota 5851  df-fv 5896  df-ov 6653
This theorem is referenced by:  mdetuni0  20427
  Copyright terms: Public domain W3C validator