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 44804

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 12612	. . . 4 ⊢ (𝐽 ∈ ℕ₀ ↔ (𝐽 ∈ ℕ ∨ 𝐽 = 0))
2		elnn0 12612	. . . . . 6 ⊢ (𝐾 ∈ ℕ₀ ↔ (𝐾 ∈ ℕ ∨ 𝐾 = 0))
3		relexpmulnn 44803	. . . . . . . . . 10 ⊢ (((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾)) ∧ (𝐽 ∈ ℕ ∧ 𝐾 ∈ ℕ)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))
4	3	3adantl3 1187	. . . . . . . . 9 ⊢ (((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) ∧ (𝐽 ∈ ℕ ∧ 𝐾 ∈ ℕ)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))
5	4	expcom 419	. . . . . . . 8 ⊢ ((𝐽 ∈ ℕ ∧ 𝐾 ∈ ℕ) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
6	5	expcom 419	. . . . . . 7 ⊢ (𝐾 ∈ ℕ → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
7		simprr 785	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐼 = (𝐽 · 𝐾))
8		simpll 779	. . . . . . . . . . . . . 14 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐾 = 0)
9	8	oveq2d 7437	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐽 · 𝐾) = (𝐽 · 0))
10		simplr 781	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐽 ∈ ℕ)
11	10	nncnd 12355	. . . . . . . . . . . . . 14 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐽 ∈ ℂ)
12	11	mul01d 11513	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐽 · 0) = 0)
13	7, 9, 12	3eqtrd 2799	. . . . . . . . . . . 12 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐼 = 0)
14		simpl 488	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐾 = 0 ∧ 𝐽 ∈ ℕ))
15		nnnle0 12375	. . . . . . . . . . . . . . 15 ⊢ (𝐽 ∈ ℕ → ¬ 𝐽 ≤ 0)
16	15	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → ¬ 𝐽 ≤ 0)
17		simpl 488	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → 𝐾 = 0)
18	17	breq2d 5114	. . . . . . . . . . . . . 14 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → (𝐽 ≤ 𝐾 ↔ 𝐽 ≤ 0))
19	16, 18	mtbird 328	. . . . . . . . . . . . 13 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → ¬ 𝐽 ≤ 𝐾)
20	14, 19	syl 18	. . . . . . . . . . . 12 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → ¬ 𝐽 ≤ 𝐾)
21	13, 20	jcnd 164	. . . . . . . . . . 11 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → ¬ (𝐼 = 0 → 𝐽 ≤ 𝐾))
22	21	pm2.21d 122	. . . . . . . . . 10 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → ((𝐼 = 0 → 𝐽 ≤ 𝐾) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
23	22	exp32 426	. . . . . . . . 9 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → (𝑅 ∈ 𝑉 → (𝐼 = (𝐽 · 𝐾) → ((𝐼 = 0 → 𝐽 ≤ 𝐾) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))))
24	23	3impd 1367	. . . . . . . 8 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
25	24	ex 418	. . . . . . 7 ⊢ (𝐾 = 0 → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
26	6, 25	jaoi 871	. . . . . 6 ⊢ ((𝐾 ∈ ℕ ∨ 𝐾 = 0) → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
27	2, 26	sylbi 220	. . . . 5 ⊢ (𝐾 ∈ ℕ₀ → (𝐽 ∈ ℕ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
28		simplr 781	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐽 = 0)
29	28	oveq2d 7437	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐽) = (𝑅↑_𝑟0))
30		simpr1 1213	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝑅 ∈ 𝑉)
31		relexp0g 15181	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → (𝑅↑_𝑟0) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
32	30, 31	syl 18	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟0) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
33	29, 32	eqtrd 2795	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐽) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
34	33	oveq1d 7436	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (( I ↾ (dom 𝑅 ∪ ran 𝑅))↑_𝑟𝐾))
35		dmexg 7914	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → dom 𝑅 ∈ V)
36		rnexg 7915	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → ran 𝑅 ∈ V)
37	35, 36	unexd 7769	. . . . . . . . . 10 ⊢ (𝑅 ∈ 𝑉 → (dom 𝑅 ∪ ran 𝑅) ∈ V)
38	30, 37	syl 18	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (dom 𝑅 ∪ ran 𝑅) ∈ V)
39		simpll 779	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐾 ∈ ℕ₀)
40		relexpiidm 44798	. . . . . . . . 9 ⊢ (((dom 𝑅 ∪ ran 𝑅) ∈ V ∧ 𝐾 ∈ ℕ₀) → (( I ↾ (dom 𝑅 ∪ ran 𝑅))↑_𝑟𝐾) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
41	38, 39, 40	syl2anc 596	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (( I ↾ (dom 𝑅 ∪ ran 𝑅))↑_𝑟𝐾) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
42		simpr2 1214	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐼 = (𝐽 · 𝐾))
43	28	oveq1d 7436	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝐽 · 𝐾) = (0 · 𝐾))
44	39	nn0cnd 12673	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐾 ∈ ℂ)
45	44	mul02d 11512	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (0 · 𝐾) = 0)
46	42, 43, 45	3eqtrd 2799	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐼 = 0)
47	46	oveq2d 7437	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐼) = (𝑅↑_𝑟0))
48	47, 32	eqtr2d 2796	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ( I ↾ (dom 𝑅 ∪ ran 𝑅)) = (𝑅↑_𝑟𝐼))
49	34, 41, 48	3eqtrd 2799	. . . . . . 7 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))
50	49	ex 418	. . . . . 6 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
51	50	ex 418	. . . . 5 ⊢ (𝐾 ∈ ℕ₀ → (𝐽 = 0 → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
52	27, 51	jaod 873	. . . 4 ⊢ (𝐾 ∈ ℕ₀ → ((𝐽 ∈ ℕ ∨ 𝐽 = 0) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
53	1, 52	biimtrid 245	. . 3 ⊢ (𝐾 ∈ ℕ₀ → (𝐽 ∈ ℕ₀ → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))))
54	53	impcom 413	. 2 ⊢ ((𝐽 ∈ ℕ₀ ∧ 𝐾 ∈ ℕ₀) → ((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼)))
55	54	impcom 413	1 ⊢ (((𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾)) ∧ (𝐽 ∈ ℕ₀ ∧ 𝐾 ∈ ℕ₀)) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (𝑅↑_𝑟𝐼))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ∧ wa 401 ∨ wo 861 ∧ w3a 1103 = wceq 1569 ∈ wcel 2144 Vcvv 3450 ∪ cun 4149 class class class wbr 5102 I cid 5544 dom cdm 5650 ran crn 5651 ↾ cres 5652 (class class class)co 7421 0cc0 11204 · cmul 11209 ≤ cle 11348 ℕcn 12339 ℕ₀cn0 12610 ↑_𝑟crelexp 15178

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-sep 5248 ax-nul 5259 ax-pow 5326 ax-pr 5390 ax-un 7752 ax-cnex 11260 ax-resscn 11261 ax-1cn 11262 ax-icn 11263 ax-addcl 11264 ax-addrcl 11265 ax-mulcl 11266 ax-mulrcl 11267 ax-mulcom 11268 ax-addass 11269 ax-mulass 11270 ax-distr 11271 ax-i2m1 11272 ax-1ne0 11273 ax-1rid 11274 ax-rnegex 11275 ax-rrecex 11276 ax-cnre 11277 ax-pre-lttri 11278 ax-pre-lttrn 11279 ax-pre-ltadd 11280 ax-pre-mulgt0 11281

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3847 df-ss 3896 df-pss 4014 df-dif 4047 df-in 4091 df-un 4151 df-nul 4279 df-if 4482 df-pw 4558 df-sn 4585 df-pr 4587 df-op 4835 df-uni 4867 df-iun 4952 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5545 df-eprel 5550 df-po 5558 df-so 5559 df-fr 5603 df-we 5605 df-xp 5656 df-rel 5657 df-cnv 5658 df-co 5659 df-dm 5660 df-rn 5661 df-res 5662 df-ima 5663 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6541 df-fn 6542 df-f 6543 df-f1 6544 df-fo 6545 df-f1o 6546 df-fv 6547 df-riota 7378 df-ov 7424 df-oprab 7425 df-mpo 7426 df-om 7879 df-2nd 8003 df-frecs 8303 df-wrecs 8334 df-recs 8383 df-rdg 8422 df-er 8721 df-en 8978 df-dom 8979 df-sdom 8980 df-pnf 11349 df-mnf 11350 df-xr 11351 df-ltxr 11352 df-le 11353 df-sub 11547 df-neg 11548 df-nn 12340 df-n0 12611 df-z 12698 df-uz 12970 df-seq 14149 df-relexp 15179

This theorem is used by: (None)

W3C validator