relexpmulg - Mathbox for Richard Penner

	Mathbox for Richard Penner		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > relexpmulg		Structured version Visualization version GIF version

Theorem relexpmulg 41972

Description: With ordered exponents, the composition of powers of a relation is the relation raised to the product of exponents. (Contributed by RP, 13-Jun-2020.)

**Assertion**
Ref	Expression
relexpmulg	⊢ (((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) ∧ (𝐽 ∈ ℕ₀ ∧ 𝐾 ∈ ℕ₀)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))

**Proof of Theorem relexpmulg**
Step	Hyp	Ref	Expression
1		elnn0 12415	. . . 4 ⊢ (𝐽 ∈ ℕ₀ ↔ (𝐽 ∈ ℕ ∨ 𝐽 = 0))
2		elnn0 12415	. . . . . 6 ⊢ (𝐾 ∈ ℕ₀ ↔ (𝐾 ∈ ℕ ∨ 𝐾 = 0))
3		relexpmulnn 41971	. . . . . . . . . 10 ⊢ (((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾)) ∧ (𝐽 ∈ ℕ ∧ 𝐾 ∈ ℕ)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))
4	3	3adantl3 1168	. . . . . . . . 9 ⊢ (((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) ∧ (𝐽 ∈ ℕ ∧ 𝐾 ∈ ℕ)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))
5	4	expcom 414	. . . . . . . 8 ⊢ ((𝐽 ∈ ℕ ∧ 𝐾 ∈ ℕ) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
6	5	expcom 414	. . . . . . 7 ⊢ (𝐾 ∈ ℕ → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
7		simprr 771	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐼 = (𝐽 · 𝐾))
8		simpll 765	. . . . . . . . . . . . . 14 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐾 = 0)
9	8	oveq2d 7373	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐽 · 𝐾) = (𝐽 · 0))
10		simplr 767	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐽 ∈ ℕ)
11	10	nncnd 12169	. . . . . . . . . . . . . 14 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐽 ∈ ℂ)
12	11	mul01d 11354	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐽 · 0) = 0)
13	7, 9, 12	3eqtrd 2780	. . . . . . . . . . . 12 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐼 = 0)
14		simpl 483	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐾 = 0 ∧ 𝐽 ∈ ℕ))
15		nnnle0 12186	. . . . . . . . . . . . . . 15 ⊢ (𝐽 ∈ ℕ → ¬ 𝐽 ≤ 0)
16	15	adantl 482	. . . . . . . . . . . . . 14 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → ¬ 𝐽 ≤ 0)
17		simpl 483	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → 𝐾 = 0)
18	17	breq2d 5117	. . . . . . . . . . . . . 14 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → (𝐽 ≤ 𝐾 ↔ 𝐽 ≤ 0))
19	16, 18	mtbird 324	. . . . . . . . . . . . 13 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → ¬ 𝐽 ≤ 𝐾)
20	14, 19	syl 17	. . . . . . . . . . . 12 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → ¬ 𝐽 ≤ 𝐾)
21	13, 20	jcnd 163	. . . . . . . . . . 11 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → ¬ (𝐼 = 0 → 𝐽 ≤ 𝐾))
22	21	pm2.21d 121	. . . . . . . . . 10 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → ((𝐼 = 0 → 𝐽 ≤ 𝐾) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
23	22	exp32 421	. . . . . . . . 9 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → (𝑅 ∈ 𝑉 → (𝐼 = (𝐽 · 𝐾) → ((𝐼 = 0 → 𝐽 ≤ 𝐾) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))))
24	23	3impd 1348	. . . . . . . 8 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
25	24	ex 413	. . . . . . 7 ⊢ (𝐾 = 0 → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
26	6, 25	jaoi 855	. . . . . 6 ⊢ ((𝐾 ∈ ℕ ∨ 𝐾 = 0) → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
27	2, 26	sylbi 216	. . . . 5 ⊢ (𝐾 ∈ ℕ₀ → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
28		simplr 767	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐽 = 0)
29	28	oveq2d 7373	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐽) = (𝑅↑_𝑟0))
30		simpr1 1194	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝑅 ∈ 𝑉)
31		relexp0g 14907	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → (𝑅↑_𝑟0) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
32	30, 31	syl 17	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟0) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
33	29, 32	eqtrd 2776	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐽) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
34	33	oveq1d 7372	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (( I ↾ (dom 𝑅 ∪ ran 𝑅))↑_𝑟𝐾))
35		dmexg 7840	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → dom 𝑅 ∈ V)
36		rnexg 7841	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → ran 𝑅 ∈ V)
37	35, 36	unexd 7688	. . . . . . . . . 10 ⊢ (𝑅 ∈ 𝑉 → (dom 𝑅 ∪ ran 𝑅) ∈ V)
38	30, 37	syl 17	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (dom 𝑅 ∪ ran 𝑅) ∈ V)
39		simpll 765	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐾 ∈ ℕ₀)
40		relexpiidm 41966	. . . . . . . . 9 ⊢ (((dom 𝑅 ∪ ran 𝑅) ∈ V ∧ 𝐾 ∈ ℕ₀) → (( I ↾ (dom 𝑅 ∪ ran 𝑅))↑_𝑟𝐾) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
41	38, 39, 40	syl2anc 584	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (( I ↾ (dom 𝑅 ∪ ran 𝑅))↑_𝑟𝐾) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
42		simpr2 1195	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐼 = (𝐽 · 𝐾))
43	28	oveq1d 7372	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝐽 · 𝐾) = (0 · 𝐾))
44	39	nn0cnd 12475	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐾 ∈ ℂ)
45	44	mul02d 11353	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (0 · 𝐾) = 0)
46	42, 43, 45	3eqtrd 2780	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐼 = 0)
47	46	oveq2d 7373	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐼) = (𝑅↑_𝑟0))
48	47, 32	eqtr2d 2777	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ( I ↾ (dom 𝑅 ∪ ran 𝑅)) = (𝑅↑_𝑟𝐼))
49	34, 41, 48	3eqtrd 2780	. . . . . . 7 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))
50	49	ex 413	. . . . . 6 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
51	50	ex 413	. . . . 5 ⊢ (𝐾 ∈ ℕ₀ → (𝐽 = 0 → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
52	27, 51	jaod 857	. . . 4 ⊢ (𝐾 ∈ ℕ₀ → ((𝐽 ∈ ℕ ∨ 𝐽 = 0) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
53	1, 52	biimtrid 241	. . 3 ⊢ (𝐾 ∈ ℕ₀ → (𝐽 ∈ ℕ₀ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
54	53	impcom 408	. 2 ⊢ ((𝐽 ∈ ℕ₀ ∧ 𝐾 ∈ ℕ₀) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
55	54	impcom 408	1 ⊢ (((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) ∧ (𝐽 ∈ ℕ₀ ∧ 𝐾 ∈ ℕ₀)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 ∨ wo 845 ∧ w3a 1087 = wceq 1541 ∈ wcel 2106 Vcvv 3445 ∪ cun 3908 class class class wbr 5105 I cid 5530 dom cdm 5633 ran crn 5634 ↾ cres 5635 (class class class)co 7357 0cc0 11051 · cmul 11056 ≤ cle 11190 ℕcn 12153 ℕ₀cn0 12413 ↑_𝑟crelexp 14904

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 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2707 ax-sep 5256 ax-nul 5263 ax-pow 5320 ax-pr 5384 ax-un 7672 ax-cnex 11107 ax-resscn 11108 ax-1cn 11109 ax-icn 11110 ax-addcl 11111 ax-addrcl 11112 ax-mulcl 11113 ax-mulrcl 11114 ax-mulcom 11115 ax-addass 11116 ax-mulass 11117 ax-distr 11118 ax-i2m1 11119 ax-1ne0 11120 ax-1rid 11121 ax-rnegex 11122 ax-rrecex 11123 ax-cnre 11124 ax-pre-lttri 11125 ax-pre-lttrn 11126 ax-pre-ltadd 11127 ax-pre-mulgt0 11128

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2538 df-eu 2567 df-clab 2714 df-cleq 2728 df-clel 2814 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3065 df-rex 3074 df-reu 3354 df-rab 3408 df-v 3447 df-sbc 3740 df-csb 3856 df-dif 3913 df-un 3915 df-in 3917 df-ss 3927 df-pss 3929 df-nul 4283 df-if 4487 df-pw 4562 df-sn 4587 df-pr 4589 df-op 4593 df-uni 4866 df-iun 4956 df-br 5106 df-opab 5168 df-mpt 5189 df-tr 5223 df-id 5531 df-eprel 5537 df-po 5545 df-so 5546 df-fr 5588 df-we 5590 df-xp 5639 df-rel 5640 df-cnv 5641 df-co 5642 df-dm 5643 df-rn 5644 df-res 5645 df-ima 5646 df-pred 6253 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6498 df-fn 6499 df-f 6500 df-f1 6501 df-fo 6502 df-f1o 6503 df-fv 6504 df-riota 7313 df-ov 7360 df-oprab 7361 df-mpo 7362 df-om 7803 df-2nd 7922 df-frecs 8212 df-wrecs 8243 df-recs 8317 df-rdg 8356 df-er 8648 df-en 8884 df-dom 8885 df-sdom 8886 df-pnf 11191 df-mnf 11192 df-xr 11193 df-ltxr 11194 df-le 11195 df-sub 11387 df-neg 11388 df-nn 12154 df-n0 12414 df-z 12500 df-uz 12764 df-seq 13907 df-relexp 14905

This theorem is referenced by: (None)

W3C validator