Theorem log2ublem1 27148

Description: Lemma for log2ub 27151. The proof of log2ub 27151, which is simply the evaluation of log2tlbnd 27147 for 𝑁 = 4, takes the form of the addition of five fractions and showing this is less than another fraction. We could just perform exact arithmetic on these fractions, get a large rational number, and just multiply everything to verify the claim, but as anyone who uses decimal numbers for this task knows, it is often better to pick a common denominator 𝑑 (usually a large power of 10) and work with the closest approximations of the form 𝑛 / 𝑑 for some integer 𝑛 instead. It turns out that for our purposes it is sufficient to take 𝑑 = (3↑7) · 5 · 7, which is also nice because it shares many factors in common with the fractions in question. (Contributed by Mario Carneiro, 17-Apr-2015.)

Hypotheses

Ref	Expression
log2ublem1.1	⊢ (((3↑7) · (5 · 7)) · 𝐴) ≤ 𝐵
log2ublem1.2	⊢ 𝐴 ∈ ℝ
log2ublem1.3	⊢ 𝐷 ∈ ℕ0
log2ublem1.4	⊢ 𝐸 ∈ ℕ
log2ublem1.5	⊢ 𝐵 ∈ ℕ0
log2ublem1.6	⊢ 𝐹 ∈ ℕ0
log2ublem1.7	⊢ 𝐶 = (𝐴 + (𝐷 / 𝐸))
log2ublem1.8	⊢ (𝐵 + 𝐹) = 𝐺
log2ublem1.9	⊢ (((3↑7) · (5 · 7)) · 𝐷) ≤ (𝐸 · 𝐹)

Assertion

Ref	Expression
log2ublem1	⊢ (((3↑7) · (5 · 7)) · 𝐶) ≤ 𝐺

Proof of Theorem log2ublem1

Step	Hyp	Ref	Expression
1		log2ublem1.1	. . 3 ⊢ (((3↑7) · (5 · 7)) · 𝐴) ≤ 𝐵
2		3nn 12338	. . . . . . . 8 ⊢ 3 ∈ ℕ
3		7nn0 12544	. . . . . . . 8 ⊢ 7 ∈ ℕ0
4		nnexpcl 14130	. . . . . . . 8 ⊢ ((3 ∈ ℕ ∧ 7 ∈ ℕ0) → (3↑7) ∈ ℕ)
5	2, 3, 4	mp2an 705	. . . . . . 7 ⊢ (3↑7) ∈ ℕ
6		5nn 12345	. . . . . . . 8 ⊢ 5 ∈ ℕ
7		7nn 12351	. . . . . . . 8 ⊢ 7 ∈ ℕ
8	6, 7	nnmulcli 12276	. . . . . . 7 ⊢ (5 · 7) ∈ ℕ
9	5, 8	nnmulcli 12276	. . . . . 6 ⊢ ((3↑7) · (5 · 7)) ∈ ℕ
10	9	nncni 12261	. . . . 5 ⊢ ((3↑7) · (5 · 7)) ∈ ℂ
11		log2ublem1.3	. . . . . 6 ⊢ 𝐷 ∈ ℕ0
12	11	nn0cni 12534	. . . . 5 ⊢ 𝐷 ∈ ℂ
13		log2ublem1.4	. . . . . 6 ⊢ 𝐸 ∈ ℕ
14	13	nncni 12261	. . . . 5 ⊢ 𝐸 ∈ ℂ
15	13	nnne0i 12294	. . . . 5 ⊢ 𝐸 ≠ 0
16	10, 12, 14, 15	divassi 11989	. . . 4 ⊢ ((((3↑7) · (5 · 7)) · 𝐷) / 𝐸) = (((3↑7) · (5 · 7)) · (𝐷 / 𝐸))
17		log2ublem1.9	. . . . 5 ⊢ (((3↑7) · (5 · 7)) · 𝐷) ≤ (𝐸 · 𝐹)
18		3nn0 12540	. . . . . . . . . 10 ⊢ 3 ∈ ℕ0
19	18, 3	nn0expcli 14144	. . . . . . . . 9 ⊢ (3↑7) ∈ ℕ0
20		5nn0 12542	. . . . . . . . . 10 ⊢ 5 ∈ ℕ0
21	20, 3	nn0mulcli 12560	. . . . . . . . 9 ⊢ (5 · 7) ∈ ℕ0
22	19, 21	nn0mulcli 12560	. . . . . . . 8 ⊢ ((3↑7) · (5 · 7)) ∈ ℕ0
23	22, 11	nn0mulcli 12560	. . . . . . 7 ⊢ (((3↑7) · (5 · 7)) · 𝐷) ∈ ℕ0
24	23	nn0rei 12533	. . . . . 6 ⊢ (((3↑7) · (5 · 7)) · 𝐷) ∈ ℝ
25		log2ublem1.6	. . . . . . 7 ⊢ 𝐹 ∈ ℕ0
26	25	nn0rei 12533	. . . . . 6 ⊢ 𝐹 ∈ ℝ
27	13	nnrei 12260	. . . . . . 7 ⊢ 𝐸 ∈ ℝ
28	13	nngt0i 12293	. . . . . . 7 ⊢ 0 < 𝐸
29	27, 28	pm3.2i 476	. . . . . 6 ⊢ (𝐸 ∈ ℝ ∧ 0 < 𝐸)
30		ledivmul 12109	. . . . . 6 ⊢ (((((3↑7) · (5 · 7)) · 𝐷) ∈ ℝ ∧ 𝐹 ∈ ℝ ∧ (𝐸 ∈ ℝ ∧ 0 < 𝐸)) → (((((3↑7) · (5 · 7)) · 𝐷) / 𝐸) ≤ 𝐹 ↔ (((3↑7) · (5 · 7)) · 𝐷) ≤ (𝐸 · 𝐹)))
31	24, 26, 29, 30	mp3an 1490	. . . . 5 ⊢ (((((3↑7) · (5 · 7)) · 𝐷) / 𝐸) ≤ 𝐹 ↔ (((3↑7) · (5 · 7)) · 𝐷) ≤ (𝐸 · 𝐹))
32	17, 31	mpbir 234	. . . 4 ⊢ ((((3↑7) · (5 · 7)) · 𝐷) / 𝐸) ≤ 𝐹
33	16, 32	eqbrtrri 5139	. . 3 ⊢ (((3↑7) · (5 · 7)) · (𝐷 / 𝐸)) ≤ 𝐹
34	9	nnrei 12260	. . . . 5 ⊢ ((3↑7) · (5 · 7)) ∈ ℝ
35		log2ublem1.2	. . . . 5 ⊢ 𝐴 ∈ ℝ
36	34, 35	remulcli 11243	. . . 4 ⊢ (((3↑7) · (5 · 7)) · 𝐴) ∈ ℝ
37	11	nn0rei 12533	. . . . . 6 ⊢ 𝐷 ∈ ℝ
38		nndivre 12295	. . . . . 6 ⊢ ((𝐷 ∈ ℝ ∧ 𝐸 ∈ ℕ) → (𝐷 / 𝐸) ∈ ℝ)
39	37, 13, 38	mp2an 705	. . . . 5 ⊢ (𝐷 / 𝐸) ∈ ℝ
40	34, 39	remulcli 11243	. . . 4 ⊢ (((3↑7) · (5 · 7)) · (𝐷 / 𝐸)) ∈ ℝ
41		log2ublem1.5	. . . . 5 ⊢ 𝐵 ∈ ℕ0
42	41	nn0rei 12533	. . . 4 ⊢ 𝐵 ∈ ℝ
43	36, 40, 42, 26	le2addi 11795	. . 3 ⊢ (((((3↑7) · (5 · 7)) · 𝐴) ≤ 𝐵 ∧ (((3↑7) · (5 · 7)) · (𝐷 / 𝐸)) ≤ 𝐹) → ((((3↑7) · (5 · 7)) · 𝐴) + (((3↑7) · (5 · 7)) · (𝐷 / 𝐸))) ≤ (𝐵 + 𝐹))
44	1, 33, 43	mp2an 705	. 2 ⊢ ((((3↑7) · (5 · 7)) · 𝐴) + (((3↑7) · (5 · 7)) · (𝐷 / 𝐸))) ≤ (𝐵 + 𝐹)
45		log2ublem1.7	. . . 4 ⊢ 𝐶 = (𝐴 + (𝐷 / 𝐸))
46	45	oveq2i 7434	. . 3 ⊢ (((3↑7) · (5 · 7)) · 𝐶) = (((3↑7) · (5 · 7)) · (𝐴 + (𝐷 / 𝐸)))
47	35	recni 11241	. . . 4 ⊢ 𝐴 ∈ ℂ
48	39	recni 11241	. . . 4 ⊢ (𝐷 / 𝐸) ∈ ℂ
49	10, 47, 48	adddii 11239	. . 3 ⊢ (((3↑7) · (5 · 7)) · (𝐴 + (𝐷 / 𝐸))) = ((((3↑7) · (5 · 7)) · 𝐴) + (((3↑7) · (5 · 7)) · (𝐷 / 𝐸)))
50	46, 49	eqtr2i 2790	. 2 ⊢ ((((3↑7) · (5 · 7)) · 𝐴) + (((3↑7) · (5 · 7)) · (𝐷 / 𝐸))) = (((3↑7) · (5 · 7)) · 𝐶)
51		log2ublem1.8	. 2 ⊢ (𝐵 + 𝐹) = 𝐺
52	44, 50, 51	3brtr3i 5145	1 ⊢ (((3↑7) · (5 · 7)) · 𝐶) ≤ 𝐺

This proof depends on syntax axioms:   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2146   class class class wbr 5114  (class class class)co 7423  ℝcr 11117  0cc0 11118   + caddc 11121   · cmul 11123   < clt 11261   ≤ cle 11262   / cdiv 11889  ℕcn 12251  3c3 12314  5c5 12316  7c7 12318  ℕ₀cn0 12522  ↑cexp 14117

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 2738  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745  ax-cnex 11174  ax-resscn 11175  ax-1cn 11176  ax-icn 11177  ax-addcl 11178  ax-addrcl 11179  ax-mulcl 11180  ax-mulrcl 11181  ax-mulcom 11182  ax-addass 11183  ax-mulass 11184  ax-distr 11185  ax-i2m1 11186  ax-1ne0 11187  ax-1rid 11188  ax-rnegex 11189  ax-rrecex 11190  ax-cnre 11191  ax-pre-lttri 11192  ax-pre-lttrn 11193  ax-pre-ltadd 11194  ax-pre-mulgt0 11195

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 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-nel 3068  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-tr 5224  df-id 5561  df-eprel 5566  df-po 5574  df-so 5575  df-fr 5619  df-we 5621  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6309  df-ord 6370  df-on 6371  df-lim 6372  df-suc 6373  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7380  df-ov 7426  df-oprab 7427  df-mpo 7428  df-om 7872  df-2nd 7996  df-frecs 8287  df-wrecs 8318  df-recs 8367  df-rdg 8406  df-er 8703  df-en 8953  df-dom 8954  df-sdom 8955  df-pnf 11263  df-mnf 11264  df-xr 11265  df-ltxr 11266  df-le 11267  df-sub 11461  df-neg 11462  df-div 11890  df-nn 12252  df-2 12321  df-3 12322  df-4 12323  df-5 12324  df-6 12325  df-7 12326  df-n0 12523  df-z 12610  df-uz 12881  df-seq 14058  df-exp 14118

This theorem is used by:  log2ublem2  27149  log2ub  27151