submateq - Mathbox for Thierry Arnoux

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

Theorem submateq 33840

Description: Sufficient condition for two submatrices to be equal. (Contributed by Thierry Arnoux, 25-Aug-2020.)

**Hypotheses**
Ref	Expression
submateq.a	⊢ 𝐴 = ((1...𝑁) Mat 𝑅)
submateq.b	⊢ 𝐵 = (Base‘𝐴)
submateq.n	⊢ (𝜑 → 𝑁 ∈ ℕ)
submateq.i	⊢ (𝜑 → 𝐼 ∈ (1...𝑁))
submateq.j	⊢ (𝜑 → 𝐽 ∈ (1...𝑁))
submateq.e	⊢ (𝜑 → 𝐸 ∈ 𝐵)
submateq.f	⊢ (𝜑 → 𝐹 ∈ 𝐵)
submateq.1	⊢ ((𝜑 ∧ 𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗))

**Assertion**
Ref	Expression
submateq	⊢ (𝜑 → (𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽))

Distinct variable groups: 𝑖,𝐸,𝑗 𝑖,𝐹,𝑗 𝑖,𝐼,𝑗 𝑖,𝐽,𝑗 𝑖,𝑁,𝑗 𝜑,𝑖,𝑗 Allowed substitution hints: 𝐴(𝑖,𝑗) 𝐵(𝑖,𝑗) 𝑅(𝑖,𝑗)

Proof of Theorem submateq Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simprl 770	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ (1...(𝑁 − 1)))
2		submateq.n	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℕ)
3	2	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑁 ∈ ℕ)
4		submateq.i	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ (1...𝑁))
5	4	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝐼 ∈ (1...𝑁))
6		simplr 768	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (1...(𝑁 − 1)))
7		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝐼 ≤ 𝑥)
8	3, 5, 6, 7	submateqlem1 33838	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → (𝑥 ∈ (𝐼...𝑁) ∧ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
9	8	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
10	1, 9	syldanl 602	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
11	10	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
12		simprr 772	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ (1...(𝑁 − 1)))
13	2	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
14		submateq.j	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ∈ (1...𝑁))
15	14	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
16		simplr 768	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (1...(𝑁 − 1)))
17		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝐽 ≤ 𝑦)
18	13, 15, 16, 17	submateqlem1 33838	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → (𝑦 ∈ (𝐽...𝑁) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
19	18	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
20	12, 19	syldanl 602	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
21	20	adantlr 715	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
22	11, 21	jca 511	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
23		ovexd 7440	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 + 1) ∈ V)
24		ovexd 7440	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 + 1) ∈ V)
25		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → 𝑖 = (𝑥 + 1))
26	25	eleq1d 2819	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
27		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → 𝑗 = (𝑦 + 1))
28	27	eleq1d 2819	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
29	26, 28	anbi12d 632	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))))
30		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐸𝑗) = ((𝑥 + 1)𝐸(𝑦 + 1)))
31		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐹𝑗) = ((𝑥 + 1)𝐹(𝑦 + 1)))
32	30, 31	eqeq12d 2751	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1))))
33	29, 32	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1)))))
34		submateq.1	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗))
35	34	3expib 1122	. . . . . . . . 9 ⊢ (𝜑 → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)))
36	23, 24, 33, 35	vtocl2d 3541	. . . . . . . 8 ⊢ (𝜑 → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1))))
37	36	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1))))
38	22, 37	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1)))
39		eqid 2735	. . . . . . 7 ⊢ (𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐸)𝐽)
40	2	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
41	4	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐼 ∈ (1...𝑁))
42	14	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
43		submateq.e	. . . . . . . . 9 ⊢ (𝜑 → 𝐸 ∈ 𝐵)
44		submateq.a	. . . . . . . . . 10 ⊢ 𝐴 = ((1...𝑁) Mat 𝑅)
45		eqid 2735	. . . . . . . . . 10 ⊢ (Base‘𝑅) = (Base‘𝑅)
46		submateq.b	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘𝐴)
47	44, 45, 46	matbas2i 22360	. . . . . . . . 9 ⊢ (𝐸 ∈ 𝐵 → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
48	43, 47	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
49	48	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
50	8	simpld 494	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (𝐼...𝑁))
51	1, 50	syldanl 602	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (𝐼...𝑁))
52	51	adantr 480	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ (𝐼...𝑁))
53	18	simpld 494	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
54	12, 53	syldanl 602	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
55	54	adantlr 715	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
56	39, 40, 40, 41, 42, 49, 52, 55	smatbr 33832	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = ((𝑥 + 1)𝐸(𝑦 + 1)))
57		eqid 2735	. . . . . . 7 ⊢ (𝐼(subMat1‘𝐹)𝐽) = (𝐼(subMat1‘𝐹)𝐽)
58		submateq.f	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 ∈ 𝐵)
59	44, 45, 46	matbas2i 22360	. . . . . . . . 9 ⊢ (𝐹 ∈ 𝐵 → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
60	58, 59	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
61	60	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
62	57, 40, 40, 41, 42, 61, 52, 55	smatbr 33832	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = ((𝑥 + 1)𝐹(𝑦 + 1)))
63	38, 56, 62	3eqtr4d 2780	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
64	10	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
65	2	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
66	14	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
67		simplr 768	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1...(𝑁 − 1)))
68		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 < 𝐽)
69	65, 66, 67, 68	submateqlem2 33839	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → (𝑦 ∈ (1..^𝐽) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
70	69	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
71	12, 70	syldanl 602	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
72	71	adantlr 715	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
73	64, 72	jca 511	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
74		vex 3463	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
75	74	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑦 ∈ V)
76		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → 𝑖 = (𝑥 + 1))
77	76	eleq1d 2819	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
78		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → 𝑗 = 𝑦)
79		eqidd 2736	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((1...𝑁) ∖ {𝐽}) = ((1...𝑁) ∖ {𝐽}))
80	78, 79	eleq12d 2828	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
81	77, 80	anbi12d 632	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))))
82		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖𝐸𝑗) = ((𝑥 + 1)𝐸𝑦))
83		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖𝐹𝑗) = ((𝑥 + 1)𝐹𝑦))
84	82, 83	eqeq12d 2751	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦)))
85	81, 84	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦))))
86	23, 75, 85, 35	vtocl2d 3541	. . . . . . . 8 ⊢ (𝜑 → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦)))
87	86	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦)))
88	73, 87	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦))
89	2	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
90	4	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐼 ∈ (1...𝑁))
91	14	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
92	48	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
93	51	adantr 480	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑥 ∈ (𝐼...𝑁))
94	69	simpld 494	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
95	12, 94	syldanl 602	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
96	95	adantlr 715	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
97	39, 89, 89, 90, 91, 92, 93, 96	smattr 33830	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = ((𝑥 + 1)𝐸𝑦))
98	60	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
99	57, 89, 89, 90, 91, 98, 93, 96	smattr 33830	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = ((𝑥 + 1)𝐹𝑦))
100	88, 97, 99	3eqtr4d 2780	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
101		fz1ssnn 13572	. . . . . . . . . 10 ⊢ (1...𝑁) ⊆ ℕ
102	101, 14	sselid 3956	. . . . . . . . 9 ⊢ (𝜑 → 𝐽 ∈ ℕ)
103	102	nnred 12255	. . . . . . . 8 ⊢ (𝜑 → 𝐽 ∈ ℝ)
104	103	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝐽 ∈ ℝ)
105		fz1ssnn 13572	. . . . . . . . 9 ⊢ (1...(𝑁 − 1)) ⊆ ℕ
106	105, 12	sselid 3956	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ ℕ)
107	106	nnred 12255	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ ℝ)
108		lelttric 11342	. . . . . . 7 ⊢ ((𝐽 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
109	104, 107, 108	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
110	109	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
111	63, 100, 110	mpjaodan 960	. . . 4 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
112	2	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑁 ∈ ℕ)
113	4	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝐼 ∈ (1...𝑁))
114		simplr 768	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1...(𝑁 − 1)))
115		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 < 𝐼)
116	112, 113, 114, 115	submateqlem2 33839	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → (𝑥 ∈ (1..^𝐼) ∧ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
117	116	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
118	1, 117	syldanl 602	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
119	118	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
120	20	adantlr 715	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
121	119, 120	jca 511	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
122		vex 3463	. . . . . . . . . 10 ⊢ 𝑥 ∈ V
123	122	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑥 ∈ V)
124		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → 𝑖 = 𝑥)
125	124	eleq1d 2819	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
126		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → 𝑗 = (𝑦 + 1))
127	126	eleq1d 2819	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
128	125, 127	anbi12d 632	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))))
129		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐸𝑗) = (𝑥𝐸(𝑦 + 1)))
130		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐹𝑗) = (𝑥𝐹(𝑦 + 1)))
131	129, 130	eqeq12d 2751	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1))))
132	128, 131	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1)))))
133	123, 24, 132, 35	vtocl2d 3541	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1))))
134	133	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1))))
135	121, 134	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1)))
136	2	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
137	4	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐼 ∈ (1...𝑁))
138	14	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
139	48	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
140	116	simpld 494	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1..^𝐼))
141	1, 140	syldanl 602	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1..^𝐼))
142	141	adantr 480	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ (1..^𝐼))
143	54	adantlr 715	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
144	39, 136, 136, 137, 138, 139, 142, 143	smatbl 33831	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥𝐸(𝑦 + 1)))
145	60	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
146	57, 136, 136, 137, 138, 145, 142, 143	smatbl 33831	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = (𝑥𝐹(𝑦 + 1)))
147	135, 144, 146	3eqtr4d 2780	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
148	118	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
149	71	adantlr 715	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
150	148, 149	jca 511	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
151		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → 𝑖 = 𝑥)
152	151	eleq1d 2819	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
153		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → 𝑗 = 𝑦)
154	153	eleq1d 2819	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
155	152, 154	anbi12d 632	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))))
156		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖𝐸𝑗) = (𝑥𝐸𝑦))
157		oveq12 7414	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖𝐹𝑗) = (𝑥𝐹𝑦))
158	156, 157	eqeq12d 2751	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
159	155, 158	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦))))
160	123, 75, 159, 35	vtocl2d 3541	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
161	160	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
162	150, 161	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦))
163	2	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
164	4	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐼 ∈ (1...𝑁))
165	14	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
166	48	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
167	141	adantr 480	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑥 ∈ (1..^𝐼))
168	95	adantlr 715	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
169	39, 163, 163, 164, 165, 166, 167, 168	smattl 33829	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥𝐸𝑦))
170	60	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
171	57, 163, 163, 164, 165, 170, 167, 168	smattl 33829	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = (𝑥𝐹𝑦))
172	162, 169, 171	3eqtr4d 2780	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
173	109	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
174	147, 172, 173	mpjaodan 960	. . . 4 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
175	101, 4	sselid 3956	. . . . . . 7 ⊢ (𝜑 → 𝐼 ∈ ℕ)
176	175	nnred 12255	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ ℝ)
177	176	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝐼 ∈ ℝ)
178	105, 1	sselid 3956	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ ℕ)
179	178	nnred 12255	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ ℝ)
180		lelttric 11342	. . . . 5 ⊢ ((𝐼 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝐼 ≤ 𝑥 ∨ 𝑥 < 𝐼))
181	177, 179, 180	syl2anc 584	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝐼 ≤ 𝑥 ∨ 𝑥 < 𝐼))
182	111, 174, 181	mpjaodan 960	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
183	182	ralrimivva 3187	. 2 ⊢ (𝜑 → ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
184		eqid 2735	. . . 4 ⊢ (Base‘((1...(𝑁 − 1)) Mat 𝑅)) = (Base‘((1...(𝑁 − 1)) Mat 𝑅))
185	44, 46, 184, 39, 2, 4, 14, 43	smatcl 33833	. . 3 ⊢ (𝜑 → (𝐼(subMat1‘𝐸)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
186	44, 46, 184, 57, 2, 4, 14, 58	smatcl 33833	. . 3 ⊢ (𝜑 → (𝐼(subMat1‘𝐹)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
187		eqid 2735	. . . 4 ⊢ ((1...(𝑁 − 1)) Mat 𝑅) = ((1...(𝑁 − 1)) Mat 𝑅)
188	187, 184	eqmat 22362	. . 3 ⊢ (((𝐼(subMat1‘𝐸)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)) ∧ (𝐼(subMat1‘𝐹)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅))) → ((𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽) ↔ ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦)))
189	185, 186, 188	syl2anc 584	. 2 ⊢ (𝜑 → ((𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽) ↔ ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦)))
190	183, 189	mpbird 257	1 ⊢ (𝜑 → (𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 847 ∧ w3a 1086 = wceq 1540 ∈ wcel 2108 ∀wral 3051 Vcvv 3459 ∖ cdif 3923 {csn 4601 class class class wbr 5119 × cxp 5652 ‘cfv 6531 (class class class)co 7405 ↑_m cmap 8840 ℝcr 11128 1c1 11130 + caddc 11132 < clt 11269 ≤ cle 11270 − cmin 11466 ℕcn 12240 ...cfz 13524 ..^cfzo 13671 Basecbs 17228 Mat cmat 22345 subMat1csmat 33824

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2707 ax-rep 5249 ax-sep 5266 ax-nul 5276 ax-pow 5335 ax-pr 5402 ax-un 7729 ax-cnex 11185 ax-resscn 11186 ax-1cn 11187 ax-icn 11188 ax-addcl 11189 ax-addrcl 11190 ax-mulcl 11191 ax-mulrcl 11192 ax-mulcom 11193 ax-addass 11194 ax-mulass 11195 ax-distr 11196 ax-i2m1 11197 ax-1ne0 11198 ax-1rid 11199 ax-rnegex 11200 ax-rrecex 11201 ax-cnre 11202 ax-pre-lttri 11203 ax-pre-lttrn 11204 ax-pre-ltadd 11205 ax-pre-mulgt0 11206

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2539 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2809 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3061 df-reu 3360 df-rab 3416 df-v 3461 df-sbc 3766 df-csb 3875 df-dif 3929 df-un 3931 df-in 3933 df-ss 3943 df-pss 3946 df-nul 4309 df-if 4501 df-pw 4577 df-sn 4602 df-pr 4604 df-tp 4606 df-op 4608 df-ot 4610 df-uni 4884 df-iun 4969 df-br 5120 df-opab 5182 df-mpt 5202 df-tr 5230 df-id 5548 df-eprel 5553 df-po 5561 df-so 5562 df-fr 5606 df-we 5608 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 6290 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6484 df-fun 6533 df-fn 6534 df-f 6535 df-f1 6536 df-fo 6537 df-f1o 6538 df-fv 6539 df-riota 7362 df-ov 7408 df-oprab 7409 df-mpo 7410 df-om 7862 df-1st 7988 df-2nd 7989 df-supp 8160 df-frecs 8280 df-wrecs 8311 df-recs 8385 df-rdg 8424 df-1o 8480 df-er 8719 df-map 8842 df-ixp 8912 df-en 8960 df-dom 8961 df-sdom 8962 df-fin 8963 df-fsupp 9374 df-sup 9454 df-pnf 11271 df-mnf 11272 df-xr 11273 df-ltxr 11274 df-le 11275 df-sub 11468 df-neg 11469 df-nn 12241 df-2 12303 df-3 12304 df-4 12305 df-5 12306 df-6 12307 df-7 12308 df-8 12309 df-9 12310 df-n0 12502 df-z 12589 df-dec 12709 df-uz 12853 df-fz 13525 df-fzo 13672 df-struct 17166 df-sets 17183 df-slot 17201 df-ndx 17213 df-base 17229 df-ress 17252 df-plusg 17284 df-mulr 17285 df-sca 17287 df-vsca 17288 df-ip 17289 df-tset 17290 df-ple 17291 df-ds 17293 df-hom 17295 df-cco 17296 df-0g 17455 df-prds 17461 df-pws 17463 df-sra 21131 df-rgmod 21132 df-dsmm 21692 df-frlm 21707 df-mat 22346 df-smat 33825

This theorem is referenced by: submatminr1 33841

W3C validator