To be more specific, the theorems
( sqr ` ( A x. B ) ) =
( ( sqr ` A ) x. ( sqr ` B ) )
only hold for a subset of the complex numbers. If B is real then it's true, but the exact region where this holds is complicated because of the position of the branch cuts. What can be said is that
( ( sqr ` A ) / ( sqr ` B ) ) is *a* square root of ( A / B ), meaning that it is either equal to
( sqr ` ( A / B ) ) or -u
( sqr ` ( A / B ) ), but that's a difficult algebraic condition to work with. Instead I recommend keeping it squared until you are ready to introduce the branch cut sqr and its negative, via the theorem
A = B^2 <->
B = (sqr`A) \/
B = -u (sqr`A) .
This is how quad is proved: the key step is
(((((2 · 𝐴) · 𝑋) − -𝐵)↑2) = (𝐷↑2) ↔ ((((2 · 𝐴) · 𝑋) − -𝐵) = 𝐷 ∨ (((2 · 𝐴) · 𝑋) − -𝐵) = -𝐷))
where D is (any) square root of the discriminant.