ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  bernneq GIF version

Theorem bernneq 10643
Description: Bernoulli's inequality, due to Johan Bernoulli (1667-1748). (Contributed by NM, 21-Feb-2005.)
Assertion
Ref Expression
bernneq ((๐ด โˆˆ โ„ โˆง ๐‘ โˆˆ โ„•0 โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘)) โ‰ค ((1 + ๐ด)โ†‘๐‘))

Proof of Theorem bernneq
Dummy variables ๐‘— ๐‘˜ are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq2 5885 . . . . . . . 8 (๐‘— = 0 โ†’ (๐ด ยท ๐‘—) = (๐ด ยท 0))
21oveq2d 5893 . . . . . . 7 (๐‘— = 0 โ†’ (1 + (๐ด ยท ๐‘—)) = (1 + (๐ด ยท 0)))
3 oveq2 5885 . . . . . . 7 (๐‘— = 0 โ†’ ((1 + ๐ด)โ†‘๐‘—) = ((1 + ๐ด)โ†‘0))
42, 3breq12d 4018 . . . . . 6 (๐‘— = 0 โ†’ ((1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—) โ†” (1 + (๐ด ยท 0)) โ‰ค ((1 + ๐ด)โ†‘0)))
54imbi2d 230 . . . . 5 (๐‘— = 0 โ†’ (((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—)) โ†” ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท 0)) โ‰ค ((1 + ๐ด)โ†‘0))))
6 oveq2 5885 . . . . . . . 8 (๐‘— = ๐‘˜ โ†’ (๐ด ยท ๐‘—) = (๐ด ยท ๐‘˜))
76oveq2d 5893 . . . . . . 7 (๐‘— = ๐‘˜ โ†’ (1 + (๐ด ยท ๐‘—)) = (1 + (๐ด ยท ๐‘˜)))
8 oveq2 5885 . . . . . . 7 (๐‘— = ๐‘˜ โ†’ ((1 + ๐ด)โ†‘๐‘—) = ((1 + ๐ด)โ†‘๐‘˜))
97, 8breq12d 4018 . . . . . 6 (๐‘— = ๐‘˜ โ†’ ((1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—) โ†” (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜)))
109imbi2d 230 . . . . 5 (๐‘— = ๐‘˜ โ†’ (((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—)) โ†” ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))))
11 oveq2 5885 . . . . . . . 8 (๐‘— = (๐‘˜ + 1) โ†’ (๐ด ยท ๐‘—) = (๐ด ยท (๐‘˜ + 1)))
1211oveq2d 5893 . . . . . . 7 (๐‘— = (๐‘˜ + 1) โ†’ (1 + (๐ด ยท ๐‘—)) = (1 + (๐ด ยท (๐‘˜ + 1))))
13 oveq2 5885 . . . . . . 7 (๐‘— = (๐‘˜ + 1) โ†’ ((1 + ๐ด)โ†‘๐‘—) = ((1 + ๐ด)โ†‘(๐‘˜ + 1)))
1412, 13breq12d 4018 . . . . . 6 (๐‘— = (๐‘˜ + 1) โ†’ ((1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—) โ†” (1 + (๐ด ยท (๐‘˜ + 1))) โ‰ค ((1 + ๐ด)โ†‘(๐‘˜ + 1))))
1514imbi2d 230 . . . . 5 (๐‘— = (๐‘˜ + 1) โ†’ (((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—)) โ†” ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) โ‰ค ((1 + ๐ด)โ†‘(๐‘˜ + 1)))))
16 oveq2 5885 . . . . . . . 8 (๐‘— = ๐‘ โ†’ (๐ด ยท ๐‘—) = (๐ด ยท ๐‘))
1716oveq2d 5893 . . . . . . 7 (๐‘— = ๐‘ โ†’ (1 + (๐ด ยท ๐‘—)) = (1 + (๐ด ยท ๐‘)))
18 oveq2 5885 . . . . . . 7 (๐‘— = ๐‘ โ†’ ((1 + ๐ด)โ†‘๐‘—) = ((1 + ๐ด)โ†‘๐‘))
1917, 18breq12d 4018 . . . . . 6 (๐‘— = ๐‘ โ†’ ((1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—) โ†” (1 + (๐ด ยท ๐‘)) โ‰ค ((1 + ๐ด)โ†‘๐‘)))
2019imbi2d 230 . . . . 5 (๐‘— = ๐‘ โ†’ (((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘—)) โ‰ค ((1 + ๐ด)โ†‘๐‘—)) โ†” ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘)) โ‰ค ((1 + ๐ด)โ†‘๐‘))))
21 recn 7946 . . . . . . 7 (๐ด โˆˆ โ„ โ†’ ๐ด โˆˆ โ„‚)
22 mul01 8348 . . . . . . . . . 10 (๐ด โˆˆ โ„‚ โ†’ (๐ด ยท 0) = 0)
2322oveq2d 5893 . . . . . . . . 9 (๐ด โˆˆ โ„‚ โ†’ (1 + (๐ด ยท 0)) = (1 + 0))
24 1p0e1 9037 . . . . . . . . 9 (1 + 0) = 1
2523, 24eqtrdi 2226 . . . . . . . 8 (๐ด โˆˆ โ„‚ โ†’ (1 + (๐ด ยท 0)) = 1)
26 1le1 8531 . . . . . . . . 9 1 โ‰ค 1
27 ax-1cn 7906 . . . . . . . . . . 11 1 โˆˆ โ„‚
28 addcl 7938 . . . . . . . . . . 11 ((1 โˆˆ โ„‚ โˆง ๐ด โˆˆ โ„‚) โ†’ (1 + ๐ด) โˆˆ โ„‚)
2927, 28mpan 424 . . . . . . . . . 10 (๐ด โˆˆ โ„‚ โ†’ (1 + ๐ด) โˆˆ โ„‚)
30 exp0 10526 . . . . . . . . . 10 ((1 + ๐ด) โˆˆ โ„‚ โ†’ ((1 + ๐ด)โ†‘0) = 1)
3129, 30syl 14 . . . . . . . . 9 (๐ด โˆˆ โ„‚ โ†’ ((1 + ๐ด)โ†‘0) = 1)
3226, 31breqtrrid 4043 . . . . . . . 8 (๐ด โˆˆ โ„‚ โ†’ 1 โ‰ค ((1 + ๐ด)โ†‘0))
3325, 32eqbrtrd 4027 . . . . . . 7 (๐ด โˆˆ โ„‚ โ†’ (1 + (๐ด ยท 0)) โ‰ค ((1 + ๐ด)โ†‘0))
3421, 33syl 14 . . . . . 6 (๐ด โˆˆ โ„ โ†’ (1 + (๐ด ยท 0)) โ‰ค ((1 + ๐ด)โ†‘0))
3534adantr 276 . . . . 5 ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท 0)) โ‰ค ((1 + ๐ด)โ†‘0))
36 1re 7958 . . . . . . . . . . . . . 14 1 โˆˆ โ„
37 nn0re 9187 . . . . . . . . . . . . . . 15 (๐‘˜ โˆˆ โ„•0 โ†’ ๐‘˜ โˆˆ โ„)
38 remulcl 7941 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„) โ†’ (๐ด ยท ๐‘˜) โˆˆ โ„)
3937, 38sylan2 286 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (๐ด ยท ๐‘˜) โˆˆ โ„)
40 readdcl 7939 . . . . . . . . . . . . . 14 ((1 โˆˆ โ„ โˆง (๐ด ยท ๐‘˜) โˆˆ โ„) โ†’ (1 + (๐ด ยท ๐‘˜)) โˆˆ โ„)
4136, 39, 40sylancr 414 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (1 + (๐ด ยท ๐‘˜)) โˆˆ โ„)
42 simpl 109 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ๐ด โˆˆ โ„)
43 readdcl 7939 . . . . . . . . . . . . 13 (((1 + (๐ด ยท ๐‘˜)) โˆˆ โ„ โˆง ๐ด โˆˆ โ„) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โˆˆ โ„)
4441, 42, 43syl2anc 411 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โˆˆ โ„)
4544adantr 276 . . . . . . . . . . 11 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โˆˆ โ„)
46 readdcl 7939 . . . . . . . . . . . . . . 15 ((1 โˆˆ โ„ โˆง ๐ด โˆˆ โ„) โ†’ (1 + ๐ด) โˆˆ โ„)
4736, 46mpan 424 . . . . . . . . . . . . . 14 (๐ด โˆˆ โ„ โ†’ (1 + ๐ด) โˆˆ โ„)
4847adantr 276 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (1 + ๐ด) โˆˆ โ„)
4941, 48remulcld 7990 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)) โˆˆ โ„)
5049adantr 276 . . . . . . . . . . 11 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)) โˆˆ โ„)
51 reexpcl 10539 . . . . . . . . . . . . . 14 (((1 + ๐ด) โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + ๐ด)โ†‘๐‘˜) โˆˆ โ„)
5247, 51sylan 283 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + ๐ด)โ†‘๐‘˜) โˆˆ โ„)
5352, 48remulcld 7990 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (((1 + ๐ด)โ†‘๐‘˜) ยท (1 + ๐ด)) โˆˆ โ„)
5453adantr 276 . . . . . . . . . . 11 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ (((1 + ๐ด)โ†‘๐‘˜) ยท (1 + ๐ด)) โˆˆ โ„)
55 remulcl 7941 . . . . . . . . . . . . . . . . . 18 ((๐ด โˆˆ โ„ โˆง ๐ด โˆˆ โ„) โ†’ (๐ด ยท ๐ด) โˆˆ โ„)
5655anidms 397 . . . . . . . . . . . . . . . . 17 (๐ด โˆˆ โ„ โ†’ (๐ด ยท ๐ด) โˆˆ โ„)
57 msqge0 8575 . . . . . . . . . . . . . . . . 17 (๐ด โˆˆ โ„ โ†’ 0 โ‰ค (๐ด ยท ๐ด))
5856, 57jca 306 . . . . . . . . . . . . . . . 16 (๐ด โˆˆ โ„ โ†’ ((๐ด ยท ๐ด) โˆˆ โ„ โˆง 0 โ‰ค (๐ด ยท ๐ด)))
59 nn0ge0 9203 . . . . . . . . . . . . . . . . 17 (๐‘˜ โˆˆ โ„•0 โ†’ 0 โ‰ค ๐‘˜)
6037, 59jca 306 . . . . . . . . . . . . . . . 16 (๐‘˜ โˆˆ โ„•0 โ†’ (๐‘˜ โˆˆ โ„ โˆง 0 โ‰ค ๐‘˜))
61 mulge0 8578 . . . . . . . . . . . . . . . 16 ((((๐ด ยท ๐ด) โˆˆ โ„ โˆง 0 โ‰ค (๐ด ยท ๐ด)) โˆง (๐‘˜ โˆˆ โ„ โˆง 0 โ‰ค ๐‘˜)) โ†’ 0 โ‰ค ((๐ด ยท ๐ด) ยท ๐‘˜))
6258, 60, 61syl2an 289 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ 0 โ‰ค ((๐ด ยท ๐ด) ยท ๐‘˜))
6321adantr 276 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ๐ด โˆˆ โ„‚)
64 nn0cn 9188 . . . . . . . . . . . . . . . . 17 (๐‘˜ โˆˆ โ„•0 โ†’ ๐‘˜ โˆˆ โ„‚)
6564adantl 277 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ๐‘˜ โˆˆ โ„‚)
6663, 63, 65mul32d 8112 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((๐ด ยท ๐ด) ยท ๐‘˜) = ((๐ด ยท ๐‘˜) ยท ๐ด))
6762, 66breqtrd 4031 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ 0 โ‰ค ((๐ด ยท ๐‘˜) ยท ๐ด))
68 simpl 109 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„) โ†’ ๐ด โˆˆ โ„)
6938, 68remulcld 7990 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„) โ†’ ((๐ด ยท ๐‘˜) ยท ๐ด) โˆˆ โ„)
7037, 69sylan2 286 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((๐ด ยท ๐‘˜) ยท ๐ด) โˆˆ โ„)
7144, 70addge01d 8492 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (0 โ‰ค ((๐ด ยท ๐‘˜) ยท ๐ด) โ†” ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โ‰ค (((1 + (๐ด ยท ๐‘˜)) + ๐ด) + ((๐ด ยท ๐‘˜) ยท ๐ด))))
7267, 71mpbid 147 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โ‰ค (((1 + (๐ด ยท ๐‘˜)) + ๐ด) + ((๐ด ยท ๐‘˜) ยท ๐ด)))
73 mulcl 7940 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (๐ด ยท ๐‘˜) โˆˆ โ„‚)
74 addcl 7938 . . . . . . . . . . . . . . . . 17 ((1 โˆˆ โ„‚ โˆง (๐ด ยท ๐‘˜) โˆˆ โ„‚) โ†’ (1 + (๐ด ยท ๐‘˜)) โˆˆ โ„‚)
7527, 73, 74sylancr 414 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (1 + (๐ด ยท ๐‘˜)) โˆˆ โ„‚)
76 simpl 109 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ ๐ด โˆˆ โ„‚)
7773, 76mulcld 7980 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ ((๐ด ยท ๐‘˜) ยท ๐ด) โˆˆ โ„‚)
7875, 76, 77addassd 7982 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (((1 + (๐ด ยท ๐‘˜)) + ๐ด) + ((๐ด ยท ๐‘˜) ยท ๐ด)) = ((1 + (๐ด ยท ๐‘˜)) + (๐ด + ((๐ด ยท ๐‘˜) ยท ๐ด))))
79 muladd11 8092 . . . . . . . . . . . . . . . 16 (((๐ด ยท ๐‘˜) โˆˆ โ„‚ โˆง ๐ด โˆˆ โ„‚) โ†’ ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)) = ((1 + (๐ด ยท ๐‘˜)) + (๐ด + ((๐ด ยท ๐‘˜) ยท ๐ด))))
8073, 76, 79syl2anc 411 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)) = ((1 + (๐ด ยท ๐‘˜)) + (๐ด + ((๐ด ยท ๐‘˜) ยท ๐ด))))
8178, 80eqtr4d 2213 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (((1 + (๐ด ยท ๐‘˜)) + ๐ด) + ((๐ด ยท ๐‘˜) ยท ๐ด)) = ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)))
8221, 64, 81syl2an 289 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (((1 + (๐ด ยท ๐‘˜)) + ๐ด) + ((๐ด ยท ๐‘˜) ยท ๐ด)) = ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)))
8372, 82breqtrd 4031 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โ‰ค ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)))
8483adantr 276 . . . . . . . . . . 11 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โ‰ค ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)))
8541adantr 276 . . . . . . . . . . . 12 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ (1 + (๐ด ยท ๐‘˜)) โˆˆ โ„)
8652adantr 276 . . . . . . . . . . . 12 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ ((1 + ๐ด)โ†‘๐‘˜) โˆˆ โ„)
8748adantr 276 . . . . . . . . . . . 12 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ (1 + ๐ด) โˆˆ โ„)
88 neg1rr 9027 . . . . . . . . . . . . . . . 16 -1 โˆˆ โ„
89 leadd2 8390 . . . . . . . . . . . . . . . 16 ((-1 โˆˆ โ„ โˆง ๐ด โˆˆ โ„ โˆง 1 โˆˆ โ„) โ†’ (-1 โ‰ค ๐ด โ†” (1 + -1) โ‰ค (1 + ๐ด)))
9088, 36, 89mp3an13 1328 . . . . . . . . . . . . . . 15 (๐ด โˆˆ โ„ โ†’ (-1 โ‰ค ๐ด โ†” (1 + -1) โ‰ค (1 + ๐ด)))
91 1pneg1e0 9032 . . . . . . . . . . . . . . . 16 (1 + -1) = 0
9291breq1i 4012 . . . . . . . . . . . . . . 15 ((1 + -1) โ‰ค (1 + ๐ด) โ†” 0 โ‰ค (1 + ๐ด))
9390, 92bitrdi 196 . . . . . . . . . . . . . 14 (๐ด โˆˆ โ„ โ†’ (-1 โ‰ค ๐ด โ†” 0 โ‰ค (1 + ๐ด)))
9493biimpa 296 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ 0 โ‰ค (1 + ๐ด))
9594ad2ant2r 509 . . . . . . . . . . . 12 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ 0 โ‰ค (1 + ๐ด))
96 simprr 531 . . . . . . . . . . . 12 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))
9785, 86, 87, 95, 96lemul1ad 8898 . . . . . . . . . . 11 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ ((1 + (๐ด ยท ๐‘˜)) ยท (1 + ๐ด)) โ‰ค (((1 + ๐ด)โ†‘๐‘˜) ยท (1 + ๐ด)))
9845, 50, 54, 84, 97letrd 8083 . . . . . . . . . 10 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) โ‰ค (((1 + ๐ด)โ†‘๐‘˜) ยท (1 + ๐ด)))
99 adddi 7945 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚) โ†’ (๐ด ยท (๐‘˜ + 1)) = ((๐ด ยท ๐‘˜) + (๐ด ยท 1)))
10027, 99mp3an3 1326 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (๐ด ยท (๐‘˜ + 1)) = ((๐ด ยท ๐‘˜) + (๐ด ยท 1)))
101 mulrid 7956 . . . . . . . . . . . . . . . . 17 (๐ด โˆˆ โ„‚ โ†’ (๐ด ยท 1) = ๐ด)
102101adantr 276 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (๐ด ยท 1) = ๐ด)
103102oveq2d 5893 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ ((๐ด ยท ๐‘˜) + (๐ด ยท 1)) = ((๐ด ยท ๐‘˜) + ๐ด))
104100, 103eqtrd 2210 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (๐ด ยท (๐‘˜ + 1)) = ((๐ด ยท ๐‘˜) + ๐ด))
105104oveq2d 5893 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) = (1 + ((๐ด ยท ๐‘˜) + ๐ด)))
106 addass 7943 . . . . . . . . . . . . . . 15 ((1 โˆˆ โ„‚ โˆง (๐ด ยท ๐‘˜) โˆˆ โ„‚ โˆง ๐ด โˆˆ โ„‚) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) = (1 + ((๐ด ยท ๐‘˜) + ๐ด)))
10727, 106mp3an1 1324 . . . . . . . . . . . . . 14 (((๐ด ยท ๐‘˜) โˆˆ โ„‚ โˆง ๐ด โˆˆ โ„‚) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) = (1 + ((๐ด ยท ๐‘˜) + ๐ด)))
10873, 76, 107syl2anc 411 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ ((1 + (๐ด ยท ๐‘˜)) + ๐ด) = (1 + ((๐ด ยท ๐‘˜) + ๐ด)))
109105, 108eqtr4d 2213 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„‚) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) = ((1 + (๐ด ยท ๐‘˜)) + ๐ด))
11021, 64, 109syl2an 289 . . . . . . . . . . 11 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) = ((1 + (๐ด ยท ๐‘˜)) + ๐ด))
111110adantr 276 . . . . . . . . . 10 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) = ((1 + (๐ด ยท ๐‘˜)) + ๐ด))
11227, 21, 28sylancr 414 . . . . . . . . . . . 12 (๐ด โˆˆ โ„ โ†’ (1 + ๐ด) โˆˆ โ„‚)
113 expp1 10529 . . . . . . . . . . . 12 (((1 + ๐ด) โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + ๐ด)โ†‘(๐‘˜ + 1)) = (((1 + ๐ด)โ†‘๐‘˜) ยท (1 + ๐ด)))
114112, 113sylan 283 . . . . . . . . . . 11 ((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ((1 + ๐ด)โ†‘(๐‘˜ + 1)) = (((1 + ๐ด)โ†‘๐‘˜) ยท (1 + ๐ด)))
115114adantr 276 . . . . . . . . . 10 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ ((1 + ๐ด)โ†‘(๐‘˜ + 1)) = (((1 + ๐ด)โ†‘๐‘˜) ยท (1 + ๐ด)))
11698, 111, 1153brtr4d 4037 . . . . . . . . 9 (((๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0) โˆง (-1 โ‰ค ๐ด โˆง (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜))) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) โ‰ค ((1 + ๐ด)โ†‘(๐‘˜ + 1)))
117116exp43 372 . . . . . . . 8 (๐ด โˆˆ โ„ โ†’ (๐‘˜ โˆˆ โ„•0 โ†’ (-1 โ‰ค ๐ด โ†’ ((1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) โ‰ค ((1 + ๐ด)โ†‘(๐‘˜ + 1))))))
118117com12 30 . . . . . . 7 (๐‘˜ โˆˆ โ„•0 โ†’ (๐ด โˆˆ โ„ โ†’ (-1 โ‰ค ๐ด โ†’ ((1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) โ‰ค ((1 + ๐ด)โ†‘(๐‘˜ + 1))))))
119118impd 254 . . . . . 6 (๐‘˜ โˆˆ โ„•0 โ†’ ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ ((1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) โ‰ค ((1 + ๐ด)โ†‘(๐‘˜ + 1)))))
120119a2d 26 . . . . 5 (๐‘˜ โˆˆ โ„•0 โ†’ (((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘˜)) โ‰ค ((1 + ๐ด)โ†‘๐‘˜)) โ†’ ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท (๐‘˜ + 1))) โ‰ค ((1 + ๐ด)โ†‘(๐‘˜ + 1)))))
1215, 10, 15, 20, 35, 120nn0ind 9369 . . . 4 (๐‘ โˆˆ โ„•0 โ†’ ((๐ด โˆˆ โ„ โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘)) โ‰ค ((1 + ๐ด)โ†‘๐‘)))
122121expd 258 . . 3 (๐‘ โˆˆ โ„•0 โ†’ (๐ด โˆˆ โ„ โ†’ (-1 โ‰ค ๐ด โ†’ (1 + (๐ด ยท ๐‘)) โ‰ค ((1 + ๐ด)โ†‘๐‘))))
123122com12 30 . 2 (๐ด โˆˆ โ„ โ†’ (๐‘ โˆˆ โ„•0 โ†’ (-1 โ‰ค ๐ด โ†’ (1 + (๐ด ยท ๐‘)) โ‰ค ((1 + ๐ด)โ†‘๐‘))))
1241233imp 1193 1 ((๐ด โˆˆ โ„ โˆง ๐‘ โˆˆ โ„•0 โˆง -1 โ‰ค ๐ด) โ†’ (1 + (๐ด ยท ๐‘)) โ‰ค ((1 + ๐ด)โ†‘๐‘))
Colors of variables: wff set class
Syntax hints:   โ†’ wi 4   โˆง wa 104   โ†” wb 105   โˆง w3a 978   = wceq 1353   โˆˆ wcel 2148   class class class wbr 4005  (class class class)co 5877  โ„‚cc 7811  โ„cr 7812  0cc0 7813  1c1 7814   + caddc 7816   ยท cmul 7818   โ‰ค cle 7995  -cneg 8131  โ„•0cn0 9178  โ†‘cexp 10521
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4120  ax-sep 4123  ax-nul 4131  ax-pow 4176  ax-pr 4211  ax-un 4435  ax-setind 4538  ax-iinf 4589  ax-cnex 7904  ax-resscn 7905  ax-1cn 7906  ax-1re 7907  ax-icn 7908  ax-addcl 7909  ax-addrcl 7910  ax-mulcl 7911  ax-mulrcl 7912  ax-addcom 7913  ax-mulcom 7914  ax-addass 7915  ax-mulass 7916  ax-distr 7917  ax-i2m1 7918  ax-0lt1 7919  ax-1rid 7920  ax-0id 7921  ax-rnegex 7922  ax-precex 7923  ax-cnre 7924  ax-pre-ltirr 7925  ax-pre-ltwlin 7926  ax-pre-lttrn 7927  ax-pre-apti 7928  ax-pre-ltadd 7929  ax-pre-mulgt0 7930  ax-pre-mulext 7931
This theorem depends on definitions:  df-bi 117  df-dc 835  df-3or 979  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-nel 2443  df-ral 2460  df-rex 2461  df-reu 2462  df-rmo 2463  df-rab 2464  df-v 2741  df-sbc 2965  df-csb 3060  df-dif 3133  df-un 3135  df-in 3137  df-ss 3144  df-nul 3425  df-if 3537  df-pw 3579  df-sn 3600  df-pr 3601  df-op 3603  df-uni 3812  df-int 3847  df-iun 3890  df-br 4006  df-opab 4067  df-mpt 4068  df-tr 4104  df-id 4295  df-po 4298  df-iso 4299  df-iord 4368  df-on 4370  df-ilim 4371  df-suc 4373  df-iom 4592  df-xp 4634  df-rel 4635  df-cnv 4636  df-co 4637  df-dm 4638  df-rn 4639  df-res 4640  df-ima 4641  df-iota 5180  df-fun 5220  df-fn 5221  df-f 5222  df-f1 5223  df-fo 5224  df-f1o 5225  df-fv 5226  df-riota 5833  df-ov 5880  df-oprab 5881  df-mpo 5882  df-1st 6143  df-2nd 6144  df-recs 6308  df-frec 6394  df-pnf 7996  df-mnf 7997  df-xr 7998  df-ltxr 7999  df-le 8000  df-sub 8132  df-neg 8133  df-reap 8534  df-ap 8541  df-div 8632  df-inn 8922  df-n0 9179  df-z 9256  df-uz 9531  df-seqfrec 10448  df-exp 10522
This theorem is referenced by:  bernneq2  10644
  Copyright terms: Public domain W3C validator