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 33969

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 771	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ (1...(𝑁 − 1)))
2		submateq.n	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℕ)
3	2	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑁 ∈ ℕ)
4		submateq.i	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ (1...𝑁))
5	4	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝐼 ∈ (1...𝑁))
6		simplr 769	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (1...(𝑁 − 1)))
7		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝐼 ≤ 𝑥)
8	3, 5, 6, 7	submateqlem1 33967	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → (𝑥 ∈ (𝐼...𝑁) ∧ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
9	8	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
10	1, 9	syldanl 603	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
11	10	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
12		simprr 773	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ (1...(𝑁 − 1)))
13	2	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
14		submateq.j	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ∈ (1...𝑁))
15	14	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
16		simplr 769	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (1...(𝑁 − 1)))
17		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝐽 ≤ 𝑦)
18	13, 15, 16, 17	submateqlem1 33967	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → (𝑦 ∈ (𝐽...𝑁) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
19	18	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
20	12, 19	syldanl 603	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
21	20	adantlr 716	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
22	11, 21	jca 511	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
23		ovexd 7395	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 + 1) ∈ V)
24		ovexd 7395	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 + 1) ∈ V)
25		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → 𝑖 = (𝑥 + 1))
26	25	eleq1d 2822	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
27		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → 𝑗 = (𝑦 + 1))
28	27	eleq1d 2822	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
29	26, 28	anbi12d 633	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))))
30		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐸𝑗) = ((𝑥 + 1)𝐸(𝑦 + 1)))
31		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐹𝑗) = ((𝑥 + 1)𝐹(𝑦 + 1)))
32	30, 31	eqeq12d 2753	. . . . . . . . . 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 1123	. . . . . . . . 9 ⊢ (𝜑 → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)))
36	23, 24, 33, 35	vtocl2d 3508	. . . . . . . 8 ⊢ (𝜑 → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1))))
37	36	ad3antrrr 731	. . . . . . 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 2737	. . . . . . 7 ⊢ (𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐸)𝐽)
40	2	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
41	4	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐼 ∈ (1...𝑁))
42	14	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
43		submateq.e	. . . . . . . . 9 ⊢ (𝜑 → 𝐸 ∈ 𝐵)
44		submateq.a	. . . . . . . . . 10 ⊢ 𝐴 = ((1...𝑁) Mat 𝑅)
45		eqid 2737	. . . . . . . . . 10 ⊢ (Base‘𝑅) = (Base‘𝑅)
46		submateq.b	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘𝐴)
47	44, 45, 46	matbas2i 22397	. . . . . . . . 9 ⊢ (𝐸 ∈ 𝐵 → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
48	43, 47	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
49	48	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
50	8	simpld 494	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (𝐼...𝑁))
51	1, 50	syldanl 603	. . . . . . . 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 603	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
55	54	adantlr 716	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
56	39, 40, 40, 41, 42, 49, 52, 55	smatbr 33961	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = ((𝑥 + 1)𝐸(𝑦 + 1)))
57		eqid 2737	. . . . . . 7 ⊢ (𝐼(subMat1‘𝐹)𝐽) = (𝐼(subMat1‘𝐹)𝐽)
58		submateq.f	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 ∈ 𝐵)
59	44, 45, 46	matbas2i 22397	. . . . . . . . 9 ⊢ (𝐹 ∈ 𝐵 → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
60	58, 59	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
61	60	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
62	57, 40, 40, 41, 42, 61, 52, 55	smatbr 33961	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = ((𝑥 + 1)𝐹(𝑦 + 1)))
63	38, 56, 62	3eqtr4d 2782	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
64	10	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
65	2	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
66	14	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
67		simplr 769	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1...(𝑁 − 1)))
68		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 < 𝐽)
69	65, 66, 67, 68	submateqlem2 33968	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → (𝑦 ∈ (1..^𝐽) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
70	69	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
71	12, 70	syldanl 603	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
72	71	adantlr 716	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
73	64, 72	jca 511	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
74		vex 3434	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
75	74	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑦 ∈ V)
76		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → 𝑖 = (𝑥 + 1))
77	76	eleq1d 2822	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
78		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → 𝑗 = 𝑦)
79		eqidd 2738	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((1...𝑁) ∖ {𝐽}) = ((1...𝑁) ∖ {𝐽}))
80	78, 79	eleq12d 2831	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
81	77, 80	anbi12d 633	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))))
82		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖𝐸𝑗) = ((𝑥 + 1)𝐸𝑦))
83		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖𝐹𝑗) = ((𝑥 + 1)𝐹𝑦))
84	82, 83	eqeq12d 2753	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦)))
85	81, 84	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦))))
86	23, 75, 85, 35	vtocl2d 3508	. . . . . . . 8 ⊢ (𝜑 → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦)))
87	86	ad3antrrr 731	. . . . . . 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 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
90	4	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐼 ∈ (1...𝑁))
91	14	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
92	48	ad3antrrr 731	. . . . . . 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 603	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
96	95	adantlr 716	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
97	39, 89, 89, 90, 91, 92, 93, 96	smattr 33959	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = ((𝑥 + 1)𝐸𝑦))
98	60	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
99	57, 89, 89, 90, 91, 98, 93, 96	smattr 33959	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = ((𝑥 + 1)𝐹𝑦))
100	88, 97, 99	3eqtr4d 2782	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
101		fz1ssnn 13500	. . . . . . . . . 10 ⊢ (1...𝑁) ⊆ ℕ
102	101, 14	sselid 3920	. . . . . . . . 9 ⊢ (𝜑 → 𝐽 ∈ ℕ)
103	102	nnred 12180	. . . . . . . 8 ⊢ (𝜑 → 𝐽 ∈ ℝ)
104	103	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝐽 ∈ ℝ)
105		fz1ssnn 13500	. . . . . . . . 9 ⊢ (1...(𝑁 − 1)) ⊆ ℕ
106	105, 12	sselid 3920	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ ℕ)
107	106	nnred 12180	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ ℝ)
108		lelttric 11244	. . . . . . 7 ⊢ ((𝐽 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
109	104, 107, 108	syl2anc 585	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
110	109	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
111	63, 100, 110	mpjaodan 961	. . . 4 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
112	2	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑁 ∈ ℕ)
113	4	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝐼 ∈ (1...𝑁))
114		simplr 769	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1...(𝑁 − 1)))
115		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 < 𝐼)
116	112, 113, 114, 115	submateqlem2 33968	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → (𝑥 ∈ (1..^𝐼) ∧ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
117	116	simprd 495	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
118	1, 117	syldanl 603	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
119	118	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
120	20	adantlr 716	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
121	119, 120	jca 511	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
122		vex 3434	. . . . . . . . . 10 ⊢ 𝑥 ∈ V
123	122	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑥 ∈ V)
124		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → 𝑖 = 𝑥)
125	124	eleq1d 2822	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
126		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → 𝑗 = (𝑦 + 1))
127	126	eleq1d 2822	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
128	125, 127	anbi12d 633	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))))
129		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐸𝑗) = (𝑥𝐸(𝑦 + 1)))
130		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐹𝑗) = (𝑥𝐹(𝑦 + 1)))
131	129, 130	eqeq12d 2753	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1))))
132	128, 131	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1)))))
133	123, 24, 132, 35	vtocl2d 3508	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1))))
134	133	ad3antrrr 731	. . . . . . 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 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
137	4	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐼 ∈ (1...𝑁))
138	14	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
139	48	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
140	116	simpld 494	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1..^𝐼))
141	1, 140	syldanl 603	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1..^𝐼))
142	141	adantr 480	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ (1..^𝐼))
143	54	adantlr 716	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
144	39, 136, 136, 137, 138, 139, 142, 143	smatbl 33960	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥𝐸(𝑦 + 1)))
145	60	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
146	57, 136, 136, 137, 138, 145, 142, 143	smatbl 33960	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = (𝑥𝐹(𝑦 + 1)))
147	135, 144, 146	3eqtr4d 2782	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
148	118	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
149	71	adantlr 716	. . . . . . . 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 2822	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
153		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → 𝑗 = 𝑦)
154	153	eleq1d 2822	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
155	152, 154	anbi12d 633	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))))
156		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖𝐸𝑗) = (𝑥𝐸𝑦))
157		oveq12 7369	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖𝐹𝑗) = (𝑥𝐹𝑦))
158	156, 157	eqeq12d 2753	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
159	155, 158	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦))))
160	123, 75, 159, 35	vtocl2d 3508	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
161	160	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
162	150, 161	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦))
163	2	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
164	4	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐼 ∈ (1...𝑁))
165	14	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
166	48	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
167	141	adantr 480	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑥 ∈ (1..^𝐼))
168	95	adantlr 716	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
169	39, 163, 163, 164, 165, 166, 167, 168	smattl 33958	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥𝐸𝑦))
170	60	ad3antrrr 731	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
171	57, 163, 163, 164, 165, 170, 167, 168	smattl 33958	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = (𝑥𝐹𝑦))
172	162, 169, 171	3eqtr4d 2782	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
173	109	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
174	147, 172, 173	mpjaodan 961	. . . 4 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
175	101, 4	sselid 3920	. . . . . . 7 ⊢ (𝜑 → 𝐼 ∈ ℕ)
176	175	nnred 12180	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ ℝ)
177	176	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝐼 ∈ ℝ)
178	105, 1	sselid 3920	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ ℕ)
179	178	nnred 12180	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ ℝ)
180		lelttric 11244	. . . . 5 ⊢ ((𝐼 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝐼 ≤ 𝑥 ∨ 𝑥 < 𝐼))
181	177, 179, 180	syl2anc 585	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝐼 ≤ 𝑥 ∨ 𝑥 < 𝐼))
182	111, 174, 181	mpjaodan 961	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
183	182	ralrimivva 3181	. 2 ⊢ (𝜑 → ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
184		eqid 2737	. . . 4 ⊢ (Base‘((1...(𝑁 − 1)) Mat 𝑅)) = (Base‘((1...(𝑁 − 1)) Mat 𝑅))
185	44, 46, 184, 39, 2, 4, 14, 43	smatcl 33962	. . 3 ⊢ (𝜑 → (𝐼(subMat1‘𝐸)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
186	44, 46, 184, 57, 2, 4, 14, 58	smatcl 33962	. . 3 ⊢ (𝜑 → (𝐼(subMat1‘𝐹)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
187		eqid 2737	. . . 4 ⊢ ((1...(𝑁 − 1)) Mat 𝑅) = ((1...(𝑁 − 1)) Mat 𝑅)
188	187, 184	eqmat 22399	. . 3 ⊢ (((𝐼(subMat1‘𝐸)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)) ∧ (𝐼(subMat1‘𝐹)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅))) → ((𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽) ↔ ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦)))
189	185, 186, 188	syl2anc 585	. 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 848 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ∀wral 3052 Vcvv 3430 ∖ cdif 3887 {csn 4568 class class class wbr 5086 × cxp 5622 ‘cfv 6492 (class class class)co 7360 ↑_m cmap 8766 ℝcr 11028 1c1 11030 + caddc 11032 < clt 11170 ≤ cle 11171 − cmin 11368 ℕcn 12165 ...cfz 13452 ..^cfzo 13599 Basecbs 17170 Mat cmat 22382 subMat1csmat 33953

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5302 ax-pr 5370 ax-un 7682 ax-cnex 11085 ax-resscn 11086 ax-1cn 11087 ax-icn 11088 ax-addcl 11089 ax-addrcl 11090 ax-mulcl 11091 ax-mulrcl 11092 ax-mulcom 11093 ax-addass 11094 ax-mulass 11095 ax-distr 11096 ax-i2m1 11097 ax-1ne0 11098 ax-1rid 11099 ax-rnegex 11100 ax-rrecex 11101 ax-cnre 11102 ax-pre-lttri 11103 ax-pre-lttrn 11104 ax-pre-ltadd 11105 ax-pre-mulgt0 11106

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-tp 4573 df-op 4575 df-ot 4577 df-uni 4852 df-iun 4936 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5519 df-eprel 5524 df-po 5532 df-so 5533 df-fr 5577 df-we 5579 df-xp 5630 df-rel 5631 df-cnv 5632 df-co 5633 df-dm 5634 df-rn 5635 df-res 5636 df-ima 5637 df-pred 6259 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-riota 7317 df-ov 7363 df-oprab 7364 df-mpo 7365 df-om 7811 df-1st 7935 df-2nd 7936 df-supp 8104 df-frecs 8224 df-wrecs 8255 df-recs 8304 df-rdg 8342 df-1o 8398 df-er 8636 df-map 8768 df-ixp 8839 df-en 8887 df-dom 8888 df-sdom 8889 df-fin 8890 df-fsupp 9268 df-sup 9348 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-nn 12166 df-2 12235 df-3 12236 df-4 12237 df-5 12238 df-6 12239 df-7 12240 df-8 12241 df-9 12242 df-n0 12429 df-z 12516 df-dec 12636 df-uz 12780 df-fz 13453 df-fzo 13600 df-struct 17108 df-sets 17125 df-slot 17143 df-ndx 17155 df-base 17171 df-ress 17192 df-plusg 17224 df-mulr 17225 df-sca 17227 df-vsca 17228 df-ip 17229 df-tset 17230 df-ple 17231 df-ds 17233 df-hom 17235 df-cco 17236 df-0g 17395 df-prds 17401 df-pws 17403 df-sra 21160 df-rgmod 21161 df-dsmm 21722 df-frlm 21737 df-mat 22383 df-smat 33954

This theorem is referenced by: submatminr1 33970

W3C validator