https://rootseq.blogspot.com/2023/02/how-to-square-root-in-mathematica.html