Metamath Proof Explorer


Theorem remsqsqrt

Description: Square of square root. (Contributed by Mario Carneiro, 10-Jul-2013)

Ref Expression
Assertion remsqsqrt ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โ†’ ( ( โˆš โ€˜ ๐ด ) ยท ( โˆš โ€˜ ๐ด ) ) = ๐ด )

Proof

Step Hyp Ref Expression
1 resqrtcl โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โ†’ ( โˆš โ€˜ ๐ด ) โˆˆ โ„ )
2 1 recnd โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โ†’ ( โˆš โ€˜ ๐ด ) โˆˆ โ„‚ )
3 2 sqvald โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โ†’ ( ( โˆš โ€˜ ๐ด ) โ†‘ 2 ) = ( ( โˆš โ€˜ ๐ด ) ยท ( โˆš โ€˜ ๐ด ) ) )
4 resqrtth โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โ†’ ( ( โˆš โ€˜ ๐ด ) โ†‘ 2 ) = ๐ด )
5 3 4 eqtr3d โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โ†’ ( ( โˆš โ€˜ ๐ด ) ยท ( โˆš โ€˜ ๐ด ) ) = ๐ด )