hashgadd - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > hashgadd		Structured version Visualization version GIF version

Theorem hashgadd 14331

Description: 𝐺 maps ordinal addition to integer addition. (Contributed by Paul Chapman, 30-Nov-2012.) (Revised by Mario Carneiro, 15-Sep-2013.)

**Hypothesis**
Ref	Expression
hashgadd.1	⊢ 𝐺 = (rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)

**Assertion**
Ref	Expression
hashgadd	⊢ ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐺‘(𝐴 +_o 𝐵)) = ((𝐺‘𝐴) + (𝐺‘𝐵)))

Proof of Theorem hashgadd Dummy variables 𝑛 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		oveq2 7365	. . . . . 6 ⊢ (𝑛 = ∅ → (𝐴 +_o 𝑛) = (𝐴 +_o ∅))
2	1	fveq2d 6832	. . . . 5 ⊢ (𝑛 = ∅ → (𝐺‘(𝐴 +_o 𝑛)) = (𝐺‘(𝐴 +_o ∅)))
3		fveq2 6828	. . . . . 6 ⊢ (𝑛 = ∅ → (𝐺‘𝑛) = (𝐺‘∅))
4	3	oveq2d 7373	. . . . 5 ⊢ (𝑛 = ∅ → ((𝐺‘𝐴) + (𝐺‘𝑛)) = ((𝐺‘𝐴) + (𝐺‘∅)))
5	2, 4	eqeq12d 2755	. . . 4 ⊢ (𝑛 = ∅ → ((𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛)) ↔ (𝐺‘(𝐴 +_o ∅)) = ((𝐺‘𝐴) + (𝐺‘∅))))
6	5	imbi2d 341	. . 3 ⊢ (𝑛 = ∅ → ((𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛))) ↔ (𝐴 ∈ ω → (𝐺‘(𝐴 +_o ∅)) = ((𝐺‘𝐴) + (𝐺‘∅)))))
7		oveq2 7365	. . . . . 6 ⊢ (𝑛 = 𝑧 → (𝐴 +_o 𝑛) = (𝐴 +_o 𝑧))
8	7	fveq2d 6832	. . . . 5 ⊢ (𝑛 = 𝑧 → (𝐺‘(𝐴 +_o 𝑛)) = (𝐺‘(𝐴 +_o 𝑧)))
9		fveq2 6828	. . . . . 6 ⊢ (𝑛 = 𝑧 → (𝐺‘𝑛) = (𝐺‘𝑧))
10	9	oveq2d 7373	. . . . 5 ⊢ (𝑛 = 𝑧 → ((𝐺‘𝐴) + (𝐺‘𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑧)))
11	8, 10	eqeq12d 2755	. . . 4 ⊢ (𝑛 = 𝑧 → ((𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛)) ↔ (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))))
12	11	imbi2d 341	. . 3 ⊢ (𝑛 = 𝑧 → ((𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛))) ↔ (𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧)))))
13		oveq2 7365	. . . . . 6 ⊢ (𝑛 = suc 𝑧 → (𝐴 +_o 𝑛) = (𝐴 +_o suc 𝑧))
14	13	fveq2d 6832	. . . . 5 ⊢ (𝑛 = suc 𝑧 → (𝐺‘(𝐴 +_o 𝑛)) = (𝐺‘(𝐴 +_o suc 𝑧)))
15		fveq2 6828	. . . . . 6 ⊢ (𝑛 = suc 𝑧 → (𝐺‘𝑛) = (𝐺‘suc 𝑧))
16	15	oveq2d 7373	. . . . 5 ⊢ (𝑛 = suc 𝑧 → ((𝐺‘𝐴) + (𝐺‘𝑛)) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧)))
17	14, 16	eqeq12d 2755	. . . 4 ⊢ (𝑛 = suc 𝑧 → ((𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛)) ↔ (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧))))
18	17	imbi2d 341	. . 3 ⊢ (𝑛 = suc 𝑧 → ((𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛))) ↔ (𝐴 ∈ ω → (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧)))))
19		oveq2 7365	. . . . . 6 ⊢ (𝑛 = 𝐵 → (𝐴 +_o 𝑛) = (𝐴 +_o 𝐵))
20	19	fveq2d 6832	. . . . 5 ⊢ (𝑛 = 𝐵 → (𝐺‘(𝐴 +_o 𝑛)) = (𝐺‘(𝐴 +_o 𝐵)))
21		fveq2 6828	. . . . . 6 ⊢ (𝑛 = 𝐵 → (𝐺‘𝑛) = (𝐺‘𝐵))
22	21	oveq2d 7373	. . . . 5 ⊢ (𝑛 = 𝐵 → ((𝐺‘𝐴) + (𝐺‘𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝐵)))
23	20, 22	eqeq12d 2755	. . . 4 ⊢ (𝑛 = 𝐵 → ((𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛)) ↔ (𝐺‘(𝐴 +_o 𝐵)) = ((𝐺‘𝐴) + (𝐺‘𝐵))))
24	23	imbi2d 341	. . 3 ⊢ (𝑛 = 𝐵 → ((𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝑛)) = ((𝐺‘𝐴) + (𝐺‘𝑛))) ↔ (𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝐵)) = ((𝐺‘𝐴) + (𝐺‘𝐵)))))
25		hashgadd.1	. . . . . . . . 9 ⊢ 𝐺 = (rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)
26	25	hashgf1o 13925	. . . . . . . 8 ⊢ 𝐺:ω–1-1-onto→ℕ₀
27		f1of 6768	. . . . . . . 8 ⊢ (𝐺:ω–1-1-onto→ℕ₀ → 𝐺:ω⟶ℕ₀)
28	26, 27	ax-mp 5	. . . . . . 7 ⊢ 𝐺:ω⟶ℕ₀
29	28	ffvelcdmi 7025	. . . . . 6 ⊢ (𝐴 ∈ ω → (𝐺‘𝐴) ∈ ℕ₀)
30	29	nn0cnd 12492	. . . . 5 ⊢ (𝐴 ∈ ω → (𝐺‘𝐴) ∈ ℂ)
31	30	addridd 11338	. . . 4 ⊢ (𝐴 ∈ ω → ((𝐺‘𝐴) + 0) = (𝐺‘𝐴))
32		0z 12527	. . . . . . 7 ⊢ 0 ∈ ℤ
33	32, 25	om2uz0i 13901	. . . . . 6 ⊢ (𝐺‘∅) = 0
34	33	oveq2i 7368	. . . . 5 ⊢ ((𝐺‘𝐴) + (𝐺‘∅)) = ((𝐺‘𝐴) + 0)
35	34	a1i 11	. . . 4 ⊢ (𝐴 ∈ ω → ((𝐺‘𝐴) + (𝐺‘∅)) = ((𝐺‘𝐴) + 0))
36		nna0 8531	. . . . 5 ⊢ (𝐴 ∈ ω → (𝐴 +_o ∅) = 𝐴)
37	36	fveq2d 6832	. . . 4 ⊢ (𝐴 ∈ ω → (𝐺‘(𝐴 +_o ∅)) = (𝐺‘𝐴))
38	31, 35, 37	3eqtr4rd 2785	. . 3 ⊢ (𝐴 ∈ ω → (𝐺‘(𝐴 +_o ∅)) = ((𝐺‘𝐴) + (𝐺‘∅)))
39		nnasuc 8533	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω) → (𝐴 +_o suc 𝑧) = suc (𝐴 +_o 𝑧))
40	39	fveq2d 6832	. . . . . . . . 9 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω) → (𝐺‘(𝐴 +_o suc 𝑧)) = (𝐺‘suc (𝐴 +_o 𝑧)))
41		nnacl 8538	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω) → (𝐴 +_o 𝑧) ∈ ω)
42	32, 25	om2uzsuci 13902	. . . . . . . . . 10 ⊢ ((𝐴 +_o 𝑧) ∈ ω → (𝐺‘suc (𝐴 +_o 𝑧)) = ((𝐺‘(𝐴 +_o 𝑧)) + 1))
43	41, 42	syl 17	. . . . . . . . 9 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω) → (𝐺‘suc (𝐴 +_o 𝑧)) = ((𝐺‘(𝐴 +_o 𝑧)) + 1))
44	40, 43	eqtrd 2774	. . . . . . . 8 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω) → (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘(𝐴 +_o 𝑧)) + 1))
45	44	3adant3 1138	. . . . . . 7 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω ∧ (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))) → (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘(𝐴 +_o 𝑧)) + 1))
46	28	ffvelcdmi 7025	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ω → (𝐺‘𝑧) ∈ ℕ₀)
47	46	nn0cnd 12492	. . . . . . . . . 10 ⊢ (𝑧 ∈ ω → (𝐺‘𝑧) ∈ ℂ)
48		ax-1cn 11088	. . . . . . . . . . 11 ⊢ 1 ∈ ℂ
49		addass 11117	. . . . . . . . . . 11 ⊢ (((𝐺‘𝐴) ∈ ℂ ∧ (𝐺‘𝑧) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝐺‘𝐴) + (𝐺‘𝑧)) + 1) = ((𝐺‘𝐴) + ((𝐺‘𝑧) + 1)))
50	48, 49	mp3an3 1458	. . . . . . . . . 10 ⊢ (((𝐺‘𝐴) ∈ ℂ ∧ (𝐺‘𝑧) ∈ ℂ) → (((𝐺‘𝐴) + (𝐺‘𝑧)) + 1) = ((𝐺‘𝐴) + ((𝐺‘𝑧) + 1)))
51	30, 47, 50	syl2an 602	. . . . . . . . 9 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω) → (((𝐺‘𝐴) + (𝐺‘𝑧)) + 1) = ((𝐺‘𝐴) + ((𝐺‘𝑧) + 1)))
52	51	3adant3 1138	. . . . . . . 8 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω ∧ (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))) → (((𝐺‘𝐴) + (𝐺‘𝑧)) + 1) = ((𝐺‘𝐴) + ((𝐺‘𝑧) + 1)))
53		oveq1 7364	. . . . . . . . 9 ⊢ ((𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧)) → ((𝐺‘(𝐴 +_o 𝑧)) + 1) = (((𝐺‘𝐴) + (𝐺‘𝑧)) + 1))
54	53	3ad2ant3 1141	. . . . . . . 8 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω ∧ (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))) → ((𝐺‘(𝐴 +_o 𝑧)) + 1) = (((𝐺‘𝐴) + (𝐺‘𝑧)) + 1))
55	32, 25	om2uzsuci 13902	. . . . . . . . . 10 ⊢ (𝑧 ∈ ω → (𝐺‘suc 𝑧) = ((𝐺‘𝑧) + 1))
56	55	oveq2d 7373	. . . . . . . . 9 ⊢ (𝑧 ∈ ω → ((𝐺‘𝐴) + (𝐺‘suc 𝑧)) = ((𝐺‘𝐴) + ((𝐺‘𝑧) + 1)))
57	56	3ad2ant2 1140	. . . . . . . 8 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω ∧ (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))) → ((𝐺‘𝐴) + (𝐺‘suc 𝑧)) = ((𝐺‘𝐴) + ((𝐺‘𝑧) + 1)))
58	52, 54, 57	3eqtr4d 2784	. . . . . . 7 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω ∧ (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))) → ((𝐺‘(𝐴 +_o 𝑧)) + 1) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧)))
59	45, 58	eqtrd 2774	. . . . . 6 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω ∧ (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))) → (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧)))
60	59	3expia 1127	. . . . 5 ⊢ ((𝐴 ∈ ω ∧ 𝑧 ∈ ω) → ((𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧)) → (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧))))
61	60	expcom 414	. . . 4 ⊢ (𝑧 ∈ ω → (𝐴 ∈ ω → ((𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧)) → (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧)))))
62	61	a2d 29	. . 3 ⊢ (𝑧 ∈ ω → ((𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝑧)) = ((𝐺‘𝐴) + (𝐺‘𝑧))) → (𝐴 ∈ ω → (𝐺‘(𝐴 +_o suc 𝑧)) = ((𝐺‘𝐴) + (𝐺‘suc 𝑧)))))
63	6, 12, 18, 24, 38, 62	finds 7837	. 2 ⊢ (𝐵 ∈ ω → (𝐴 ∈ ω → (𝐺‘(𝐴 +_o 𝐵)) = ((𝐺‘𝐴) + (𝐺‘𝐵))))
64	63	impcom 408	1 ⊢ ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐺‘(𝐴 +_o 𝐵)) = ((𝐺‘𝐴) + (𝐺‘𝐵)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 ∧ w3a 1092 = wceq 1547 ∈ wcel 2119 Vcvv 3431 ∅c0 4262 ↦ cmpt 5154 ↾ cres 5621 suc csuc 6313 ⟶wf 6482 –1-1-onto→wf1o 6485 ‘cfv 6486 (class class class)co 7357 ωcom 7807 reccrdg 8339 +_o coa 8393 ℂcc 11028 0cc0 11030 1c1 11031 + caddc 11033 ℕ₀cn0 12429

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2711 ax-sep 5219 ax-nul 5229 ax-pow 5295 ax-pr 5363 ax-un 7679 ax-cnex 11086 ax-resscn 11087 ax-1cn 11088 ax-icn 11089 ax-addcl 11090 ax-addrcl 11091 ax-mulcl 11092 ax-mulrcl 11093 ax-mulcom 11094 ax-addass 11095 ax-mulass 11096 ax-distr 11097 ax-i2m1 11098 ax-1ne0 11099 ax-1rid 11100 ax-rnegex 11101 ax-rrecex 11102 ax-cnre 11103 ax-pre-lttri 11104 ax-pre-lttrn 11105 ax-pre-ltadd 11106 ax-pre-mulgt0 11107

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3or 1093 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2718 df-cleq 2731 df-clel 2814 df-nfc 2888 df-ne 2935 df-nel 3039 df-ral 3054 df-rex 3064 df-reu 3345 df-rab 3392 df-v 3433 df-sbc 3724 df-csb 3832 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3903 df-nul 4263 df-if 4456 df-pw 4532 df-sn 4557 df-pr 4559 df-op 4563 df-uni 4840 df-iun 4924 df-br 5074 df-opab 5136 df-mpt 5155 df-tr 5181 df-id 5514 df-eprel 5519 df-po 5527 df-so 5528 df-fr 5572 df-we 5574 df-xp 5625 df-rel 5626 df-cnv 5627 df-co 5628 df-dm 5629 df-rn 5630 df-res 5631 df-ima 5632 df-pred 6253 df-ord 6314 df-on 6315 df-lim 6316 df-suc 6317 df-iota 6442 df-fun 6488 df-fn 6489 df-f 6490 df-f1 6491 df-fo 6492 df-f1o 6493 df-fv 6494 df-riota 7314 df-ov 7360 df-oprab 7361 df-mpo 7362 df-om 7808 df-2nd 7933 df-frecs 8222 df-wrecs 8253 df-recs 8302 df-rdg 8340 df-oadd 8400 df-er 8634 df-en 8885 df-dom 8886 df-sdom 8887 df-pnf 11173 df-mnf 11174 df-xr 11175 df-ltxr 11176 df-le 11177 df-sub 11371 df-neg 11372 df-nn 12167 df-n0 12430 df-z 12517 df-uz 12781

This theorem is referenced by: hashdom 14333 hashun 14336

W3C validator