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 34066

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 780	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ (1...(𝑁 − 1)))
2		submateq.n	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℕ)
3	2	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑁 ∈ ℕ)
4		submateq.i	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ (1...𝑁))
5	4	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝐼 ∈ (1...𝑁))
6		simplr 778	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (1...(𝑁 − 1)))
7		simpr 488	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝐼 ≤ 𝑥)
8	3, 5, 6, 7	submateqlem1 34064	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → (𝑥 ∈ (𝐼...𝑁) ∧ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
9	8	simprd 499	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
10	1, 9	syldanl 611	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
11	10	adantr 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
12		simprr 782	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ (1...(𝑁 − 1)))
13	2	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
14		submateq.j	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ∈ (1...𝑁))
15	14	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
16		simplr 778	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (1...(𝑁 − 1)))
17		simpr 488	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝐽 ≤ 𝑦)
18	13, 15, 16, 17	submateqlem1 34064	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → (𝑦 ∈ (𝐽...𝑁) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
19	18	simprd 499	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
20	12, 19	syldanl 611	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
21	20	adantlr 725	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
22	11, 21	jca 519	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
23		ovexd 7425	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 + 1) ∈ V)
24		ovexd 7425	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 + 1) ∈ V)
25		simpl 486	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → 𝑖 = (𝑥 + 1))
26	25	eleq1d 2846	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
27		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → 𝑗 = (𝑦 + 1))
28	27	eleq1d 2846	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
29	26, 28	anbi12d 641	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))))
30		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐸𝑗) = ((𝑥 + 1)𝐸(𝑦 + 1)))
31		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐹𝑗) = ((𝑥 + 1)𝐹(𝑦 + 1)))
32	30, 31	eqeq12d 2777	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1))))
33	29, 32	imbi12d 346	. . . . . . . . 9 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = (𝑦 + 1)) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1)))))
34		submateq.1	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗))
35	34	3expib 1134	. . . . . . . . 9 ⊢ (𝜑 → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)))
36	23, 24, 33, 35	vtocl2d 3527	. . . . . . . 8 ⊢ (𝜑 → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸(𝑦 + 1)) = ((𝑥 + 1)𝐹(𝑦 + 1))))
37	36	ad3antrrr 740	. . . . . . 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 2761	. . . . . . 7 ⊢ (𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐸)𝐽)
40	2	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
41	4	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐼 ∈ (1...𝑁))
42	14	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
43		submateq.e	. . . . . . . . 9 ⊢ (𝜑 → 𝐸 ∈ 𝐵)
44		submateq.a	. . . . . . . . . 10 ⊢ 𝐴 = ((1...𝑁) Mat 𝑅)
45		eqid 2761	. . . . . . . . . 10 ⊢ (Base‘𝑅) = (Base‘𝑅)
46		submateq.b	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘𝐴)
47	44, 45, 46	matbas2i 22469	. . . . . . . . 9 ⊢ (𝐸 ∈ 𝐵 → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
48	43, 47	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
49	48	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
50	8	simpld 498	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (𝐼...𝑁))
51	1, 50	syldanl 611	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → 𝑥 ∈ (𝐼...𝑁))
52	51	adantr 484	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ (𝐼...𝑁))
53	18	simpld 498	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
54	12, 53	syldanl 611	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
55	54	adantlr 725	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
56	39, 40, 40, 41, 42, 49, 52, 55	smatbr 34058	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = ((𝑥 + 1)𝐸(𝑦 + 1)))
57		eqid 2761	. . . . . . 7 ⊢ (𝐼(subMat1‘𝐹)𝐽) = (𝐼(subMat1‘𝐹)𝐽)
58		submateq.f	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 ∈ 𝐵)
59	44, 45, 46	matbas2i 22469	. . . . . . . . 9 ⊢ (𝐹 ∈ 𝐵 → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
60	58, 59	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
61	60	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
62	57, 40, 40, 41, 42, 61, 52, 55	smatbr 34058	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = ((𝑥 + 1)𝐹(𝑦 + 1)))
63	38, 56, 62	3eqtr4d 2806	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
64	10	adantr 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}))
65	2	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
66	14	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
67		simplr 778	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1...(𝑁 − 1)))
68		simpr 488	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 < 𝐽)
69	65, 66, 67, 68	submateqlem2 34065	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → (𝑦 ∈ (1..^𝐽) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
70	69	simprd 499	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
71	12, 70	syldanl 611	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
72	71	adantlr 725	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
73	64, 72	jca 519	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
74		vex 3457	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
75	74	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑦 ∈ V)
76		simpl 486	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → 𝑖 = (𝑥 + 1))
77	76	eleq1d 2846	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ (𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼})))
78		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → 𝑗 = 𝑦)
79		eqidd 2762	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((1...𝑁) ∖ {𝐽}) = ((1...𝑁) ∖ {𝐽}))
80	78, 79	eleq12d 2855	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
81	77, 80	anbi12d 641	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ ((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))))
82		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖𝐸𝑗) = ((𝑥 + 1)𝐸𝑦))
83		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (𝑖𝐹𝑗) = ((𝑥 + 1)𝐹𝑦))
84	82, 83	eqeq12d 2777	. . . . . . . . . 10 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦)))
85	81, 84	imbi12d 346	. . . . . . . . 9 ⊢ ((𝑖 = (𝑥 + 1) ∧ 𝑗 = 𝑦) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦))))
86	23, 75, 85, 35	vtocl2d 3527	. . . . . . . 8 ⊢ (𝜑 → (((𝑥 + 1) ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → ((𝑥 + 1)𝐸𝑦) = ((𝑥 + 1)𝐹𝑦)))
87	86	ad3antrrr 740	. . . . . . 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 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
90	4	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐼 ∈ (1...𝑁))
91	14	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
92	48	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
93	51	adantr 484	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑥 ∈ (𝐼...𝑁))
94	69	simpld 498	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ (1...(𝑁 − 1))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
95	12, 94	syldanl 611	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
96	95	adantlr 725	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
97	39, 89, 89, 90, 91, 92, 93, 96	smattr 34056	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = ((𝑥 + 1)𝐸𝑦))
98	60	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
99	57, 89, 89, 90, 91, 98, 93, 96	smattr 34056	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = ((𝑥 + 1)𝐹𝑦))
100	88, 97, 99	3eqtr4d 2806	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
101		fz1ssnn 13553	. . . . . . . . . 10 ⊢ (1...𝑁) ⊆ ℕ
102	101, 14	sselid 3932	. . . . . . . . 9 ⊢ (𝜑 → 𝐽 ∈ ℕ)
103	102	nnred 12218	. . . . . . . 8 ⊢ (𝜑 → 𝐽 ∈ ℝ)
104	103	adantr 484	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝐽 ∈ ℝ)
105		fz1ssnn 13553	. . . . . . . . 9 ⊢ (1...(𝑁 − 1)) ⊆ ℕ
106	105, 12	sselid 3932	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ ℕ)
107	106	nnred 12218	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑦 ∈ ℝ)
108		lelttric 11283	. . . . . . 7 ⊢ ((𝐽 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
109	104, 107, 108	syl2anc 593	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
110	109	adantr 484	. . . . 5 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
111	63, 100, 110	mpjaodan 971	. . . 4 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝐼 ≤ 𝑥) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
112	2	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑁 ∈ ℕ)
113	4	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝐼 ∈ (1...𝑁))
114		simplr 778	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1...(𝑁 − 1)))
115		simpr 488	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 < 𝐼)
116	112, 113, 114, 115	submateqlem2 34065	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → (𝑥 ∈ (1..^𝐼) ∧ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
117	116	simprd 499	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
118	1, 117	syldanl 611	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
119	118	adantr 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
120	20	adantlr 725	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))
121	119, 120	jca 519	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
122		vex 3457	. . . . . . . . . 10 ⊢ 𝑥 ∈ V
123	122	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑥 ∈ V)
124		simpl 486	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → 𝑖 = 𝑥)
125	124	eleq1d 2846	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
126		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → 𝑗 = (𝑦 + 1))
127	126	eleq1d 2846	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})))
128	125, 127	anbi12d 641	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽}))))
129		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐸𝑗) = (𝑥𝐸(𝑦 + 1)))
130		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (𝑖𝐹𝑗) = (𝑥𝐹(𝑦 + 1)))
131	129, 130	eqeq12d 2777	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1))))
132	128, 131	imbi12d 346	. . . . . . . . 9 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = (𝑦 + 1)) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1)))))
133	123, 24, 132, 35	vtocl2d 3527	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ (𝑦 + 1) ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸(𝑦 + 1)) = (𝑥𝐹(𝑦 + 1))))
134	133	ad3antrrr 740	. . . . . . 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 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑁 ∈ ℕ)
137	4	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐼 ∈ (1...𝑁))
138	14	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐽 ∈ (1...𝑁))
139	48	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
140	116	simpld 498	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1...(𝑁 − 1))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1..^𝐼))
141	1, 140	syldanl 611	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → 𝑥 ∈ (1..^𝐼))
142	141	adantr 484	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑥 ∈ (1..^𝐼))
143	54	adantlr 725	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝑦 ∈ (𝐽...𝑁))
144	39, 136, 136, 137, 138, 139, 142, 143	smatbl 34057	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥𝐸(𝑦 + 1)))
145	60	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
146	57, 136, 136, 137, 138, 145, 142, 143	smatbl 34057	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = (𝑥𝐹(𝑦 + 1)))
147	135, 144, 146	3eqtr4d 2806	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝐽 ≤ 𝑦) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
148	118	adantr 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑥 ∈ ((1...𝑁) ∖ {𝐼}))
149	71	adantlr 725	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))
150	148, 149	jca 519	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
151		simpl 486	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → 𝑖 = 𝑥)
152	151	eleq1d 2846	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ↔ 𝑥 ∈ ((1...𝑁) ∖ {𝐼})))
153		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → 𝑗 = 𝑦)
154	153	eleq1d 2846	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑗 ∈ ((1...𝑁) ∖ {𝐽}) ↔ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})))
155	152, 154	anbi12d 641	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → ((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) ↔ (𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽}))))
156		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖𝐸𝑗) = (𝑥𝐸𝑦))
157		oveq12 7399	. . . . . . . . . . 11 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (𝑖𝐹𝑗) = (𝑥𝐹𝑦))
158	156, 157	eqeq12d 2777	. . . . . . . . . 10 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → ((𝑖𝐸𝑗) = (𝑖𝐹𝑗) ↔ (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
159	155, 158	imbi12d 346	. . . . . . . . 9 ⊢ ((𝑖 = 𝑥 ∧ 𝑗 = 𝑦) → (((𝑖 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑗 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑖𝐸𝑗) = (𝑖𝐹𝑗)) ↔ ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦))))
160	123, 75, 159, 35	vtocl2d 3527	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
161	160	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → ((𝑥 ∈ ((1...𝑁) ∖ {𝐼}) ∧ 𝑦 ∈ ((1...𝑁) ∖ {𝐽})) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦)))
162	150, 161	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥𝐸𝑦) = (𝑥𝐹𝑦))
163	2	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑁 ∈ ℕ)
164	4	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐼 ∈ (1...𝑁))
165	14	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐽 ∈ (1...𝑁))
166	48	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐸 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
167	141	adantr 484	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑥 ∈ (1..^𝐼))
168	95	adantlr 725	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝑦 ∈ (1..^𝐽))
169	39, 163, 163, 164, 165, 166, 167, 168	smattl 34055	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥𝐸𝑦))
170	60	ad3antrrr 740	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → 𝐹 ∈ ((Base‘𝑅) ↑_m ((1...𝑁) × (1...𝑁))))
171	57, 163, 163, 164, 165, 170, 167, 168	smattl 34055	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦) = (𝑥𝐹𝑦))
172	162, 169, 171	3eqtr4d 2806	. . . . 5 ⊢ ((((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) ∧ 𝑦 < 𝐽) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
173	109	adantr 484	. . . . 5 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → (𝐽 ≤ 𝑦 ∨ 𝑦 < 𝐽))
174	147, 172, 173	mpjaodan 971	. . . 4 ⊢ (((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) ∧ 𝑥 < 𝐼) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
175	101, 4	sselid 3932	. . . . . . 7 ⊢ (𝜑 → 𝐼 ∈ ℕ)
176	175	nnred 12218	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ ℝ)
177	176	adantr 484	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝐼 ∈ ℝ)
178	105, 1	sselid 3932	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ ℕ)
179	178	nnred 12218	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → 𝑥 ∈ ℝ)
180		lelttric 11283	. . . . 5 ⊢ ((𝐼 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝐼 ≤ 𝑥 ∨ 𝑥 < 𝐼))
181	177, 179, 180	syl2anc 593	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝐼 ≤ 𝑥 ∨ 𝑥 < 𝐼))
182	111, 174, 181	mpjaodan 971	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...(𝑁 − 1)) ∧ 𝑦 ∈ (1...(𝑁 − 1)))) → (𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
183	182	ralrimivva 3204	. 2 ⊢ (𝜑 → ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦))
184		eqid 2761	. . . 4 ⊢ (Base‘((1...(𝑁 − 1)) Mat 𝑅)) = (Base‘((1...(𝑁 − 1)) Mat 𝑅))
185	44, 46, 184, 39, 2, 4, 14, 43	smatcl 34059	. . 3 ⊢ (𝜑 → (𝐼(subMat1‘𝐸)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
186	44, 46, 184, 57, 2, 4, 14, 58	smatcl 34059	. . 3 ⊢ (𝜑 → (𝐼(subMat1‘𝐹)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)))
187		eqid 2761	. . . 4 ⊢ ((1...(𝑁 − 1)) Mat 𝑅) = ((1...(𝑁 − 1)) Mat 𝑅)
188	187, 184	eqmat 22471	. . 3 ⊢ (((𝐼(subMat1‘𝐸)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅)) ∧ (𝐼(subMat1‘𝐹)𝐽) ∈ (Base‘((1...(𝑁 − 1)) Mat 𝑅))) → ((𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽) ↔ ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦)))
189	185, 186, 188	syl2anc 593	. 2 ⊢ (𝜑 → ((𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽) ↔ ∀𝑥 ∈ (1...(𝑁 − 1))∀𝑦 ∈ (1...(𝑁 − 1))(𝑥(𝐼(subMat1‘𝐸)𝐽)𝑦) = (𝑥(𝐼(subMat1‘𝐹)𝐽)𝑦)))
190	183, 189	mpbird 259	1 ⊢ (𝜑 → (𝐼(subMat1‘𝐸)𝐽) = (𝐼(subMat1‘𝐹)𝐽))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 399 ∨ wo 858 ∧ w3a 1097 = wceq 1559 ∈ wcel 2141 ∀wral 3075 Vcvv 3453 ∖ cdif 3899 {csn 4579 class class class wbr 5097 × cxp 5641 ‘cfv 6515 (class class class)co 7390 ↑_m cmap 8801 ℝcr 11065 1c1 11067 + caddc 11069 < clt 11209 ≤ cle 11210 − cmin 11407 ℕcn 12203 ...cfz 13505 ..^cfzo 13652 Basecbs 17235 Mat cmat 22454 subMat1csmat 34050

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1814 ax-4 1828 ax-5 1929 ax-6 1986 ax-7 2027 ax-8 2143 ax-9 2151 ax-10 2174 ax-11 2190 ax-12 2211 ax-ext 2733 ax-rep 5224 ax-sep 5243 ax-nul 5253 ax-pow 5319 ax-pr 5387 ax-un 7712 ax-cnex 11122 ax-resscn 11123 ax-1cn 11124 ax-icn 11125 ax-addcl 11126 ax-addrcl 11127 ax-mulcl 11128 ax-mulrcl 11129 ax-mulcom 11130 ax-addass 11131 ax-mulass 11132 ax-distr 11133 ax-i2m1 11134 ax-1ne0 11135 ax-1rid 11136 ax-rnegex 11137 ax-rrecex 11138 ax-cnre 11139 ax-pre-lttri 11140 ax-pre-lttrn 11141 ax-pre-ltadd 11142 ax-pre-mulgt0 11143

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1098 df-3an 1099 df-tru 1562 df-fal 1572 df-ex 1799 df-nf 1803 df-sb 2090 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3061 df-ral 3076 df-rex 3086 df-reu 3367 df-rab 3414 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4284 df-if 4478 df-pw 4554 df-sn 4580 df-pr 4582 df-tp 4584 df-op 4586 df-ot 4588 df-uni 4863 df-iun 4948 df-br 5098 df-opab 5160 df-mpt 5179 df-tr 5205 df-id 5538 df-eprel 5543 df-po 5551 df-so 5552 df-fr 5596 df-we 5598 df-xp 5649 df-rel 5650 df-cnv 5651 df-co 5652 df-dm 5653 df-rn 5654 df-res 5655 df-ima 5656 df-pred 6282 df-ord 6343 df-on 6344 df-lim 6345 df-suc 6346 df-iota 6471 df-fun 6517 df-fn 6518 df-f 6519 df-f1 6520 df-fo 6521 df-f1o 6522 df-fv 6523 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-om 7841 df-1st 7964 df-2nd 7965 df-supp 8134 df-frecs 8255 df-wrecs 8286 df-recs 8335 df-rdg 8374 df-1o 8430 df-er 8671 df-map 8803 df-ixp 8873 df-en 8921 df-dom 8922 df-sdom 8923 df-fin 8924 df-fsupp 9301 df-sup 9381 df-pnf 11211 df-mnf 11212 df-xr 11213 df-ltxr 11214 df-le 11215 df-sub 11409 df-neg 11410 df-nn 12204 df-2 12273 df-3 12274 df-4 12275 df-5 12276 df-6 12277 df-7 12278 df-8 12279 df-9 12280 df-n0 12475 df-z 12562 df-dec 12682 df-uz 12833 df-fz 13506 df-fzo 13653 df-struct 17173 df-sets 17190 df-slot 17208 df-ndx 17220 df-base 17236 df-ress 17257 df-plusg 17289 df-mulr 17290 df-sca 17292 df-vsca 17293 df-ip 17294 df-tset 17295 df-ple 17296 df-ds 17298 df-hom 17300 df-cco 17301 df-0g 17460 df-prds 17466 df-pws 17468 df-sra 21227 df-rgmod 21228 df-dsmm 21771 df-frlm 21786 df-mat 22455 df-smat 34051

This theorem is referenced by: submatminr1 34067

W3C validator