sadcaddlem - Metamath Proof Explorer

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

Theorem sadcaddlem 15017

Description: Lemma for sadcadd 15018. (Contributed by Mario Carneiro, 8-Sep-2016.)

**Hypotheses**
Ref	Expression
sadval.a	⊢ (𝜑 → 𝐴 ⊆ ℕ₀)
sadval.b	⊢ (𝜑 → 𝐵 ⊆ ℕ₀)
sadval.c	⊢ 𝐶 = seq0((𝑐 ∈ 2_𝑜, 𝑚 ∈ ℕ₀ ↦ if(cadd(𝑚 ∈ 𝐴, 𝑚 ∈ 𝐵, ∅ ∈ 𝑐), 1_𝑜, ∅)), (𝑛 ∈ ℕ₀ ↦ if(𝑛 = 0, ∅, (𝑛 − 1))))
sadcp1.n	⊢ (𝜑 → 𝑁 ∈ ℕ₀)
sadcadd.k	⊢ 𝐾 = ^◡(bits ↾ ℕ₀)
sadcaddlem.1	⊢ (𝜑 → (∅ ∈ (𝐶‘𝑁) ↔ (2↑𝑁) ≤ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁))))))

**Assertion**
Ref	Expression
sadcaddlem	⊢ (𝜑 → (∅ ∈ (𝐶‘(𝑁 + 1)) ↔ (2↑(𝑁 + 1)) ≤ ((𝐾‘(𝐴 ∩ (0..^(𝑁 + 1)))) + (𝐾‘(𝐵 ∩ (0..^(𝑁 + 1)))))))

Distinct variable groups: 𝑚,𝑐,𝑛 𝐴,𝑐,𝑚 𝐵,𝑐,𝑚 𝑛,𝑁 Allowed substitution hints: 𝜑(𝑚,𝑛,𝑐) 𝐴(𝑛) 𝐵(𝑛) 𝐶(𝑚,𝑛,𝑐) 𝐾(𝑚,𝑛,𝑐) 𝑁(𝑚,𝑐)

**Proof of Theorem sadcaddlem**
Step	Hyp	Ref	Expression
1		cad1 1546	. . . . 5 ⊢ (∅ ∈ (𝐶‘𝑁) → (cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁)) ↔ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)))
2	1	adantl 481	. . . 4 ⊢ ((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) → (cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁)) ↔ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)))
3		2nn 11062	. . . . . . . . . . 11 ⊢ 2 ∈ ℕ
4	3	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 2 ∈ ℕ)
5		sadcp1.n	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
6	4, 5	nnexpcld 12892	. . . . . . . . 9 ⊢ (𝜑 → (2↑𝑁) ∈ ℕ)
7	6	nnred 10912	. . . . . . . 8 ⊢ (𝜑 → (2↑𝑁) ∈ ℝ)
8	7	ad2antrr 758	. . . . . . 7 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)) → (2↑𝑁) ∈ ℝ)
9		inss1 3795	. . . . . . . . . . . . 13 ⊢ (𝐴 ∩ (0..^𝑁)) ⊆ 𝐴
10		sadval.a	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐴 ⊆ ℕ₀)
11	9, 10	syl5ss 3579	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐴 ∩ (0..^𝑁)) ⊆ ℕ₀)
12		fzofi 12635	. . . . . . . . . . . . . 14 ⊢ (0..^𝑁) ∈ Fin
13	12	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → (0..^𝑁) ∈ Fin)
14		inss2 3796	. . . . . . . . . . . . 13 ⊢ (𝐴 ∩ (0..^𝑁)) ⊆ (0..^𝑁)
15		ssfi 8065	. . . . . . . . . . . . 13 ⊢ (((0..^𝑁) ∈ Fin ∧ (𝐴 ∩ (0..^𝑁)) ⊆ (0..^𝑁)) → (𝐴 ∩ (0..^𝑁)) ∈ Fin)
16	13, 14, 15	sylancl 693	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐴 ∩ (0..^𝑁)) ∈ Fin)
17		elfpw 8151	. . . . . . . . . . . 12 ⊢ ((𝐴 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin) ↔ ((𝐴 ∩ (0..^𝑁)) ⊆ ℕ₀ ∧ (𝐴 ∩ (0..^𝑁)) ∈ Fin))
18	11, 16, 17	sylanbrc 695	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin))
19		bitsf1o 15005	. . . . . . . . . . . . . . 15 ⊢ (bits ↾ ℕ₀):ℕ₀–1-1-onto→(𝒫 ℕ₀ ∩ Fin)
20		f1ocnv 6062	. . . . . . . . . . . . . . 15 ⊢ ((bits ↾ ℕ₀):ℕ₀–1-1-onto→(𝒫 ℕ₀ ∩ Fin) → ^◡(bits ↾ ℕ₀):(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀)
21	19, 20	ax-mp 5	. . . . . . . . . . . . . 14 ⊢ ^◡(bits ↾ ℕ₀):(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀
22		sadcadd.k	. . . . . . . . . . . . . . 15 ⊢ 𝐾 = ^◡(bits ↾ ℕ₀)
23		f1oeq1 6040	. . . . . . . . . . . . . . 15 ⊢ (𝐾 = ^◡(bits ↾ ℕ₀) → (𝐾:(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀ ↔ ^◡(bits ↾ ℕ₀):(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀))
24	22, 23	ax-mp 5	. . . . . . . . . . . . . 14 ⊢ (𝐾:(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀ ↔ ^◡(bits ↾ ℕ₀):(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀)
25	21, 24	mpbir 220	. . . . . . . . . . . . 13 ⊢ 𝐾:(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀
26		f1of 6050	. . . . . . . . . . . . 13 ⊢ (𝐾:(𝒫 ℕ₀ ∩ Fin)–1-1-onto→ℕ₀ → 𝐾:(𝒫 ℕ₀ ∩ Fin)⟶ℕ₀)
27	25, 26	ax-mp 5	. . . . . . . . . . . 12 ⊢ 𝐾:(𝒫 ℕ₀ ∩ Fin)⟶ℕ₀
28	27	ffvelrni 6266	. . . . . . . . . . 11 ⊢ ((𝐴 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin) → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℕ₀)
29	18, 28	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℕ₀)
30		inss1 3795	. . . . . . . . . . . . 13 ⊢ (𝐵 ∩ (0..^𝑁)) ⊆ 𝐵
31		sadval.b	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 ⊆ ℕ₀)
32	30, 31	syl5ss 3579	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 ∩ (0..^𝑁)) ⊆ ℕ₀)
33		inss2 3796	. . . . . . . . . . . . 13 ⊢ (𝐵 ∩ (0..^𝑁)) ⊆ (0..^𝑁)
34		ssfi 8065	. . . . . . . . . . . . 13 ⊢ (((0..^𝑁) ∈ Fin ∧ (𝐵 ∩ (0..^𝑁)) ⊆ (0..^𝑁)) → (𝐵 ∩ (0..^𝑁)) ∈ Fin)
35	13, 33, 34	sylancl 693	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 ∩ (0..^𝑁)) ∈ Fin)
36		elfpw 8151	. . . . . . . . . . . 12 ⊢ ((𝐵 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin) ↔ ((𝐵 ∩ (0..^𝑁)) ⊆ ℕ₀ ∧ (𝐵 ∩ (0..^𝑁)) ∈ Fin))
37	32, 35, 36	sylanbrc 695	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin))
38	27	ffvelrni 6266	. . . . . . . . . . 11 ⊢ ((𝐵 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin) → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℕ₀)
39	37, 38	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℕ₀)
40	29, 39	nn0addcld 11232	. . . . . . . . 9 ⊢ (𝜑 → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ∈ ℕ₀)
41	40	nn0red 11229	. . . . . . . 8 ⊢ (𝜑 → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ∈ ℝ)
42	41	ad2antrr 758	. . . . . . 7 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ∈ ℝ)
43		2nn0 11186	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℕ₀
44	43	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐴) → 2 ∈ ℕ₀)
45	5	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐴) → 𝑁 ∈ ℕ₀)
46	44, 45	nn0expcld 12893	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐴) → (2↑𝑁) ∈ ℕ₀)
47		0nn0 11184	. . . . . . . . . . . 12 ⊢ 0 ∈ ℕ₀
48	47	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝑁 ∈ 𝐴) → 0 ∈ ℕ₀)
49	46, 48	ifclda 4070	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ∈ ℕ₀)
50	43	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐵) → 2 ∈ ℕ₀)
51	5	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐵) → 𝑁 ∈ ℕ₀)
52	50, 51	nn0expcld 12893	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐵) → (2↑𝑁) ∈ ℕ₀)
53	47	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝑁 ∈ 𝐵) → 0 ∈ ℕ₀)
54	52, 53	ifclda 4070	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ∈ ℕ₀)
55	49, 54	nn0addcld 11232	. . . . . . . . 9 ⊢ (𝜑 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ∈ ℕ₀)
56	55	nn0red 11229	. . . . . . . 8 ⊢ (𝜑 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ∈ ℝ)
57	56	ad2antrr 758	. . . . . . 7 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ∈ ℝ)
58		sadcaddlem.1	. . . . . . . . 9 ⊢ (𝜑 → (∅ ∈ (𝐶‘𝑁) ↔ (2↑𝑁) ≤ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁))))))
59	58	biimpa 500	. . . . . . . 8 ⊢ ((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) → (2↑𝑁) ≤ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))))
60	59	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)) → (2↑𝑁) ≤ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))))
61	6	nnnn0d 11228	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2↑𝑁) ∈ ℕ₀)
62		ifcl 4080	. . . . . . . . . . . . 13 ⊢ (((2↑𝑁) ∈ ℕ₀ ∧ 0 ∈ ℕ₀) → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ∈ ℕ₀)
63	61, 47, 62	sylancl 693	. . . . . . . . . . . 12 ⊢ (𝜑 → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ∈ ℕ₀)
64	63	nn0ge0d 11231	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ if(𝑁 ∈ 𝐵, (2↑𝑁), 0))
65	7	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐵) → (2↑𝑁) ∈ ℝ)
66		0red 9920	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ¬ 𝑁 ∈ 𝐵) → 0 ∈ ℝ)
67	65, 66	ifclda 4070	. . . . . . . . . . . 12 ⊢ (𝜑 → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ∈ ℝ)
68	7, 67	addge01d 10494	. . . . . . . . . . 11 ⊢ (𝜑 → (0 ≤ if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ↔ (2↑𝑁) ≤ ((2↑𝑁) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
69	64, 68	mpbid 221	. . . . . . . . . 10 ⊢ (𝜑 → (2↑𝑁) ≤ ((2↑𝑁) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
70	69	ad2antrr 758	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐴) → (2↑𝑁) ≤ ((2↑𝑁) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
71		iftrue 4042	. . . . . . . . . . 11 ⊢ (𝑁 ∈ 𝐴 → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) = (2↑𝑁))
72	71	adantl 481	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐴) → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) = (2↑𝑁))
73	72	oveq1d 6564	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐴) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = ((2↑𝑁) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
74	70, 73	breqtrrd 4611	. . . . . . . 8 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐴) → (2↑𝑁) ≤ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
75		ifcl 4080	. . . . . . . . . . . . 13 ⊢ (((2↑𝑁) ∈ ℕ₀ ∧ 0 ∈ ℕ₀) → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ∈ ℕ₀)
76	61, 47, 75	sylancl 693	. . . . . . . . . . . 12 ⊢ (𝜑 → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ∈ ℕ₀)
77	76	nn0ge0d 11231	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ if(𝑁 ∈ 𝐴, (2↑𝑁), 0))
78	7	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ 𝐴) → (2↑𝑁) ∈ ℝ)
79		0red 9920	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ¬ 𝑁 ∈ 𝐴) → 0 ∈ ℝ)
80	78, 79	ifclda 4070	. . . . . . . . . . . 12 ⊢ (𝜑 → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ∈ ℝ)
81	7, 80	addge02d 10495	. . . . . . . . . . 11 ⊢ (𝜑 → (0 ≤ if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ↔ (2↑𝑁) ≤ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + (2↑𝑁))))
82	77, 81	mpbid 221	. . . . . . . . . 10 ⊢ (𝜑 → (2↑𝑁) ≤ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + (2↑𝑁)))
83	82	ad2antrr 758	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐵) → (2↑𝑁) ≤ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + (2↑𝑁)))
84		iftrue 4042	. . . . . . . . . . 11 ⊢ (𝑁 ∈ 𝐵 → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) = (2↑𝑁))
85	84	adantl 481	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐵) → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) = (2↑𝑁))
86	85	oveq2d 6565	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐵) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + (2↑𝑁)))
87	83, 86	breqtrrd 4611	. . . . . . . 8 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ 𝑁 ∈ 𝐵) → (2↑𝑁) ≤ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
88	74, 87	jaodan 822	. . . . . . 7 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)) → (2↑𝑁) ≤ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
89	8, 8, 42, 57, 60, 88	le2addd 10525	. . . . . 6 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵)) → ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
90	89	ex 449	. . . . 5 ⊢ ((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) → ((𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵) → ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
91		ioran 510	. . . . . 6 ⊢ (¬ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵) ↔ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵))
92		iffalse 4045	. . . . . . . . . . . . . 14 ⊢ (¬ 𝑁 ∈ 𝐴 → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) = 0)
93	92	ad2antrl 760	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) = 0)
94		iffalse 4045	. . . . . . . . . . . . . 14 ⊢ (¬ 𝑁 ∈ 𝐵 → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) = 0)
95	94	ad2antll 761	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) = 0)
96	93, 95	oveq12d 6567	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = (0 + 0))
97		00id 10090	. . . . . . . . . . . 12 ⊢ (0 + 0) = 0
98	96, 97	syl6eq 2660	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = 0)
99	98	oveq2d 6565	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) = (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + 0))
100	29	nn0red 11229	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℝ)
101	100	ad2antrr 758	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℝ)
102	39	nn0red 11229	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℝ)
103	102	ad2antrr 758	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℝ)
104	101, 103	readdcld 9948	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ∈ ℝ)
105	104	recnd 9947	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ∈ ℂ)
106	105	addid1d 10115	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + 0) = ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))))
107	99, 106	eqtrd 2644	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) = ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))))
108	22	fveq1i 6104	. . . . . . . . . . . . . . . 16 ⊢ (𝐾‘(𝐴 ∩ (0..^𝑁))) = (^◡(bits ↾ ℕ₀)‘(𝐴 ∩ (0..^𝑁)))
109	108	fveq2i 6106	. . . . . . . . . . . . . . 15 ⊢ ((bits ↾ ℕ₀)‘(𝐾‘(𝐴 ∩ (0..^𝑁)))) = ((bits ↾ ℕ₀)‘(^◡(bits ↾ ℕ₀)‘(𝐴 ∩ (0..^𝑁))))
110		fvres 6117	. . . . . . . . . . . . . . . 16 ⊢ ((𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℕ₀ → ((bits ↾ ℕ₀)‘(𝐾‘(𝐴 ∩ (0..^𝑁)))) = (bits‘(𝐾‘(𝐴 ∩ (0..^𝑁)))))
111	29, 110	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((bits ↾ ℕ₀)‘(𝐾‘(𝐴 ∩ (0..^𝑁)))) = (bits‘(𝐾‘(𝐴 ∩ (0..^𝑁)))))
112		f1ocnvfv2 6433	. . . . . . . . . . . . . . . 16 ⊢ (((bits ↾ ℕ₀):ℕ₀–1-1-onto→(𝒫 ℕ₀ ∩ Fin) ∧ (𝐴 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin)) → ((bits ↾ ℕ₀)‘(^◡(bits ↾ ℕ₀)‘(𝐴 ∩ (0..^𝑁)))) = (𝐴 ∩ (0..^𝑁)))
113	19, 18, 112	sylancr 694	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((bits ↾ ℕ₀)‘(^◡(bits ↾ ℕ₀)‘(𝐴 ∩ (0..^𝑁)))) = (𝐴 ∩ (0..^𝑁)))
114	109, 111, 113	3eqtr3a 2668	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (bits‘(𝐾‘(𝐴 ∩ (0..^𝑁)))) = (𝐴 ∩ (0..^𝑁)))
115	114, 14	syl6eqss 3618	. . . . . . . . . . . . 13 ⊢ (𝜑 → (bits‘(𝐾‘(𝐴 ∩ (0..^𝑁)))) ⊆ (0..^𝑁))
116	29	nn0zd 11356	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℤ)
117		bitsfzo 14995	. . . . . . . . . . . . . 14 ⊢ (((𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℤ ∧ 𝑁 ∈ ℕ₀) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)) ↔ (bits‘(𝐾‘(𝐴 ∩ (0..^𝑁)))) ⊆ (0..^𝑁)))
118	116, 5, 117	syl2anc 691	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)) ↔ (bits‘(𝐾‘(𝐴 ∩ (0..^𝑁)))) ⊆ (0..^𝑁)))
119	115, 118	mpbird 246	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)))
120		elfzolt2 12348	. . . . . . . . . . . 12 ⊢ ((𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)) → (𝐾‘(𝐴 ∩ (0..^𝑁))) < (2↑𝑁))
121	119, 120	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐾‘(𝐴 ∩ (0..^𝑁))) < (2↑𝑁))
122	22	fveq1i 6104	. . . . . . . . . . . . . . . 16 ⊢ (𝐾‘(𝐵 ∩ (0..^𝑁))) = (^◡(bits ↾ ℕ₀)‘(𝐵 ∩ (0..^𝑁)))
123	122	fveq2i 6106	. . . . . . . . . . . . . . 15 ⊢ ((bits ↾ ℕ₀)‘(𝐾‘(𝐵 ∩ (0..^𝑁)))) = ((bits ↾ ℕ₀)‘(^◡(bits ↾ ℕ₀)‘(𝐵 ∩ (0..^𝑁))))
124		fvres 6117	. . . . . . . . . . . . . . . 16 ⊢ ((𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℕ₀ → ((bits ↾ ℕ₀)‘(𝐾‘(𝐵 ∩ (0..^𝑁)))) = (bits‘(𝐾‘(𝐵 ∩ (0..^𝑁)))))
125	39, 124	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((bits ↾ ℕ₀)‘(𝐾‘(𝐵 ∩ (0..^𝑁)))) = (bits‘(𝐾‘(𝐵 ∩ (0..^𝑁)))))
126		f1ocnvfv2 6433	. . . . . . . . . . . . . . . 16 ⊢ (((bits ↾ ℕ₀):ℕ₀–1-1-onto→(𝒫 ℕ₀ ∩ Fin) ∧ (𝐵 ∩ (0..^𝑁)) ∈ (𝒫 ℕ₀ ∩ Fin)) → ((bits ↾ ℕ₀)‘(^◡(bits ↾ ℕ₀)‘(𝐵 ∩ (0..^𝑁)))) = (𝐵 ∩ (0..^𝑁)))
127	19, 37, 126	sylancr 694	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((bits ↾ ℕ₀)‘(^◡(bits ↾ ℕ₀)‘(𝐵 ∩ (0..^𝑁)))) = (𝐵 ∩ (0..^𝑁)))
128	123, 125, 127	3eqtr3a 2668	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (bits‘(𝐾‘(𝐵 ∩ (0..^𝑁)))) = (𝐵 ∩ (0..^𝑁)))
129	128, 33	syl6eqss 3618	. . . . . . . . . . . . 13 ⊢ (𝜑 → (bits‘(𝐾‘(𝐵 ∩ (0..^𝑁)))) ⊆ (0..^𝑁))
130	39	nn0zd 11356	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℤ)
131		bitsfzo 14995	. . . . . . . . . . . . . 14 ⊢ (((𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℤ ∧ 𝑁 ∈ ℕ₀) → ((𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)) ↔ (bits‘(𝐾‘(𝐵 ∩ (0..^𝑁)))) ⊆ (0..^𝑁)))
132	130, 5, 131	syl2anc 691	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)) ↔ (bits‘(𝐾‘(𝐵 ∩ (0..^𝑁)))) ⊆ (0..^𝑁)))
133	129, 132	mpbird 246	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)))
134		elfzolt2 12348	. . . . . . . . . . . 12 ⊢ ((𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ (0..^(2↑𝑁)) → (𝐾‘(𝐵 ∩ (0..^𝑁))) < (2↑𝑁))
135	133, 134	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐾‘(𝐵 ∩ (0..^𝑁))) < (2↑𝑁))
136	100, 102, 7, 7, 121, 135	lt2addd 10529	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) < ((2↑𝑁) + (2↑𝑁)))
137	136	ad2antrr 758	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) < ((2↑𝑁) + (2↑𝑁)))
138	107, 137	eqbrtrd 4605	. . . . . . . 8 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) < ((2↑𝑁) + (2↑𝑁)))
139	80	ad2antrr 758	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ∈ ℝ)
140	67	ad2antrr 758	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ∈ ℝ)
141	139, 140	readdcld 9948	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ∈ ℝ)
142	104, 141	readdcld 9948	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) ∈ ℝ)
143	7	ad2antrr 758	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → (2↑𝑁) ∈ ℝ)
144	143, 143	readdcld 9948	. . . . . . . . 9 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → ((2↑𝑁) + (2↑𝑁)) ∈ ℝ)
145	142, 144	ltnled 10063	. . . . . . . 8 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → ((((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) < ((2↑𝑁) + (2↑𝑁)) ↔ ¬ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
146	138, 145	mpbid 221	. . . . . . 7 ⊢ (((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) ∧ (¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵)) → ¬ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
147	146	ex 449	. . . . . 6 ⊢ ((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) → ((¬ 𝑁 ∈ 𝐴 ∧ ¬ 𝑁 ∈ 𝐵) → ¬ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
148	91, 147	syl5bi 231	. . . . 5 ⊢ ((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) → (¬ (𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵) → ¬ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
149	90, 148	impcon4bid 216	. . . 4 ⊢ ((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) → ((𝑁 ∈ 𝐴 ∨ 𝑁 ∈ 𝐵) ↔ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
150	2, 149	bitrd 267	. . 3 ⊢ ((𝜑 ∧ ∅ ∈ (𝐶‘𝑁)) → (cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁)) ↔ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
151		cad0 1547	. . . . 5 ⊢ (¬ ∅ ∈ (𝐶‘𝑁) → (cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁)) ↔ (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)))
152	151	adantl 481	. . . 4 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁)) ↔ (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)))
153	40	nn0ge0d 11231	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))))
154	7, 7	readdcld 9948	. . . . . . . . . 10 ⊢ (𝜑 → ((2↑𝑁) + (2↑𝑁)) ∈ ℝ)
155	154, 41	addge02d 10495	. . . . . . . . 9 ⊢ (𝜑 → (0 ≤ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ↔ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + ((2↑𝑁) + (2↑𝑁)))))
156	153, 155	mpbid 221	. . . . . . . 8 ⊢ (𝜑 → ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + ((2↑𝑁) + (2↑𝑁))))
157	156	ad2antrr 758	. . . . . . 7 ⊢ (((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)) → ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + ((2↑𝑁) + (2↑𝑁))))
158	71, 84	oveqan12d 6568	. . . . . . . . 9 ⊢ ((𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = ((2↑𝑁) + (2↑𝑁)))
159	158	adantl 481	. . . . . . . 8 ⊢ (((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = ((2↑𝑁) + (2↑𝑁)))
160	159	oveq2d 6565	. . . . . . 7 ⊢ (((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) = (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + ((2↑𝑁) + (2↑𝑁))))
161	157, 160	breqtrrd 4611	. . . . . 6 ⊢ (((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) ∧ (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)) → ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
162	161	ex 449	. . . . 5 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵) → ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
163	100	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℝ)
164	102	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℝ)
165	163, 164	readdcld 9948	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ∈ ℝ)
166	7	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (2↑𝑁) ∈ ℝ)
167	7, 41	lenltd 10062	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2↑𝑁) ≤ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ↔ ¬ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) < (2↑𝑁)))
168	58, 167	bitrd 267	. . . . . . . . . . 11 ⊢ (𝜑 → (∅ ∈ (𝐶‘𝑁) ↔ ¬ ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) < (2↑𝑁)))
169	168	con2bid 343	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) < (2↑𝑁) ↔ ¬ ∅ ∈ (𝐶‘𝑁)))
170	169	biimpar 501	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) < (2↑𝑁))
171	165, 166, 166, 170	ltadd1dd 10517	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) < ((2↑𝑁) + (2↑𝑁)))
172	165, 166	readdcld 9948	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) ∈ ℝ)
173	154	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((2↑𝑁) + (2↑𝑁)) ∈ ℝ)
174	41, 56	readdcld 9948	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) ∈ ℝ)
175	174	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) ∈ ℝ)
176		ltletr 10008	. . . . . . . . 9 ⊢ (((((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) ∈ ℝ ∧ ((2↑𝑁) + (2↑𝑁)) ∈ ℝ ∧ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) ∈ ℝ) → (((((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) < ((2↑𝑁) + (2↑𝑁)) ∧ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) < (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
177	172, 173, 175, 176	syl3anc 1318	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (((((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) < ((2↑𝑁) + (2↑𝑁)) ∧ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) < (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
178	171, 177	mpand 707	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) < (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
179	56	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ∈ ℝ)
180	41	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) ∈ ℝ)
181	166, 179, 180	ltadd2d 10072	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((2↑𝑁) < (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ↔ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (2↑𝑁)) < (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
182	178, 181	sylibrd 248	. . . . . 6 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) → (2↑𝑁) < (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
183	7, 56	ltnled 10063	. . . . . . . 8 ⊢ (𝜑 → ((2↑𝑁) < (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ↔ ¬ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁)))
184	63	nn0cnd 11230	. . . . . . . . . . . . 13 ⊢ (𝜑 → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ∈ ℂ)
185	184	addid2d 10116	. . . . . . . . . . . 12 ⊢ (𝜑 → (0 + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = if(𝑁 ∈ 𝐵, (2↑𝑁), 0))
186	7	leidd 10473	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2↑𝑁) ≤ (2↑𝑁))
187	61	nn0ge0d 11231	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ≤ (2↑𝑁))
188		breq1 4586	. . . . . . . . . . . . . 14 ⊢ ((2↑𝑁) = if(𝑁 ∈ 𝐵, (2↑𝑁), 0) → ((2↑𝑁) ≤ (2↑𝑁) ↔ if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ≤ (2↑𝑁)))
189		breq1 4586	. . . . . . . . . . . . . 14 ⊢ (0 = if(𝑁 ∈ 𝐵, (2↑𝑁), 0) → (0 ≤ (2↑𝑁) ↔ if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ≤ (2↑𝑁)))
190	188, 189	ifboth 4074	. . . . . . . . . . . . 13 ⊢ (((2↑𝑁) ≤ (2↑𝑁) ∧ 0 ≤ (2↑𝑁)) → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ≤ (2↑𝑁))
191	186, 187, 190	syl2anc 691	. . . . . . . . . . . 12 ⊢ (𝜑 → if(𝑁 ∈ 𝐵, (2↑𝑁), 0) ≤ (2↑𝑁))
192	185, 191	eqbrtrd 4605	. . . . . . . . . . 11 ⊢ (𝜑 → (0 + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁))
193	92	oveq1d 6564	. . . . . . . . . . . 12 ⊢ (¬ 𝑁 ∈ 𝐴 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = (0 + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
194	193	breq1d 4593	. . . . . . . . . . 11 ⊢ (¬ 𝑁 ∈ 𝐴 → ((if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁) ↔ (0 + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁)))
195	192, 194	syl5ibrcom 236	. . . . . . . . . 10 ⊢ (𝜑 → (¬ 𝑁 ∈ 𝐴 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁)))
196	195	con1d 138	. . . . . . . . 9 ⊢ (𝜑 → (¬ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁) → 𝑁 ∈ 𝐴))
197	76	nn0cnd 11230	. . . . . . . . . . . . 13 ⊢ (𝜑 → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ∈ ℂ)
198	197	addid1d 10115	. . . . . . . . . . . 12 ⊢ (𝜑 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + 0) = if(𝑁 ∈ 𝐴, (2↑𝑁), 0))
199		breq1 4586	. . . . . . . . . . . . . 14 ⊢ ((2↑𝑁) = if(𝑁 ∈ 𝐴, (2↑𝑁), 0) → ((2↑𝑁) ≤ (2↑𝑁) ↔ if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ≤ (2↑𝑁)))
200		breq1 4586	. . . . . . . . . . . . . 14 ⊢ (0 = if(𝑁 ∈ 𝐴, (2↑𝑁), 0) → (0 ≤ (2↑𝑁) ↔ if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ≤ (2↑𝑁)))
201	199, 200	ifboth 4074	. . . . . . . . . . . . 13 ⊢ (((2↑𝑁) ≤ (2↑𝑁) ∧ 0 ≤ (2↑𝑁)) → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ≤ (2↑𝑁))
202	186, 187, 201	syl2anc 691	. . . . . . . . . . . 12 ⊢ (𝜑 → if(𝑁 ∈ 𝐴, (2↑𝑁), 0) ≤ (2↑𝑁))
203	198, 202	eqbrtrd 4605	. . . . . . . . . . 11 ⊢ (𝜑 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + 0) ≤ (2↑𝑁))
204	94	oveq2d 6565	. . . . . . . . . . . 12 ⊢ (¬ 𝑁 ∈ 𝐵 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) = (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + 0))
205	204	breq1d 4593	. . . . . . . . . . 11 ⊢ (¬ 𝑁 ∈ 𝐵 → ((if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁) ↔ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + 0) ≤ (2↑𝑁)))
206	203, 205	syl5ibrcom 236	. . . . . . . . . 10 ⊢ (𝜑 → (¬ 𝑁 ∈ 𝐵 → (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁)))
207	206	con1d 138	. . . . . . . . 9 ⊢ (𝜑 → (¬ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁) → 𝑁 ∈ 𝐵))
208	196, 207	jcad 554	. . . . . . . 8 ⊢ (𝜑 → (¬ (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) ≤ (2↑𝑁) → (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)))
209	183, 208	sylbid 229	. . . . . . 7 ⊢ (𝜑 → ((2↑𝑁) < (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) → (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)))
210	209	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((2↑𝑁) < (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)) → (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)))
211	182, 210	syld 46	. . . . 5 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) → (𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵)))
212	162, 211	impbid 201	. . . 4 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → ((𝑁 ∈ 𝐴 ∧ 𝑁 ∈ 𝐵) ↔ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
213	152, 212	bitrd 267	. . 3 ⊢ ((𝜑 ∧ ¬ ∅ ∈ (𝐶‘𝑁)) → (cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁)) ↔ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
214	150, 213	pm2.61dan 828	. 2 ⊢ (𝜑 → (cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁)) ↔ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
215		sadval.c	. . 3 ⊢ 𝐶 = seq0((𝑐 ∈ 2_𝑜, 𝑚 ∈ ℕ₀ ↦ if(cadd(𝑚 ∈ 𝐴, 𝑚 ∈ 𝐵, ∅ ∈ 𝑐), 1_𝑜, ∅)), (𝑛 ∈ ℕ₀ ↦ if(𝑛 = 0, ∅, (𝑛 − 1))))
216	10, 31, 215, 5	sadcp1 15015	. 2 ⊢ (𝜑 → (∅ ∈ (𝐶‘(𝑁 + 1)) ↔ cadd(𝑁 ∈ 𝐴, 𝑁 ∈ 𝐵, ∅ ∈ (𝐶‘𝑁))))
217		2cnd 10970	. . . . 5 ⊢ (𝜑 → 2 ∈ ℂ)
218	217, 5	expp1d 12871	. . . 4 ⊢ (𝜑 → (2↑(𝑁 + 1)) = ((2↑𝑁) · 2))
219	6	nncnd 10913	. . . . 5 ⊢ (𝜑 → (2↑𝑁) ∈ ℂ)
220	219	times2d 11153	. . . 4 ⊢ (𝜑 → ((2↑𝑁) · 2) = ((2↑𝑁) + (2↑𝑁)))
221	218, 220	eqtrd 2644	. . 3 ⊢ (𝜑 → (2↑(𝑁 + 1)) = ((2↑𝑁) + (2↑𝑁)))
222	22	bitsinvp1 15009	. . . . . 6 ⊢ ((𝐴 ⊆ ℕ₀ ∧ 𝑁 ∈ ℕ₀) → (𝐾‘(𝐴 ∩ (0..^(𝑁 + 1)))) = ((𝐾‘(𝐴 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐴, (2↑𝑁), 0)))
223	10, 5, 222	syl2anc 691	. . . . 5 ⊢ (𝜑 → (𝐾‘(𝐴 ∩ (0..^(𝑁 + 1)))) = ((𝐾‘(𝐴 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐴, (2↑𝑁), 0)))
224	22	bitsinvp1 15009	. . . . . 6 ⊢ ((𝐵 ⊆ ℕ₀ ∧ 𝑁 ∈ ℕ₀) → (𝐾‘(𝐵 ∩ (0..^(𝑁 + 1)))) = ((𝐾‘(𝐵 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
225	31, 5, 224	syl2anc 691	. . . . 5 ⊢ (𝜑 → (𝐾‘(𝐵 ∩ (0..^(𝑁 + 1)))) = ((𝐾‘(𝐵 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))
226	223, 225	oveq12d 6567	. . . 4 ⊢ (𝜑 → ((𝐾‘(𝐴 ∩ (0..^(𝑁 + 1)))) + (𝐾‘(𝐵 ∩ (0..^(𝑁 + 1))))) = (((𝐾‘(𝐴 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐴, (2↑𝑁), 0)) + ((𝐾‘(𝐵 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
227	29	nn0cnd 11230	. . . . 5 ⊢ (𝜑 → (𝐾‘(𝐴 ∩ (0..^𝑁))) ∈ ℂ)
228	39	nn0cnd 11230	. . . . 5 ⊢ (𝜑 → (𝐾‘(𝐵 ∩ (0..^𝑁))) ∈ ℂ)
229	227, 197, 228, 184	add4d 10143	. . . 4 ⊢ (𝜑 → (((𝐾‘(𝐴 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐴, (2↑𝑁), 0)) + ((𝐾‘(𝐵 ∩ (0..^𝑁))) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))) = (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
230	226, 229	eqtrd 2644	. . 3 ⊢ (𝜑 → ((𝐾‘(𝐴 ∩ (0..^(𝑁 + 1)))) + (𝐾‘(𝐵 ∩ (0..^(𝑁 + 1))))) = (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0))))
231	221, 230	breq12d 4596	. 2 ⊢ (𝜑 → ((2↑(𝑁 + 1)) ≤ ((𝐾‘(𝐴 ∩ (0..^(𝑁 + 1)))) + (𝐾‘(𝐵 ∩ (0..^(𝑁 + 1))))) ↔ ((2↑𝑁) + (2↑𝑁)) ≤ (((𝐾‘(𝐴 ∩ (0..^𝑁))) + (𝐾‘(𝐵 ∩ (0..^𝑁)))) + (if(𝑁 ∈ 𝐴, (2↑𝑁), 0) + if(𝑁 ∈ 𝐵, (2↑𝑁), 0)))))
232	214, 216, 231	3bitr4d 299	1 ⊢ (𝜑 → (∅ ∈ (𝐶‘(𝑁 + 1)) ↔ (2↑(𝑁 + 1)) ≤ ((𝐾‘(𝐴 ∩ (0..^(𝑁 + 1)))) + (𝐾‘(𝐵 ∩ (0..^(𝑁 + 1)))))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 195 ∨ wo 382 ∧ wa 383 = wceq 1475 caddwcad 1536 ∈ wcel 1977 ∩ cin 3539 ⊆ wss 3540 ∅c0 3874 ifcif 4036 𝒫 cpw 4108 class class class wbr 4583 ↦ cmpt 4643 ^◡ccnv 5037 ↾ cres 5040 ⟶wf 5800 –1-1-onto→wf1o 5803 ‘cfv 5804 (class class class)co 6549 ↦ cmpt2 6551 1_𝑜c1o 7440 2_𝑜c2o 7441 Fincfn 7841 ℝcr 9814 0cc0 9815 1c1 9816 + caddc 9818 · cmul 9820 < clt 9953 ≤ cle 9954 − cmin 10145 ℕcn 10897 2c2 10947 ℕ₀cn0 11169 ℤcz 11254 ..^cfzo 12334 seqcseq 12663 ↑cexp 12722 bitscbits 14979

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1713 ax-4 1728 ax-5 1827 ax-6 1875 ax-7 1922 ax-8 1979 ax-9 1986 ax-10 2006 ax-11 2021 ax-12 2034 ax-13 2234 ax-ext 2590 ax-rep 4699 ax-sep 4709 ax-nul 4717 ax-pow 4769 ax-pr 4833 ax-un 6847 ax-inf2 8421 ax-cnex 9871 ax-resscn 9872 ax-1cn 9873 ax-icn 9874 ax-addcl 9875 ax-addrcl 9876 ax-mulcl 9877 ax-mulrcl 9878 ax-mulcom 9879 ax-addass 9880 ax-mulass 9881 ax-distr 9882 ax-i2m1 9883 ax-1ne0 9884 ax-1rid 9885 ax-rnegex 9886 ax-rrecex 9887 ax-cnre 9888 ax-pre-lttri 9889 ax-pre-lttrn 9890 ax-pre-ltadd 9891 ax-pre-mulgt0 9892 ax-pre-sup 9893

This theorem depends on definitions: df-bi 196 df-or 384 df-an 385 df-3or 1032 df-3an 1033 df-xor 1457 df-tru 1478 df-fal 1481 df-cad 1537 df-ex 1696 df-nf 1701 df-sb 1868 df-eu 2462 df-mo 2463 df-clab 2597 df-cleq 2603 df-clel 2606 df-nfc 2740 df-ne 2782 df-nel 2783 df-ral 2901 df-rex 2902 df-reu 2903 df-rmo 2904 df-rab 2905 df-v 3175 df-sbc 3403 df-csb 3500 df-dif 3543 df-un 3545 df-in 3547 df-ss 3554 df-pss 3556 df-nul 3875 df-if 4037 df-pw 4110 df-sn 4126 df-pr 4128 df-tp 4130 df-op 4132 df-uni 4373 df-int 4411 df-iun 4457 df-disj 4554 df-br 4584 df-opab 4644 df-mpt 4645 df-tr 4681 df-eprel 4949 df-id 4953 df-po 4959 df-so 4960 df-fr 4997 df-se 4998 df-we 4999 df-xp 5044 df-rel 5045 df-cnv 5046 df-co 5047 df-dm 5048 df-rn 5049 df-res 5050 df-ima 5051 df-pred 5597 df-ord 5643 df-on 5644 df-lim 5645 df-suc 5646 df-iota 5768 df-fun 5806 df-fn 5807 df-f 5808 df-f1 5809 df-fo 5810 df-f1o 5811 df-fv 5812 df-isom 5813 df-riota 6511 df-ov 6552 df-oprab 6553 df-mpt2 6554 df-om 6958 df-1st 7059 df-2nd 7060 df-wrecs 7294 df-recs 7355 df-rdg 7393 df-1o 7447 df-2o 7448 df-oadd 7451 df-er 7629 df-map 7746 df-pm 7747 df-en 7842 df-dom 7843 df-sdom 7844 df-fin 7845 df-sup 8231 df-inf 8232 df-oi 8298 df-card 8648 df-cda 8873 df-pnf 9955 df-mnf 9956 df-xr 9957 df-ltxr 9958 df-le 9959 df-sub 10147 df-neg 10148 df-div 10564 df-nn 10898 df-2 10956 df-3 10957 df-n0 11170 df-xnn0 11241 df-z 11255 df-uz 11564 df-rp 11709 df-fz 12198 df-fzo 12335 df-fl 12455 df-mod 12531 df-seq 12664 df-exp 12723 df-hash 12980 df-cj 13687 df-re 13688 df-im 13689 df-sqrt 13823 df-abs 13824 df-clim 14067 df-sum 14265 df-dvds 14822 df-bits 14982

This theorem is referenced by: sadcadd 15018

W3C validator