If you select the edge and the edges around and apply a "Full Crease" you can achive a perfect sqaure: