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

Theorem lgamgulmlem4 26773
Description: Lemma for lgamgulm 26776. (Contributed by Mario Carneiro, 3-Jul-2017.)
Hypotheses
Ref Expression
lgamgulm.r (๐œ‘ โ†’ ๐‘… โˆˆ โ„•)
lgamgulm.u ๐‘ˆ = {๐‘ฅ โˆˆ โ„‚ โˆฃ ((absโ€˜๐‘ฅ) โ‰ค ๐‘… โˆง โˆ€๐‘˜ โˆˆ โ„•0 (1 / ๐‘…) โ‰ค (absโ€˜(๐‘ฅ + ๐‘˜)))}
lgamgulm.g ๐บ = (๐‘š โˆˆ โ„• โ†ฆ (๐‘ง โˆˆ ๐‘ˆ โ†ฆ ((๐‘ง ยท (logโ€˜((๐‘š + 1) / ๐‘š))) โˆ’ (logโ€˜((๐‘ง / ๐‘š) + 1)))))
lgamgulm.t ๐‘‡ = (๐‘š โˆˆ โ„• โ†ฆ if((2 ยท ๐‘…) โ‰ค ๐‘š, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))), ((๐‘… ยท (logโ€˜((๐‘š + 1) / ๐‘š))) + ((logโ€˜((๐‘… + 1) ยท ๐‘š)) + ฯ€))))
Assertion
Ref Expression
lgamgulmlem4 (๐œ‘ โ†’ seq1( + , ๐‘‡) โˆˆ dom โ‡ )
Distinct variable groups:   ๐‘˜,๐‘š,๐‘ฅ,๐‘ง,๐‘…   ๐‘ˆ,๐‘š,๐‘ง   ๐œ‘,๐‘š,๐‘ฅ,๐‘ง
Allowed substitution hints:   ๐œ‘(๐‘˜)   ๐‘‡(๐‘ฅ,๐‘ง,๐‘˜,๐‘š)   ๐‘ˆ(๐‘ฅ,๐‘˜)   ๐บ(๐‘ฅ,๐‘ง,๐‘˜,๐‘š)

Proof of Theorem lgamgulmlem4
Dummy variable ๐‘› is distinct from all other variables.
StepHypRef Expression
1 2nn 12290 . . . . . . 7 2 โˆˆ โ„•
21a1i 11 . . . . . 6 (๐œ‘ โ†’ 2 โˆˆ โ„•)
3 lgamgulm.r . . . . . 6 (๐œ‘ โ†’ ๐‘… โˆˆ โ„•)
42, 3nnmulcld 12270 . . . . 5 (๐œ‘ โ†’ (2 ยท ๐‘…) โˆˆ โ„•)
54nnzd 12590 . . . 4 (๐œ‘ โ†’ (2 ยท ๐‘…) โˆˆ โ„ค)
6 eluzle 12840 . . . . . . 7 (๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…)) โ†’ (2 ยท ๐‘…) โ‰ค ๐‘›)
76adantl 481 . . . . . 6 ((๐œ‘ โˆง ๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…))) โ†’ (2 ยท ๐‘…) โ‰ค ๐‘›)
87iftrued 4536 . . . . 5 ((๐œ‘ โˆง ๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…))) โ†’ if((2 ยท ๐‘…) โ‰ค ๐‘›, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))), ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))) = (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))))
9 eluznn 12907 . . . . . . 7 (((2 ยท ๐‘…) โˆˆ โ„• โˆง ๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…))) โ†’ ๐‘› โˆˆ โ„•)
104, 9sylan 579 . . . . . 6 ((๐œ‘ โˆง ๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…))) โ†’ ๐‘› โˆˆ โ„•)
11 breq2 5152 . . . . . . . 8 (๐‘š = ๐‘› โ†’ ((2 ยท ๐‘…) โ‰ค ๐‘š โ†” (2 ยท ๐‘…) โ‰ค ๐‘›))
12 oveq1 7419 . . . . . . . . . 10 (๐‘š = ๐‘› โ†’ (๐‘šโ†‘2) = (๐‘›โ†‘2))
1312oveq2d 7428 . . . . . . . . 9 (๐‘š = ๐‘› โ†’ ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2)) = ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2)))
1413oveq2d 7428 . . . . . . . 8 (๐‘š = ๐‘› โ†’ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))) = (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))))
15 oveq1 7419 . . . . . . . . . . . 12 (๐‘š = ๐‘› โ†’ (๐‘š + 1) = (๐‘› + 1))
16 id 22 . . . . . . . . . . . 12 (๐‘š = ๐‘› โ†’ ๐‘š = ๐‘›)
1715, 16oveq12d 7430 . . . . . . . . . . 11 (๐‘š = ๐‘› โ†’ ((๐‘š + 1) / ๐‘š) = ((๐‘› + 1) / ๐‘›))
1817fveq2d 6895 . . . . . . . . . 10 (๐‘š = ๐‘› โ†’ (logโ€˜((๐‘š + 1) / ๐‘š)) = (logโ€˜((๐‘› + 1) / ๐‘›)))
1918oveq2d 7428 . . . . . . . . 9 (๐‘š = ๐‘› โ†’ (๐‘… ยท (logโ€˜((๐‘š + 1) / ๐‘š))) = (๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))))
20 oveq2 7420 . . . . . . . . . . 11 (๐‘š = ๐‘› โ†’ ((๐‘… + 1) ยท ๐‘š) = ((๐‘… + 1) ยท ๐‘›))
2120fveq2d 6895 . . . . . . . . . 10 (๐‘š = ๐‘› โ†’ (logโ€˜((๐‘… + 1) ยท ๐‘š)) = (logโ€˜((๐‘… + 1) ยท ๐‘›)))
2221oveq1d 7427 . . . . . . . . 9 (๐‘š = ๐‘› โ†’ ((logโ€˜((๐‘… + 1) ยท ๐‘š)) + ฯ€) = ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))
2319, 22oveq12d 7430 . . . . . . . 8 (๐‘š = ๐‘› โ†’ ((๐‘… ยท (logโ€˜((๐‘š + 1) / ๐‘š))) + ((logโ€˜((๐‘… + 1) ยท ๐‘š)) + ฯ€)) = ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€)))
2411, 14, 23ifbieq12d 4556 . . . . . . 7 (๐‘š = ๐‘› โ†’ if((2 ยท ๐‘…) โ‰ค ๐‘š, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))), ((๐‘… ยท (logโ€˜((๐‘š + 1) / ๐‘š))) + ((logโ€˜((๐‘… + 1) ยท ๐‘š)) + ฯ€))) = if((2 ยท ๐‘…) โ‰ค ๐‘›, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))), ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))))
25 lgamgulm.t . . . . . . 7 ๐‘‡ = (๐‘š โˆˆ โ„• โ†ฆ if((2 ยท ๐‘…) โ‰ค ๐‘š, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))), ((๐‘… ยท (logโ€˜((๐‘š + 1) / ๐‘š))) + ((logโ€˜((๐‘… + 1) ยท ๐‘š)) + ฯ€))))
26 ovex 7445 . . . . . . . 8 (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))) โˆˆ V
27 ovex 7445 . . . . . . . 8 ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€)) โˆˆ V
2826, 27ifex 4578 . . . . . . 7 if((2 ยท ๐‘…) โ‰ค ๐‘›, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))), ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))) โˆˆ V
2924, 25, 28fvmpt 6998 . . . . . 6 (๐‘› โˆˆ โ„• โ†’ (๐‘‡โ€˜๐‘›) = if((2 ยท ๐‘…) โ‰ค ๐‘›, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))), ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))))
3010, 29syl 17 . . . . 5 ((๐œ‘ โˆง ๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…))) โ†’ (๐‘‡โ€˜๐‘›) = if((2 ยท ๐‘…) โ‰ค ๐‘›, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))), ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))))
31 eqid 2731 . . . . . . 7 (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2)))) = (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))
3214, 31, 26fvmpt 6998 . . . . . 6 (๐‘› โˆˆ โ„• โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))โ€˜๐‘›) = (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))))
3310, 32syl 17 . . . . 5 ((๐œ‘ โˆง ๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…))) โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))โ€˜๐‘›) = (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))))
348, 30, 333eqtr4d 2781 . . . 4 ((๐œ‘ โˆง ๐‘› โˆˆ (โ„คโ‰ฅโ€˜(2 ยท ๐‘…))) โ†’ (๐‘‡โ€˜๐‘›) = ((๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))โ€˜๐‘›))
355, 34seqfeq 13998 . . 3 (๐œ‘ โ†’ seq(2 ยท ๐‘…)( + , ๐‘‡) = seq(2 ยท ๐‘…)( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))))
36 nnuz 12870 . . . . . 6 โ„• = (โ„คโ‰ฅโ€˜1)
37 1zzd 12598 . . . . . 6 (๐œ‘ โ†’ 1 โˆˆ โ„ค)
383nncnd 12233 . . . . . . 7 (๐œ‘ โ†’ ๐‘… โˆˆ โ„‚)
39 2cnd 12295 . . . . . . . 8 (๐œ‘ โ†’ 2 โˆˆ โ„‚)
40 1cnd 11214 . . . . . . . . 9 (๐œ‘ โ†’ 1 โˆˆ โ„‚)
4138, 40addcld 11238 . . . . . . . 8 (๐œ‘ โ†’ (๐‘… + 1) โˆˆ โ„‚)
4239, 41mulcld 11239 . . . . . . 7 (๐œ‘ โ†’ (2 ยท (๐‘… + 1)) โˆˆ โ„‚)
4338, 42mulcld 11239 . . . . . 6 (๐œ‘ โ†’ (๐‘… ยท (2 ยท (๐‘… + 1))) โˆˆ โ„‚)
44 1lt2 12388 . . . . . . . . . 10 1 < 2
45 2re 12291 . . . . . . . . . . 11 2 โˆˆ โ„
46 rere 15074 . . . . . . . . . . 11 (2 โˆˆ โ„ โ†’ (โ„œโ€˜2) = 2)
4745, 46ax-mp 5 . . . . . . . . . 10 (โ„œโ€˜2) = 2
4844, 47breqtrri 5175 . . . . . . . . 9 1 < (โ„œโ€˜2)
4948a1i 11 . . . . . . . 8 (๐œ‘ โ†’ 1 < (โ„œโ€˜2))
50 oveq1 7419 . . . . . . . . . 10 (๐‘š = ๐‘› โ†’ (๐‘šโ†‘๐‘-2) = (๐‘›โ†‘๐‘-2))
51 eqid 2731 . . . . . . . . . 10 (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2)) = (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))
52 ovex 7445 . . . . . . . . . 10 (๐‘›โ†‘๐‘-2) โˆˆ V
5350, 51, 52fvmpt 6998 . . . . . . . . 9 (๐‘› โˆˆ โ„• โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))โ€˜๐‘›) = (๐‘›โ†‘๐‘-2))
5453adantl 481 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))โ€˜๐‘›) = (๐‘›โ†‘๐‘-2))
5539, 49, 54zetacvg 26756 . . . . . . 7 (๐œ‘ โ†’ seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))) โˆˆ dom โ‡ )
56 climdm 15503 . . . . . . 7 (seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))) โˆˆ dom โ‡ โ†” seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))) โ‡ ( โ‡ โ€˜seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2)))))
5755, 56sylib 217 . . . . . 6 (๐œ‘ โ†’ seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))) โ‡ ( โ‡ โ€˜seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2)))))
58 simpr 484 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ๐‘› โˆˆ โ„•)
5958nncnd 12233 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ๐‘› โˆˆ โ„‚)
60 2cnd 12295 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ 2 โˆˆ โ„‚)
6160negcld 11563 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ -2 โˆˆ โ„‚)
6259, 61cxpcld 26453 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘›โ†‘๐‘-2) โˆˆ โ„‚)
6354, 62eqeltrd 2832 . . . . . 6 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))โ€˜๐‘›) โˆˆ โ„‚)
6438adantr 480 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ๐‘… โˆˆ โ„‚)
65 1cnd 11214 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ 1 โˆˆ โ„‚)
6664, 65addcld 11238 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… + 1) โˆˆ โ„‚)
6760, 66mulcld 11239 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (2 ยท (๐‘… + 1)) โˆˆ โ„‚)
6864, 67mulcld 11239 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… ยท (2 ยท (๐‘… + 1))) โˆˆ โ„‚)
6959sqcld 14114 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘›โ†‘2) โˆˆ โ„‚)
7058nnne0d 12267 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ๐‘› โ‰  0)
71 2z 12599 . . . . . . . . . . 11 2 โˆˆ โ„ค
7271a1i 11 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ 2 โˆˆ โ„ค)
7359, 70, 72expne0d 14122 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘›โ†‘2) โ‰  0)
7468, 69, 73divrecd 11998 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘… ยท (2 ยท (๐‘… + 1))) / (๐‘›โ†‘2)) = ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท (1 / (๐‘›โ†‘2))))
7564, 67, 69, 73divassd 12030 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘… ยท (2 ยท (๐‘… + 1))) / (๐‘›โ†‘2)) = (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))))
7659, 70, 60cxpnegd 26460 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘›โ†‘๐‘-2) = (1 / (๐‘›โ†‘๐‘2)))
7759, 70, 72cxpexpzd 26456 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘›โ†‘๐‘2) = (๐‘›โ†‘2))
7877oveq2d 7428 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (1 / (๐‘›โ†‘๐‘2)) = (1 / (๐‘›โ†‘2)))
7976, 78eqtr2d 2772 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (1 / (๐‘›โ†‘2)) = (๐‘›โ†‘๐‘-2))
8079oveq2d 7428 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท (1 / (๐‘›โ†‘2))) = ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท (๐‘›โ†‘๐‘-2)))
8174, 75, 803eqtr3d 2779 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))) = ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท (๐‘›โ†‘๐‘-2)))
8232adantl 481 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))โ€˜๐‘›) = (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))))
8354oveq2d 7428 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท ((๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))โ€˜๐‘›)) = ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท (๐‘›โ†‘๐‘-2)))
8481, 82, 833eqtr4d 2781 . . . . . 6 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))โ€˜๐‘›) = ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท ((๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))โ€˜๐‘›)))
8536, 37, 43, 57, 63, 84isermulc2 15609 . . . . 5 (๐œ‘ โ†’ seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))) โ‡ ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท ( โ‡ โ€˜seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))))))
86 climrel 15441 . . . . . 6 Rel โ‡
8786releldmi 5947 . . . . 5 (seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))) โ‡ ((๐‘… ยท (2 ยท (๐‘… + 1))) ยท ( โ‡ โ€˜seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘šโ†‘๐‘-2))))) โ†’ seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))) โˆˆ dom โ‡ )
8885, 87syl 17 . . . 4 (๐œ‘ โ†’ seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))) โˆˆ dom โ‡ )
8967, 69, 73divcld 11995 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2)) โˆˆ โ„‚)
9064, 89mulcld 11239 . . . . . 6 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))) โˆˆ โ„‚)
9182, 90eqeltrd 2832 . . . . 5 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))โ€˜๐‘›) โˆˆ โ„‚)
9236, 4, 91iserex 15608 . . . 4 (๐œ‘ โ†’ (seq1( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))) โˆˆ dom โ‡ โ†” seq(2 ยท ๐‘…)( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))) โˆˆ dom โ‡ ))
9388, 92mpbid 231 . . 3 (๐œ‘ โ†’ seq(2 ยท ๐‘…)( + , (๐‘š โˆˆ โ„• โ†ฆ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘šโ†‘2))))) โˆˆ dom โ‡ )
9435, 93eqeltrd 2832 . 2 (๐œ‘ โ†’ seq(2 ยท ๐‘…)( + , ๐‘‡) โˆˆ dom โ‡ )
9529adantl 481 . . . . 5 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘‡โ€˜๐‘›) = if((2 ยท ๐‘…) โ‰ค ๐‘›, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))), ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))))
963adantr 480 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ๐‘… โˆˆ โ„•)
9796nnred 12232 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ๐‘… โˆˆ โ„)
9845a1i 11 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ 2 โˆˆ โ„)
99 1red 11220 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ 1 โˆˆ โ„)
10097, 99readdcld 11248 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… + 1) โˆˆ โ„)
10198, 100remulcld 11249 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (2 ยท (๐‘… + 1)) โˆˆ โ„)
10258nnsqcld 14212 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘›โ†‘2) โˆˆ โ„•)
103101, 102nndivred 12271 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2)) โˆˆ โ„)
10497, 103remulcld 11249 . . . . . 6 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))) โˆˆ โ„)
10558peano2nnd 12234 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘› + 1) โˆˆ โ„•)
106105nnrpd 13019 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘› + 1) โˆˆ โ„+)
10758nnrpd 13019 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ๐‘› โˆˆ โ„+)
108106, 107rpdivcld 13038 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘› + 1) / ๐‘›) โˆˆ โ„+)
109108relogcld 26368 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (logโ€˜((๐‘› + 1) / ๐‘›)) โˆˆ โ„)
11097, 109remulcld 11249 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) โˆˆ โ„)
11196peano2nnd 12234 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… + 1) โˆˆ โ„•)
112111nnrpd 13019 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘… + 1) โˆˆ โ„+)
113112, 107rpmulcld 13037 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘… + 1) ยท ๐‘›) โˆˆ โ„+)
114113relogcld 26368 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (logโ€˜((๐‘… + 1) ยท ๐‘›)) โˆˆ โ„)
115 pire 26205 . . . . . . . . 9 ฯ€ โˆˆ โ„
116115a1i 11 . . . . . . . 8 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ฯ€ โˆˆ โ„)
117114, 116readdcld 11248 . . . . . . 7 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€) โˆˆ โ„)
118110, 117readdcld 11248 . . . . . 6 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€)) โˆˆ โ„)
119104, 118ifcld 4574 . . . . 5 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ if((2 ยท ๐‘…) โ‰ค ๐‘›, (๐‘… ยท ((2 ยท (๐‘… + 1)) / (๐‘›โ†‘2))), ((๐‘… ยท (logโ€˜((๐‘› + 1) / ๐‘›))) + ((logโ€˜((๐‘… + 1) ยท ๐‘›)) + ฯ€))) โˆˆ โ„)
12095, 119eqeltrd 2832 . . . 4 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘‡โ€˜๐‘›) โˆˆ โ„)
121120recnd 11247 . . 3 ((๐œ‘ โˆง ๐‘› โˆˆ โ„•) โ†’ (๐‘‡โ€˜๐‘›) โˆˆ โ„‚)
12236, 4, 121iserex 15608 . 2 (๐œ‘ โ†’ (seq1( + , ๐‘‡) โˆˆ dom โ‡ โ†” seq(2 ยท ๐‘…)( + , ๐‘‡) โˆˆ dom โ‡ ))
12394, 122mpbird 257 1 (๐œ‘ โ†’ seq1( + , ๐‘‡) โˆˆ dom โ‡ )
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โˆง wa 395   = wceq 1540   โˆˆ wcel 2105  โˆ€wral 3060  {crab 3431  ifcif 4528   class class class wbr 5148   โ†ฆ cmpt 5231  dom cdm 5676  โ€˜cfv 6543  (class class class)co 7412  โ„‚cc 11112  โ„cr 11113  1c1 11115   + caddc 11117   ยท cmul 11119   < clt 11253   โ‰ค cle 11254   โˆ’ cmin 11449  -cneg 11450   / cdiv 11876  โ„•cn 12217  2c2 12272  โ„•0cn0 12477  โ„คcz 12563  โ„คโ‰ฅcuz 12827  seqcseq 13971  โ†‘cexp 14032  โ„œcre 15049  abscabs 15186   โ‡ cli 15433  ฯ€cpi 16015  logclog 26300  โ†‘๐‘ccxp 26301
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7729  ax-inf2 9640  ax-cnex 11170  ax-resscn 11171  ax-1cn 11172  ax-icn 11173  ax-addcl 11174  ax-addrcl 11175  ax-mulcl 11176  ax-mulrcl 11177  ax-mulcom 11178  ax-addass 11179  ax-mulass 11180  ax-distr 11181  ax-i2m1 11182  ax-1ne0 11183  ax-1rid 11184  ax-rnegex 11185  ax-rrecex 11186  ax-cnre 11187  ax-pre-lttri 11188  ax-pre-lttrn 11189  ax-pre-ltadd 11190  ax-pre-mulgt0 11191  ax-pre-sup 11192  ax-addf 11193
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-tp 4633  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-iin 5000  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7368  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7674  df-om 7860  df-1st 7979  df-2nd 7980  df-supp 8151  df-frecs 8270  df-wrecs 8301  df-recs 8375  df-rdg 8414  df-1o 8470  df-2o 8471  df-oadd 8474  df-er 8707  df-map 8826  df-pm 8827  df-ixp 8896  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-fsupp 9366  df-fi 9410  df-sup 9441  df-inf 9442  df-oi 9509  df-dju 9900  df-card 9938  df-pnf 11255  df-mnf 11256  df-xr 11257  df-ltxr 11258  df-le 11259  df-sub 11451  df-neg 11452  df-div 11877  df-nn 12218  df-2 12280  df-3 12281  df-4 12282  df-5 12283  df-6 12284  df-7 12285  df-8 12286  df-9 12287  df-n0 12478  df-z 12564  df-dec 12683  df-uz 12828  df-q 12938  df-rp 12980  df-xneg 13097  df-xadd 13098  df-xmul 13099  df-ioo 13333  df-ioc 13334  df-ico 13335  df-icc 13336  df-fz 13490  df-fzo 13633  df-fl 13762  df-mod 13840  df-seq 13972  df-exp 14033  df-fac 14239  df-bc 14268  df-hash 14296  df-shft 15019  df-cj 15051  df-re 15052  df-im 15053  df-sqrt 15187  df-abs 15188  df-limsup 15420  df-clim 15437  df-rlim 15438  df-sum 15638  df-ef 16016  df-sin 16018  df-cos 16019  df-pi 16021  df-struct 17085  df-sets 17102  df-slot 17120  df-ndx 17132  df-base 17150  df-ress 17179  df-plusg 17215  df-mulr 17216  df-starv 17217  df-sca 17218  df-vsca 17219  df-ip 17220  df-tset 17221  df-ple 17222  df-ds 17224  df-unif 17225  df-hom 17226  df-cco 17227  df-rest 17373  df-topn 17374  df-0g 17392  df-gsum 17393  df-topgen 17394  df-pt 17395  df-prds 17398  df-xrs 17453  df-qtop 17458  df-imas 17459  df-xps 17461  df-mre 17535  df-mrc 17536  df-acs 17538  df-mgm 18566  df-sgrp 18645  df-mnd 18661  df-submnd 18707  df-mulg 18988  df-cntz 19223  df-cmn 19692  df-psmet 21137  df-xmet 21138  df-met 21139  df-bl 21140  df-mopn 21141  df-fbas 21142  df-fg 21143  df-cnfld 21146  df-top 22617  df-topon 22634  df-topsp 22656  df-bases 22670  df-cld 22744  df-ntr 22745  df-cls 22746  df-nei 22823  df-lp 22861  df-perf 22862  df-cn 22952  df-cnp 22953  df-haus 23040  df-tx 23287  df-hmeo 23480  df-fil 23571  df-fm 23663  df-flim 23664  df-flf 23665  df-xms 24047  df-ms 24048  df-tms 24049  df-cncf 24619  df-limc 25616  df-dv 25617  df-log 26302  df-cxp 26303
This theorem is referenced by:  lgamgulmlem6  26775
  Copyright terms: Public domain W3C validator