Metamath Proof Explorer


Theorem faclbnd4

Description: Variant of faclbnd5 providing a non-strict lower bound. (Contributed by NM, 23-Dec-2005)

Ref Expression
Assertion faclbnd4 ( ( ๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 โˆง ๐‘€ โˆˆ โ„•0 ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )

Proof

Step Hyp Ref Expression
1 elnn0 โŠข ( ๐‘ โˆˆ โ„•0 โ†” ( ๐‘ โˆˆ โ„• โˆจ ๐‘ = 0 ) )
2 faclbnd4lem4 โŠข ( ( ๐‘ โˆˆ โ„• โˆง ๐พ โˆˆ โ„•0 โˆง ๐‘€ โˆˆ โ„•0 ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )
3 2 3com13 โŠข ( ( ๐‘€ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )
4 3 3expa โŠข ( ( ( ๐‘€ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 ) โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )
5 faclbnd4lem3 โŠข ( ( ( ๐‘€ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 ) โˆง ๐‘ = 0 ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )
6 4 5 jaodan โŠข ( ( ( ๐‘€ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 ) โˆง ( ๐‘ โˆˆ โ„• โˆจ ๐‘ = 0 ) ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )
7 1 6 sylan2b โŠข ( ( ( ๐‘€ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 ) โˆง ๐‘ โˆˆ โ„•0 ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )
8 7 3impa โŠข ( ( ๐‘€ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 โˆง ๐‘ โˆˆ โ„•0 ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )
9 8 3com13 โŠข ( ( ๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„•0 โˆง ๐‘€ โˆˆ โ„•0 ) โ†’ ( ( ๐‘ โ†‘ ๐พ ) ยท ( ๐‘€ โ†‘ ๐‘ ) ) โ‰ค ( ( ( 2 โ†‘ ( ๐พ โ†‘ 2 ) ) ยท ( ๐‘€ โ†‘ ( ๐‘€ + ๐พ ) ) ) ยท ( ! โ€˜ ๐‘ ) ) )