This is an inofficial mirror of http://metamath.tirix.org for personal testing of a visualizer extension only.

Metamath Proof Explorer


Theorem sqrtsq

Description: Square root of square. (Contributed by NM, 14-Jan-2006) (Revised by Mario Carneiro, 29-May-2016)

Ref Expression
Assertion sqrtsq A 0 A A 2 = A

Proof

Step Hyp Ref Expression
1 eqid A 2 = A 2
2 resqcl A A 2
3 sqge0 A 0 A 2
4 2 3 jca A A 2 0 A 2
5 4 adantr A 0 A A 2 0 A 2
6 sqrtsq2 A 2 0 A 2 A 0 A A 2 = A A 2 = A 2
7 5 6 mpancom A 0 A A 2 = A A 2 = A 2
8 1 7 mpbiri A 0 A A 2 = A