Metamath Proof Explorer


Theorem decdiv10

Description: Divide a decimal number by 10. (Contributed by Thierry Arnoux, 25-Dec-2021)

Ref Expression
Hypotheses dpval2.a โŠข ๐ด โˆˆ โ„•0
dpval2.b โŠข ๐ต โˆˆ โ„
Assertion decdiv10 ( ๐ด ๐ต / 1 0 ) = ( ๐ด . ๐ต )

Proof

Step Hyp Ref Expression
1 dpval2.a โŠข ๐ด โˆˆ โ„•0
2 dpval2.b โŠข ๐ต โˆˆ โ„
3 1 2 dpmul10 โŠข ( ( ๐ด . ๐ต ) ยท 1 0 ) = ๐ด ๐ต
4 3 oveq1i โŠข ( ( ( ๐ด . ๐ต ) ยท 1 0 ) / 1 0 ) = ( ๐ด ๐ต / 1 0 )
5 dpcl โŠข ( ( ๐ด โˆˆ โ„•0 โˆง ๐ต โˆˆ โ„ ) โ†’ ( ๐ด . ๐ต ) โˆˆ โ„ )
6 1 2 5 mp2an โŠข ( ๐ด . ๐ต ) โˆˆ โ„
7 6 recni โŠข ( ๐ด . ๐ต ) โˆˆ โ„‚
8 10nn โŠข 1 0 โˆˆ โ„•
9 8 nncni โŠข 1 0 โˆˆ โ„‚
10 8 nnne0i โŠข 1 0 โ‰  0
11 7 9 10 divcan4i โŠข ( ( ( ๐ด . ๐ต ) ยท 1 0 ) / 1 0 ) = ( ๐ด . ๐ต )
12 4 11 eqtr3i โŠข ( ๐ด ๐ต / 1 0 ) = ( ๐ด . ๐ต )