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 44469

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 12517	. . . 4 ⊢ (𝐽 ∈ ℕ₀ ↔ (𝐽 ∈ ℕ ∨ 𝐽 = 0))
2		elnn0 12517	. . . . . 6 ⊢ (𝐾 ∈ ℕ₀ ↔ (𝐾 ∈ ℕ ∨ 𝐾 = 0))
3		relexpmulnn 44468	. . . . . . . . . 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 7432	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐽 · 𝐾) = (𝐽 · 0))
10		simplr 781	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐽 ∈ ℕ)
11	10	nncnd 12260	. . . . . . . . . . . . . 14 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐽 ∈ ℂ)
12	11	mul01d 11420	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐽 · 0) = 0)
13	7, 9, 12	3eqtrd 2804	. . . . . . . . . . . 12 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → 𝐼 = 0)
14		simpl 488	. . . . . . . . . . . . 13 ⊢ (((𝐾 = 0 ∧ 𝐽 ∈ ℕ) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾))) → (𝐾 = 0 ∧ 𝐽 ∈ ℕ))
15		nnnle0 12280	. . . . . . . . . . . . . . 15 ⊢ (𝐽 ∈ ℕ → ¬ 𝐽 ≤ 0)
16	15	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → ¬ 𝐽 ≤ 0)
17		simpl 488	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 = 0 ∧ 𝐽 ∈ ℕ) → 𝐾 = 0)
18	17	breq2d 5123	. . . . . . . . . . . . . 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 7432	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐽) = (𝑅↑_𝑟0))
30		simpr1 1213	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝑅 ∈ 𝑉)
31		relexp0g 15078	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → (𝑅↑_𝑟0) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
32	30, 31	syl 18	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟0) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
33	29, 32	eqtrd 2800	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐽) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
34	33	oveq1d 7431	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ((𝑅↑_𝑟𝐽)↑_𝑟𝐾) = (( I ↾ (dom 𝑅 ∪ ran 𝑅))↑_𝑟𝐾))
35		dmexg 7900	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → dom 𝑅 ∈ V)
36		rnexg 7901	. . . . . . . . . . 11 ⊢ (𝑅 ∈ 𝑉 → ran 𝑅 ∈ V)
37	35, 36	unexd 7755	. . . . . . . . . 10 ⊢ (𝑅 ∈ 𝑉 → (dom 𝑅 ∪ ran 𝑅) ∈ V)
38	30, 37	syl 18	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (dom 𝑅 ∪ ran 𝑅) ∈ V)
39		simpll 779	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐾 ∈ ℕ₀)
40		relexpiidm 44463	. . . . . . . . 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 7431	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝐽 · 𝐾) = (0 · 𝐾))
44	39	nn0cnd 12578	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐾 ∈ ℂ)
45	44	mul02d 11419	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (0 · 𝐾) = 0)
46	42, 43, 45	3eqtrd 2804	. . . . . . . . . 10 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → 𝐼 = 0)
47	46	oveq2d 7432	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → (𝑅↑_𝑟𝐼) = (𝑅↑_𝑟0))
48	47, 32	eqtr2d 2801	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝐽 = 0) ∧ (𝑅 ∈ 𝑉 ∧ 𝐼 = (𝐽 · 𝐾) ∧ (𝐼 = 0 → 𝐽 ≤ 𝐾))) → ( I ↾ (dom 𝑅 ∪ ran 𝑅)) = (𝑅↑_𝑟𝐼))
49	34, 41, 48	3eqtrd 2804	. . . . . . 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 1570 ∈ wcel 2146 Vcvv 3457 ∪ cun 3904 class class class wbr 5111 I cid 5557 dom cdm 5663 ran crn 5664 ↾ cres 5665 (class class class)co 7416 0cc0 11111 · cmul 11116 ≤ cle 11255 ℕcn 12244 ℕ₀cn0 12515 ↑_𝑟crelexp 15075

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2195 ax-12 2216 ax-ext 2737 ax-sep 5259 ax-nul 5271 ax-pow 5338 ax-pr 5406 ax-un 7738 ax-cnex 11167 ax-resscn 11168 ax-1cn 11169 ax-icn 11170 ax-addcl 11171 ax-addrcl 11172 ax-mulcl 11173 ax-mulrcl 11174 ax-mulcom 11175 ax-addass 11176 ax-mulass 11177 ax-distr 11178 ax-i2m1 11179 ax-1ne0 11180 ax-1rid 11181 ax-rnegex 11182 ax-rrecex 11183 ax-cnre 11184 ax-pre-lttri 11185 ax-pre-lttrn 11186 ax-pre-ltadd 11187 ax-pre-mulgt0 11188

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2569 df-eu 2599 df-clab 2744 df-cleq 2757 df-clel 2840 df-nfc 2914 df-ne 2961 df-nel 3067 df-ral 3082 df-rex 3092 df-reu 3372 df-rab 3419 df-v 3459 df-sbc 3747 df-csb 3855 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-pss 3926 df-nul 4287 df-if 4490 df-pw 4566 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4875 df-iun 4960 df-br 5112 df-opab 5176 df-mpt 5195 df-tr 5221 df-id 5558 df-eprel 5563 df-po 5571 df-so 5572 df-fr 5616 df-we 5618 df-xp 5669 df-rel 5670 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-res 5675 df-ima 5676 df-pred 6306 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6496 df-fun 6542 df-fn 6543 df-f 6544 df-f1 6545 df-fo 6546 df-f1o 6547 df-fv 6548 df-riota 7373 df-ov 7419 df-oprab 7420 df-mpo 7421 df-om 7865 df-2nd 7989 df-frecs 8280 df-wrecs 8311 df-recs 8360 df-rdg 8399 df-er 8696 df-en 8946 df-dom 8947 df-sdom 8948 df-pnf 11256 df-mnf 11257 df-xr 11258 df-ltxr 11259 df-le 11260 df-sub 11454 df-neg 11455 df-nn 12245 df-n0 12516 df-z 12603 df-uz 12874 df-seq 14051 df-relexp 15076

This theorem is used by: (None)

W3C validator