Metamath Proof Explorer


Theorem gausslemma2dlem0e

Description: Auxiliary lemma 5 for gausslemma2d . (Contributed by AV, 9-Jul-2021)

Ref Expression
Hypotheses gausslemma2dlem0.p โŠข ( ๐œ‘ โ†’ ๐‘ƒ โˆˆ ( โ„™ โˆ– { 2 } ) )
gausslemma2dlem0.m โŠข ๐‘€ = ( โŒŠ โ€˜ ( ๐‘ƒ / 4 ) )
Assertion gausslemma2dlem0e ( ๐œ‘ โ†’ ( ๐‘€ ยท 2 ) < ( ๐‘ƒ / 2 ) )

Proof

Step Hyp Ref Expression
1 gausslemma2dlem0.p โŠข ( ๐œ‘ โ†’ ๐‘ƒ โˆˆ ( โ„™ โˆ– { 2 } ) )
2 gausslemma2dlem0.m โŠข ๐‘€ = ( โŒŠ โ€˜ ( ๐‘ƒ / 4 ) )
3 2 oveq1i โŠข ( ๐‘€ ยท 2 ) = ( ( โŒŠ โ€˜ ( ๐‘ƒ / 4 ) ) ยท 2 )
4 nnoddn2prm โŠข ( ๐‘ƒ โˆˆ ( โ„™ โˆ– { 2 } ) โ†’ ( ๐‘ƒ โˆˆ โ„• โˆง ยฌ 2 โˆฅ ๐‘ƒ ) )
5 nnz โŠข ( ๐‘ƒ โˆˆ โ„• โ†’ ๐‘ƒ โˆˆ โ„ค )
6 5 anim1i โŠข ( ( ๐‘ƒ โˆˆ โ„• โˆง ยฌ 2 โˆฅ ๐‘ƒ ) โ†’ ( ๐‘ƒ โˆˆ โ„ค โˆง ยฌ 2 โˆฅ ๐‘ƒ ) )
7 1 4 6 3syl โŠข ( ๐œ‘ โ†’ ( ๐‘ƒ โˆˆ โ„ค โˆง ยฌ 2 โˆฅ ๐‘ƒ ) )
8 flodddiv4t2lthalf โŠข ( ( ๐‘ƒ โˆˆ โ„ค โˆง ยฌ 2 โˆฅ ๐‘ƒ ) โ†’ ( ( โŒŠ โ€˜ ( ๐‘ƒ / 4 ) ) ยท 2 ) < ( ๐‘ƒ / 2 ) )
9 7 8 syl โŠข ( ๐œ‘ โ†’ ( ( โŒŠ โ€˜ ( ๐‘ƒ / 4 ) ) ยท 2 ) < ( ๐‘ƒ / 2 ) )
10 3 9 eqbrtrid โŠข ( ๐œ‘ โ†’ ( ๐‘€ ยท 2 ) < ( ๐‘ƒ / 2 ) )