madjusmdetlem1 - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > madjusmdetlem1		Structured version Visualization version GIF version

Theorem madjusmdetlem1 32807

Description: Lemma for madjusmdet 32811. (Contributed by Thierry Arnoux, 22-Aug-2020.)

**Hypotheses**
Ref	Expression
madjusmdet.b	⊢ 𝐵 = (Base‘𝐴)
madjusmdet.a	⊢ 𝐴 = ((1...𝑁) Mat 𝑅)
madjusmdet.d	⊢ 𝐷 = ((1...𝑁) maDet 𝑅)
madjusmdet.k	⊢ 𝐾 = ((1...𝑁) maAdju 𝑅)
madjusmdet.t	⊢ · = (._r‘𝑅)
madjusmdet.z	⊢ 𝑍 = (ℤRHom‘𝑅)
madjusmdet.e	⊢ 𝐸 = ((1...(𝑁 − 1)) maDet 𝑅)
madjusmdet.n	⊢ (𝜑 → 𝑁 ∈ ℕ)
madjusmdet.r	⊢ (𝜑 → 𝑅 ∈ CRing)
madjusmdet.i	⊢ (𝜑 → 𝐼 ∈ (1...𝑁))
madjusmdet.j	⊢ (𝜑 → 𝐽 ∈ (1...𝑁))
madjusmdet.m	⊢ (𝜑 → 𝑀 ∈ 𝐵)
madjusmdetlem1.g	⊢ 𝐺 = (Base‘(SymGrp‘(1...𝑁)))
madjusmdetlem1.s	⊢ 𝑆 = (pmSgn‘(1...𝑁))
madjusmdetlem1.u	⊢ 𝑈 = (𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)
madjusmdetlem1.w	⊢ 𝑊 = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)𝑈(𝑄‘𝑗)))
madjusmdetlem1.p	⊢ (𝜑 → 𝑃 ∈ 𝐺)
madjusmdetlem1.q	⊢ (𝜑 → 𝑄 ∈ 𝐺)
madjusmdetlem1.1	⊢ (𝜑 → (𝑃‘𝑁) = 𝐼)
madjusmdetlem1.2	⊢ (𝜑 → (𝑄‘𝑁) = 𝐽)
madjusmdetlem1.3	⊢ (𝜑 → (𝐼(subMat1‘𝑈)𝐽) = (𝑁(subMat1‘𝑊)𝑁))

**Assertion**
Ref	Expression
madjusmdetlem1	⊢ (𝜑 → (𝐽(𝐾‘𝑀)𝐼) = ((𝑍‘((𝑆‘𝑃) · (𝑆‘𝑄))) · (𝐸‘(𝐼(subMat1‘𝑀)𝐽))))

Distinct variable groups: 𝐵,𝑖,𝑗 𝑖,𝐼,𝑗 𝑖,𝐽,𝑗 𝑖,𝑀,𝑗 𝑖,𝑁,𝑗 𝑃,𝑖,𝑗 𝑄,𝑖,𝑗 𝑅,𝑖,𝑗 𝜑,𝑖,𝑗 𝑖,𝐺,𝑗 𝑖,𝑊,𝑗 𝑈,𝑖,𝑗 Allowed substitution hints: 𝐴(𝑖,𝑗) 𝐷(𝑖,𝑗) 𝑆(𝑖,𝑗) · (𝑖,𝑗) 𝐸(𝑖,𝑗) 𝐾(𝑖,𝑗) 𝑍(𝑖,𝑗)

**Proof of Theorem madjusmdetlem1**
Step	Hyp	Ref	Expression
1		madjusmdet.m	. . . 4 ⊢ (𝜑 → 𝑀 ∈ 𝐵)
2		madjusmdet.j	. . . 4 ⊢ (𝜑 → 𝐽 ∈ (1...𝑁))
3		madjusmdet.i	. . . 4 ⊢ (𝜑 → 𝐼 ∈ (1...𝑁))
4		madjusmdet.a	. . . . 5 ⊢ 𝐴 = ((1...𝑁) Mat 𝑅)
5		madjusmdet.b	. . . . 5 ⊢ 𝐵 = (Base‘𝐴)
6		madjusmdet.d	. . . . 5 ⊢ 𝐷 = ((1...𝑁) maDet 𝑅)
7		madjusmdet.k	. . . . 5 ⊢ 𝐾 = ((1...𝑁) maAdju 𝑅)
8	4, 5, 6, 7	maducoevalmin1 22154	. . . 4 ⊢ ((𝑀 ∈ 𝐵 ∧ 𝐽 ∈ (1...𝑁) ∧ 𝐼 ∈ (1...𝑁)) → (𝐽(𝐾‘𝑀)𝐼) = (𝐷‘(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)))
9	1, 2, 3, 8	syl3anc 1372	. . 3 ⊢ (𝜑 → (𝐽(𝐾‘𝑀)𝐼) = (𝐷‘(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)))
10		madjusmdetlem1.u	. . . 4 ⊢ 𝑈 = (𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)
11	10	fveq2i 6895	. . 3 ⊢ (𝐷‘𝑈) = (𝐷‘(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽))
12	9, 11	eqtr4di 2791	. 2 ⊢ (𝜑 → (𝐽(𝐾‘𝑀)𝐼) = (𝐷‘𝑈))
13		madjusmdetlem1.g	. . 3 ⊢ 𝐺 = (Base‘(SymGrp‘(1...𝑁)))
14		madjusmdetlem1.s	. . 3 ⊢ 𝑆 = (pmSgn‘(1...𝑁))
15		madjusmdet.z	. . 3 ⊢ 𝑍 = (ℤRHom‘𝑅)
16		madjusmdet.t	. . 3 ⊢ · = (._r‘𝑅)
17		madjusmdetlem1.w	. . 3 ⊢ 𝑊 = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)𝑈(𝑄‘𝑗)))
18		madjusmdet.r	. . 3 ⊢ (𝜑 → 𝑅 ∈ CRing)
19		fzfid 13938	. . 3 ⊢ (𝜑 → (1...𝑁) ∈ Fin)
20		crngring 20068	. . . . . 6 ⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring)
21	18, 20	syl 17	. . . . 5 ⊢ (𝜑 → 𝑅 ∈ Ring)
22	4, 5	minmar1cl 22153	. . . . 5 ⊢ (((𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝐼 ∈ (1...𝑁) ∧ 𝐽 ∈ (1...𝑁))) → (𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽) ∈ 𝐵)
23	21, 1, 3, 2, 22	syl22anc 838	. . . 4 ⊢ (𝜑 → (𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽) ∈ 𝐵)
24	10, 23	eqeltrid 2838	. . 3 ⊢ (𝜑 → 𝑈 ∈ 𝐵)
25		madjusmdetlem1.p	. . 3 ⊢ (𝜑 → 𝑃 ∈ 𝐺)
26		madjusmdetlem1.q	. . 3 ⊢ (𝜑 → 𝑄 ∈ 𝐺)
27	4, 5, 6, 13, 14, 15, 16, 17, 18, 19, 24, 25, 26	mdetpmtr12 32805	. 2 ⊢ (𝜑 → (𝐷‘𝑈) = ((𝑍‘((𝑆‘𝑃) · (𝑆‘𝑄))) · (𝐷‘𝑊)))
28		simplr 768	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → 𝑖 = 𝑁)
29	28	fveq2d 6896	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (𝑃‘𝑖) = (𝑃‘𝑁))
30		madjusmdetlem1.1	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑃‘𝑁) = 𝐼)
31	30	3ad2ant1 1134	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → (𝑃‘𝑁) = 𝐼)
32	31	ad2antrr 725	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (𝑃‘𝑁) = 𝐼)
33	29, 32	eqtrd 2773	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (𝑃‘𝑖) = 𝐼)
34		simpr 486	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → 𝑗 = 𝑁)
35	34	fveq2d 6896	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (𝑄‘𝑗) = (𝑄‘𝑁))
36		madjusmdetlem1.2	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑄‘𝑁) = 𝐽)
37	36	3ad2ant1 1134	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → (𝑄‘𝑁) = 𝐽)
38	37	ad2antrr 725	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (𝑄‘𝑁) = 𝐽)
39	35, 38	eqtrd 2773	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (𝑄‘𝑗) = 𝐽)
40	33, 39	oveq12d 7427	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)) = (𝐼(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)𝐽))
41	1	3ad2ant1 1134	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝑀 ∈ 𝐵)
42	41	ad2antrr 725	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → 𝑀 ∈ 𝐵)
43	3	3ad2ant1 1134	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝐼 ∈ (1...𝑁))
44	43	ad2antrr 725	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → 𝐼 ∈ (1...𝑁))
45	2	3ad2ant1 1134	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝐽 ∈ (1...𝑁))
46	45	ad2antrr 725	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → 𝐽 ∈ (1...𝑁))
47		eqid 2733	. . . . . . . . . . . . 13 ⊢ ((1...𝑁) minMatR1 𝑅) = ((1...𝑁) minMatR1 𝑅)
48		eqid 2733	. . . . . . . . . . . . 13 ⊢ (1_r‘𝑅) = (1_r‘𝑅)
49		eqid 2733	. . . . . . . . . . . . 13 ⊢ (0_g‘𝑅) = (0_g‘𝑅)
50	4, 5, 47, 48, 49	minmar1eval 22151	. . . . . . . . . . . 12 ⊢ ((𝑀 ∈ 𝐵 ∧ (𝐼 ∈ (1...𝑁) ∧ 𝐽 ∈ (1...𝑁)) ∧ (𝐼 ∈ (1...𝑁) ∧ 𝐽 ∈ (1...𝑁))) → (𝐼(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)𝐽) = if(𝐼 = 𝐼, if(𝐽 = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀𝐽)))
51	42, 44, 46, 44, 46, 50	syl122anc 1380	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (𝐼(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)𝐽) = if(𝐼 = 𝐼, if(𝐽 = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀𝐽)))
52		eqid 2733	. . . . . . . . . . . . . 14 ⊢ 𝐼 = 𝐼
53	52	iftruei 4536	. . . . . . . . . . . . 13 ⊢ if(𝐼 = 𝐼, if(𝐽 = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀𝐽)) = if(𝐽 = 𝐽, (1_r‘𝑅), (0_g‘𝑅))
54		eqid 2733	. . . . . . . . . . . . . 14 ⊢ 𝐽 = 𝐽
55	54	iftruei 4536	. . . . . . . . . . . . 13 ⊢ if(𝐽 = 𝐽, (1_r‘𝑅), (0_g‘𝑅)) = (1_r‘𝑅)
56	53, 55	eqtri 2761	. . . . . . . . . . . 12 ⊢ if(𝐼 = 𝐼, if(𝐽 = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀𝐽)) = (1_r‘𝑅)
57	56	a1i 11	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → if(𝐼 = 𝐼, if(𝐽 = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀𝐽)) = (1_r‘𝑅))
58	40, 51, 57	3eqtrrd 2778	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ 𝑗 = 𝑁) → (1_r‘𝑅) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
59		simplr 768	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → 𝑖 = 𝑁)
60	59	fveq2d 6896	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → (𝑃‘𝑖) = (𝑃‘𝑁))
61	31	ad2antrr 725	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → (𝑃‘𝑁) = 𝐼)
62	60, 61	eqtrd 2773	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → (𝑃‘𝑖) = 𝐼)
63	62	oveq1d 7424	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)) = (𝐼(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
64	41	ad2antrr 725	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → 𝑀 ∈ 𝐵)
65	43	ad2antrr 725	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → 𝐼 ∈ (1...𝑁))
66	45	ad2antrr 725	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → 𝐽 ∈ (1...𝑁))
67	26	3ad2ant1 1134	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝑄 ∈ 𝐺)
68		simp3 1139	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝑗 ∈ (1...𝑁))
69		eqid 2733	. . . . . . . . . . . . . . 15 ⊢ (SymGrp‘(1...𝑁)) = (SymGrp‘(1...𝑁))
70	69, 13	symgfv 19247	. . . . . . . . . . . . . 14 ⊢ ((𝑄 ∈ 𝐺 ∧ 𝑗 ∈ (1...𝑁)) → (𝑄‘𝑗) ∈ (1...𝑁))
71	67, 68, 70	syl2anc 585	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → (𝑄‘𝑗) ∈ (1...𝑁))
72	71	ad2antrr 725	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → (𝑄‘𝑗) ∈ (1...𝑁))
73	4, 5, 47, 48, 49	minmar1eval 22151	. . . . . . . . . . . 12 ⊢ ((𝑀 ∈ 𝐵 ∧ (𝐼 ∈ (1...𝑁) ∧ 𝐽 ∈ (1...𝑁)) ∧ (𝐼 ∈ (1...𝑁) ∧ (𝑄‘𝑗) ∈ (1...𝑁))) → (𝐼(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)) = if(𝐼 = 𝐼, if((𝑄‘𝑗) = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀(𝑄‘𝑗))))
74	64, 65, 66, 65, 72, 73	syl122anc 1380	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → (𝐼(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)) = if(𝐼 = 𝐼, if((𝑄‘𝑗) = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀(𝑄‘𝑗))))
75	52	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → 𝐼 = 𝐼)
76	75	iftrued 4537	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → if(𝐼 = 𝐼, if((𝑄‘𝑗) = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀(𝑄‘𝑗))) = if((𝑄‘𝑗) = 𝐽, (1_r‘𝑅), (0_g‘𝑅)))
77		simpr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ (𝑄‘𝑗) = 𝐽) → (𝑄‘𝑗) = 𝐽)
78	77	fveq2d 6896	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ (𝑄‘𝑗) = 𝐽) → (^◡𝑄‘(𝑄‘𝑗)) = (^◡𝑄‘𝐽))
79	69, 13	symgbasf1o 19242	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑄 ∈ 𝐺 → 𝑄:(1...𝑁)–1-1-onto→(1...𝑁))
80	67, 79	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝑄:(1...𝑁)–1-1-onto→(1...𝑁))
81	80	ad2antrr 725	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ (𝑄‘𝑗) = 𝐽) → 𝑄:(1...𝑁)–1-1-onto→(1...𝑁))
82	68	ad2antrr 725	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ (𝑄‘𝑗) = 𝐽) → 𝑗 ∈ (1...𝑁))
83		f1ocnvfv1 7274	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑄:(1...𝑁)–1-1-onto→(1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → (^◡𝑄‘(𝑄‘𝑗)) = 𝑗)
84	81, 82, 83	syl2anc 585	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ (𝑄‘𝑗) = 𝐽) → (^◡𝑄‘(𝑄‘𝑗)) = 𝑗)
85	36	fveq2d 6896	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (^◡𝑄‘(𝑄‘𝑁)) = (^◡𝑄‘𝐽))
86	26, 79	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 𝑄:(1...𝑁)–1-1-onto→(1...𝑁))
87		madjusmdet.n	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 𝑁 ∈ ℕ)
88		nnuz 12865	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ℕ = (ℤ_≥‘1)
89	87, 88	eleqtrdi 2844	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘1))
90		eluzfz2 13509	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑁 ∈ (ℤ_≥‘1) → 𝑁 ∈ (1...𝑁))
91	89, 90	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 𝑁 ∈ (1...𝑁))
92		f1ocnvfv1 7274	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑄:(1...𝑁)–1-1-onto→(1...𝑁) ∧ 𝑁 ∈ (1...𝑁)) → (^◡𝑄‘(𝑄‘𝑁)) = 𝑁)
93	86, 91, 92	syl2anc 585	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (^◡𝑄‘(𝑄‘𝑁)) = 𝑁)
94	85, 93	eqtr3d 2775	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (^◡𝑄‘𝐽) = 𝑁)
95	94	3ad2ant1 1134	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → (^◡𝑄‘𝐽) = 𝑁)
96	95	ad2antrr 725	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ (𝑄‘𝑗) = 𝐽) → (^◡𝑄‘𝐽) = 𝑁)
97	78, 84, 96	3eqtr3d 2781	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ (𝑄‘𝑗) = 𝐽) → 𝑗 = 𝑁)
98	97	ex 414	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) → ((𝑄‘𝑗) = 𝐽 → 𝑗 = 𝑁))
99	98	con3d 152	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) → (¬ 𝑗 = 𝑁 → ¬ (𝑄‘𝑗) = 𝐽))
100	99	imp 408	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → ¬ (𝑄‘𝑗) = 𝐽)
101	100	iffalsed 4540	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → if((𝑄‘𝑗) = 𝐽, (1_r‘𝑅), (0_g‘𝑅)) = (0_g‘𝑅))
102	76, 101	eqtrd 2773	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → if(𝐼 = 𝐼, if((𝑄‘𝑗) = 𝐽, (1_r‘𝑅), (0_g‘𝑅)), (𝐼𝑀(𝑄‘𝑗))) = (0_g‘𝑅))
103	63, 74, 102	3eqtrrd 2778	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) ∧ ¬ 𝑗 = 𝑁) → (0_g‘𝑅) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
104	58, 103	ifeqda 4565	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ 𝑖 = 𝑁) → if(𝑗 = 𝑁, (1_r‘𝑅), (0_g‘𝑅)) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
105		simp2 1138	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝑖 ∈ (1...𝑁))
106	105	adantr 482	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ ¬ 𝑖 = 𝑁) → 𝑖 ∈ (1...𝑁))
107	68	adantr 482	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ ¬ 𝑖 = 𝑁) → 𝑗 ∈ (1...𝑁))
108		ovexd 7444	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ ¬ 𝑖 = 𝑁) → ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)) ∈ V)
109	10	oveqi 7422	. . . . . . . . . . . . . 14 ⊢ ((𝑃‘𝑖)𝑈(𝑄‘𝑗)) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗))
110	109	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → ((𝑃‘𝑖)𝑈(𝑄‘𝑗)) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
111	110	mpoeq3ia 7487	. . . . . . . . . . . 12 ⊢ (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)𝑈(𝑄‘𝑗))) = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
112	17, 111	eqtri 2761	. . . . . . . . . . 11 ⊢ 𝑊 = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
113	112	ovmpt4g 7555	. . . . . . . . . 10 ⊢ ((𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁) ∧ ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)) ∈ V) → (𝑖𝑊𝑗) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
114	106, 107, 108, 113	syl3anc 1372	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) ∧ ¬ 𝑖 = 𝑁) → (𝑖𝑊𝑗) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
115	104, 114	ifeqda 4565	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → if(𝑖 = 𝑁, if(𝑗 = 𝑁, (1_r‘𝑅), (0_g‘𝑅)), (𝑖𝑊𝑗)) = ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗)))
116	115	mpoeq3dva 7486	. . . . . . 7 ⊢ (𝜑 → (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ if(𝑖 = 𝑁, if(𝑗 = 𝑁, (1_r‘𝑅), (0_g‘𝑅)), (𝑖𝑊𝑗))) = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗))))
117		eqid 2733	. . . . . . . . . 10 ⊢ (Base‘𝑅) = (Base‘𝑅)
118	25	3ad2ant1 1134	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝑃 ∈ 𝐺)
119	69, 13	symgfv 19247	. . . . . . . . . . . 12 ⊢ ((𝑃 ∈ 𝐺 ∧ 𝑖 ∈ (1...𝑁)) → (𝑃‘𝑖) ∈ (1...𝑁))
120	118, 105, 119	syl2anc 585	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → (𝑃‘𝑖) ∈ (1...𝑁))
121	24	3ad2ant1 1134	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → 𝑈 ∈ 𝐵)
122	4, 117, 5, 120, 71, 121	matecld 21928	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (1...𝑁) ∧ 𝑗 ∈ (1...𝑁)) → ((𝑃‘𝑖)𝑈(𝑄‘𝑗)) ∈ (Base‘𝑅))
123	4, 117, 5, 19, 18, 122	matbas2d 21925	. . . . . . . . 9 ⊢ (𝜑 → (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)𝑈(𝑄‘𝑗))) ∈ 𝐵)
124	17, 123	eqeltrid 2838	. . . . . . . 8 ⊢ (𝜑 → 𝑊 ∈ 𝐵)
125	117, 48	ringidcl 20083	. . . . . . . . 9 ⊢ (𝑅 ∈ Ring → (1_r‘𝑅) ∈ (Base‘𝑅))
126	21, 125	syl 17	. . . . . . . 8 ⊢ (𝜑 → (1_r‘𝑅) ∈ (Base‘𝑅))
127		eqid 2733	. . . . . . . . 9 ⊢ ((1...𝑁) matRRep 𝑅) = ((1...𝑁) matRRep 𝑅)
128	4, 5, 127, 49	marrepval 22064	. . . . . . . 8 ⊢ (((𝑊 ∈ 𝐵 ∧ (1_r‘𝑅) ∈ (Base‘𝑅)) ∧ (𝑁 ∈ (1...𝑁) ∧ 𝑁 ∈ (1...𝑁))) → (𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁) = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ if(𝑖 = 𝑁, if(𝑗 = 𝑁, (1_r‘𝑅), (0_g‘𝑅)), (𝑖𝑊𝑗))))
129	124, 126, 91, 91, 128	syl22anc 838	. . . . . . 7 ⊢ (𝜑 → (𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁) = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ if(𝑖 = 𝑁, if(𝑗 = 𝑁, (1_r‘𝑅), (0_g‘𝑅)), (𝑖𝑊𝑗))))
130	112	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝑊 = (𝑖 ∈ (1...𝑁), 𝑗 ∈ (1...𝑁) ↦ ((𝑃‘𝑖)(𝐼(((1...𝑁) minMatR1 𝑅)‘𝑀)𝐽)(𝑄‘𝑗))))
131	116, 129, 130	3eqtr4d 2783	. . . . . 6 ⊢ (𝜑 → (𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁) = 𝑊)
132	131	fveq2d 6896	. . . . 5 ⊢ (𝜑 → (𝐷‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = (𝐷‘𝑊))
133		eqid 2733	. . . . . . . . . . . 12 ⊢ ((1...𝑁) subMat 𝑅) = ((1...𝑁) subMat 𝑅)
134	4, 133, 5	submaval 22083	. . . . . . . . . . 11 ⊢ ((𝑊 ∈ 𝐵 ∧ 𝑁 ∈ (1...𝑁) ∧ 𝑁 ∈ (1...𝑁)) → (𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁) = (𝑖 ∈ ((1...𝑁) ∖ {𝑁}), 𝑗 ∈ ((1...𝑁) ∖ {𝑁}) ↦ (𝑖𝑊𝑗)))
135	124, 91, 91, 134	syl3anc 1372	. . . . . . . . . 10 ⊢ (𝜑 → (𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁) = (𝑖 ∈ ((1...𝑁) ∖ {𝑁}), 𝑗 ∈ ((1...𝑁) ∖ {𝑁}) ↦ (𝑖𝑊𝑗)))
136		fzdif2 32002	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘1) → ((1...𝑁) ∖ {𝑁}) = (1...(𝑁 − 1)))
137	89, 136	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ((1...𝑁) ∖ {𝑁}) = (1...(𝑁 − 1)))
138		mpoeq12 7482	. . . . . . . . . . 11 ⊢ ((((1...𝑁) ∖ {𝑁}) = (1...(𝑁 − 1)) ∧ ((1...𝑁) ∖ {𝑁}) = (1...(𝑁 − 1))) → (𝑖 ∈ ((1...𝑁) ∖ {𝑁}), 𝑗 ∈ ((1...𝑁) ∖ {𝑁}) ↦ (𝑖𝑊𝑗)) = (𝑖 ∈ (1...(𝑁 − 1)), 𝑗 ∈ (1...(𝑁 − 1)) ↦ (𝑖𝑊𝑗)))
139	137, 137, 138	syl2anc 585	. . . . . . . . . 10 ⊢ (𝜑 → (𝑖 ∈ ((1...𝑁) ∖ {𝑁}), 𝑗 ∈ ((1...𝑁) ∖ {𝑁}) ↦ (𝑖𝑊𝑗)) = (𝑖 ∈ (1...(𝑁 − 1)), 𝑗 ∈ (1...(𝑁 − 1)) ↦ (𝑖𝑊𝑗)))
140	135, 139	eqtrd 2773	. . . . . . . . 9 ⊢ (𝜑 → (𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁) = (𝑖 ∈ (1...(𝑁 − 1)), 𝑗 ∈ (1...(𝑁 − 1)) ↦ (𝑖𝑊𝑗)))
141		difssd 4133	. . . . . . . . . . 11 ⊢ (𝜑 → ((1...𝑁) ∖ {𝑁}) ⊆ (1...𝑁))
142	137, 141	eqsstrrd 4022	. . . . . . . . . 10 ⊢ (𝜑 → (1...(𝑁 − 1)) ⊆ (1...𝑁))
143	4, 5	submabas 22080	. . . . . . . . . 10 ⊢ ((𝑊 ∈ 𝐵 ∧ (1...(𝑁 − 1)) ⊆ (1...𝑁)) → (𝑖 ∈ (1...(𝑁 − 1)), 𝑗 ∈ (1...(𝑁 − 1)) ↦ (𝑖𝑊𝑗)) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
144	124, 142, 143	syl2anc 585	. . . . . . . . 9 ⊢ (𝜑 → (𝑖 ∈ (1...(𝑁 − 1)), 𝑗 ∈ (1...(𝑁 − 1)) ↦ (𝑖𝑊𝑗)) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
145	140, 144	eqeltrd 2834	. . . . . . . 8 ⊢ (𝜑 → (𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
146		madjusmdet.e	. . . . . . . . 9 ⊢ 𝐸 = ((1...(𝑁 − 1)) maDet 𝑅)
147		eqid 2733	. . . . . . . . 9 ⊢ ((1...(𝑁 − 1)) Mat 𝑅) = ((1...(𝑁 − 1)) Mat 𝑅)
148		eqid 2733	. . . . . . . . 9 ⊢ (Base‘((1...(𝑁 − 1)) Mat 𝑅)) = (Base‘((1...(𝑁 − 1)) Mat 𝑅))
149	146, 147, 148, 117	mdetcl 22098	. . . . . . . 8 ⊢ ((𝑅 ∈ CRing ∧ (𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅))) → (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)) ∈ (Base‘𝑅))
150	18, 145, 149	syl2anc 585	. . . . . . 7 ⊢ (𝜑 → (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)) ∈ (Base‘𝑅))
151	117, 16, 48	ringlidm 20086	. . . . . . 7 ⊢ ((𝑅 ∈ Ring ∧ (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)) ∈ (Base‘𝑅)) → ((1_r‘𝑅) · (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))) = (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)))
152	21, 150, 151	syl2anc 585	. . . . . 6 ⊢ (𝜑 → ((1_r‘𝑅) · (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))) = (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)))
153	4	fveq2i 6895	. . . . . . . . . . 11 ⊢ (Base‘𝐴) = (Base‘((1...𝑁) Mat 𝑅))
154	5, 153	eqtri 2761	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘((1...𝑁) Mat 𝑅))
155	124, 154	eleqtrdi 2844	. . . . . . . . 9 ⊢ (𝜑 → 𝑊 ∈ (Base‘((1...𝑁) Mat 𝑅)))
156		smadiadetr 22177	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑊 ∈ (Base‘((1...𝑁) Mat 𝑅))) ∧ (𝑁 ∈ (1...𝑁) ∧ (1_r‘𝑅) ∈ (Base‘𝑅))) → (((1...𝑁) maDet 𝑅)‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = ((1_r‘𝑅)(._r‘𝑅)((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))))
157	18, 155, 91, 126, 156	syl22anc 838	. . . . . . . 8 ⊢ (𝜑 → (((1...𝑁) maDet 𝑅)‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = ((1_r‘𝑅)(._r‘𝑅)((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))))
158	6	fveq1i 6893	. . . . . . . . 9 ⊢ (𝐷‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = (((1...𝑁) maDet 𝑅)‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁))
159	16	oveqi 7422	. . . . . . . . 9 ⊢ ((1_r‘𝑅) · ((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))) = ((1_r‘𝑅)(._r‘𝑅)((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)))
160	158, 159	eqeq12i 2751	. . . . . . . 8 ⊢ ((𝐷‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = ((1_r‘𝑅) · ((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))) ↔ (((1...𝑁) maDet 𝑅)‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = ((1_r‘𝑅)(._r‘𝑅)((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))))
161	157, 160	sylibr 233	. . . . . . 7 ⊢ (𝜑 → (𝐷‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = ((1_r‘𝑅) · ((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))))
162	137	oveq1d 7424	. . . . . . . . . 10 ⊢ (𝜑 → (((1...𝑁) ∖ {𝑁}) maDet 𝑅) = ((1...(𝑁 − 1)) maDet 𝑅))
163	162, 146	eqtr4di 2791	. . . . . . . . 9 ⊢ (𝜑 → (((1...𝑁) ∖ {𝑁}) maDet 𝑅) = 𝐸)
164	163	fveq1d 6894	. . . . . . . 8 ⊢ (𝜑 → ((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)) = (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)))
165	164	oveq2d 7425	. . . . . . 7 ⊢ (𝜑 → ((1_r‘𝑅) · ((((1...𝑁) ∖ {𝑁}) maDet 𝑅)‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))) = ((1_r‘𝑅) · (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))))
166	161, 165	eqtrd 2773	. . . . . 6 ⊢ (𝜑 → (𝐷‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = ((1_r‘𝑅) · (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))))
167	4, 5	submat1n 32785	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑊 ∈ 𝐵) → (𝑁(subMat1‘𝑊)𝑁) = (𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))
168	87, 124, 167	syl2anc 585	. . . . . . 7 ⊢ (𝜑 → (𝑁(subMat1‘𝑊)𝑁) = (𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁))
169	168	fveq2d 6896	. . . . . 6 ⊢ (𝜑 → (𝐸‘(𝑁(subMat1‘𝑊)𝑁)) = (𝐸‘(𝑁(((1...𝑁) subMat 𝑅)‘𝑊)𝑁)))
170	152, 166, 169	3eqtr4d 2783	. . . . 5 ⊢ (𝜑 → (𝐷‘(𝑁(𝑊((1...𝑁) matRRep 𝑅)(1_r‘𝑅))𝑁)) = (𝐸‘(𝑁(subMat1‘𝑊)𝑁)))
171	132, 170	eqtr3d 2775	. . . 4 ⊢ (𝜑 → (𝐷‘𝑊) = (𝐸‘(𝑁(subMat1‘𝑊)𝑁)))
172	4, 5, 87, 3, 2, 21, 1, 10	submatminr1 32790	. . . . . 6 ⊢ (𝜑 → (𝐼(subMat1‘𝑀)𝐽) = (𝐼(subMat1‘𝑈)𝐽))
173		madjusmdetlem1.3	. . . . . 6 ⊢ (𝜑 → (𝐼(subMat1‘𝑈)𝐽) = (𝑁(subMat1‘𝑊)𝑁))
174	172, 173	eqtrd 2773	. . . . 5 ⊢ (𝜑 → (𝐼(subMat1‘𝑀)𝐽) = (𝑁(subMat1‘𝑊)𝑁))
175	174	fveq2d 6896	. . . 4 ⊢ (𝜑 → (𝐸‘(𝐼(subMat1‘𝑀)𝐽)) = (𝐸‘(𝑁(subMat1‘𝑊)𝑁)))
176	171, 175	eqtr4d 2776	. . 3 ⊢ (𝜑 → (𝐷‘𝑊) = (𝐸‘(𝐼(subMat1‘𝑀)𝐽)))
177	176	oveq2d 7425	. 2 ⊢ (𝜑 → ((𝑍‘((𝑆‘𝑃) · (𝑆‘𝑄))) · (𝐷‘𝑊)) = ((𝑍‘((𝑆‘𝑃) · (𝑆‘𝑄))) · (𝐸‘(𝐼(subMat1‘𝑀)𝐽))))
178	12, 27, 177	3eqtrd 2777	1 ⊢ (𝜑 → (𝐽(𝐾‘𝑀)𝐼) = ((𝑍‘((𝑆‘𝑃) · (𝑆‘𝑄))) · (𝐸‘(𝐼(subMat1‘𝑀)𝐽))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 397 ∧ w3a 1088 = wceq 1542 ∈ wcel 2107 Vcvv 3475 ∖ cdif 3946 ⊆ wss 3949 ifcif 4529 {csn 4629 ^◡ccnv 5676 –1-1-onto→wf1o 6543 ‘cfv 6544 (class class class)co 7409 ∈ cmpo 7411 1c1 11111 · cmul 11115 − cmin 11444 ℕcn 12212 ℤ_≥cuz 12822 ...cfz 13484 Basecbs 17144 ._rcmulr 17198 0_gc0g 17385 SymGrpcsymg 19234 pmSgncpsgn 19357 1_rcur 20004 Ringcrg 20056 CRingccrg 20057 ℤRHomczrh 21049 Mat cmat 21907 matRRep cmarrep 22058 subMat csubma 22078 maDet cmdat 22086 maAdju cmadu 22134 minMatR1 cminmar1 22135 subMat1csmat 32773

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7725 ax-cnex 11166 ax-resscn 11167 ax-1cn 11168 ax-icn 11169 ax-addcl 11170 ax-addrcl 11171 ax-mulcl 11172 ax-mulrcl 11173 ax-mulcom 11174 ax-addass 11175 ax-mulass 11176 ax-distr 11177 ax-i2m1 11178 ax-1ne0 11179 ax-1rid 11180 ax-rnegex 11181 ax-rrecex 11182 ax-cnre 11183 ax-pre-lttri 11184 ax-pre-lttrn 11185 ax-pre-ltadd 11186 ax-pre-mulgt0 11187 ax-addf 11189 ax-mulf 11190

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-xor 1511 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-tp 4634 df-op 4636 df-ot 4638 df-uni 4910 df-int 4952 df-iun 5000 df-iin 5001 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-se 5633 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-isom 6553 df-riota 7365 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7670 df-om 7856 df-1st 7975 df-2nd 7976 df-supp 8147 df-tpos 8211 df-frecs 8266 df-wrecs 8297 df-recs 8371 df-rdg 8410 df-1o 8466 df-2o 8467 df-er 8703 df-map 8822 df-pm 8823 df-ixp 8892 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-fsupp 9362 df-sup 9437 df-oi 9505 df-card 9934 df-pnf 11250 df-mnf 11251 df-xr 11252 df-ltxr 11253 df-le 11254 df-sub 11446 df-neg 11447 df-div 11872 df-nn 12213 df-2 12275 df-3 12276 df-4 12277 df-5 12278 df-6 12279 df-7 12280 df-8 12281 df-9 12282 df-n0 12473 df-xnn0 12545 df-z 12559 df-dec 12678 df-uz 12823 df-rp 12975 df-fz 13485 df-fzo 13628 df-seq 13967 df-exp 14028 df-hash 14291 df-word 14465 df-lsw 14513 df-concat 14521 df-s1 14546 df-substr 14591 df-pfx 14621 df-splice 14700 df-reverse 14709 df-s2 14799 df-struct 17080 df-sets 17097 df-slot 17115 df-ndx 17127 df-base 17145 df-ress 17174 df-plusg 17210 df-mulr 17211 df-starv 17212 df-sca 17213 df-vsca 17214 df-ip 17215 df-tset 17216 df-ple 17217 df-ds 17219 df-unif 17220 df-hom 17221 df-cco 17222 df-0g 17387 df-gsum 17388 df-prds 17393 df-pws 17395 df-mre 17530 df-mrc 17531 df-acs 17533 df-mgm 18561 df-sgrp 18610 df-mnd 18626 df-mhm 18671 df-submnd 18672 df-efmnd 18750 df-grp 18822 df-minusg 18823 df-mulg 18951 df-subg 19003 df-ghm 19090 df-gim 19133 df-cntz 19181 df-oppg 19210 df-symg 19235 df-pmtr 19310 df-psgn 19359 df-cmn 19650 df-abl 19651 df-mgp 19988 df-ur 20005 df-ring 20058 df-cring 20059 df-oppr 20150 df-dvdsr 20171 df-unit 20172 df-invr 20202 df-dvr 20215 df-rnghom 20251 df-subrg 20317 df-drng 20359 df-sra 20785 df-rgmod 20786 df-cnfld 20945 df-zring 21018 df-zrh 21053 df-dsmm 21287 df-frlm 21302 df-mat 21908 df-marrep 22060 df-subma 22079 df-mdet 22087 df-madu 22136 df-minmar1 22137 df-smat 32774

This theorem is referenced by: madjusmdetlem4 32810

W3C validator