Fix for Expand[(a+b)^2/(a*b)]

git-svn-id: http://dev.geogebra.org/svn/trunk/geogebra@23340 23ce0884-8a58-47d3-bc5c-ddf1cd5b9f9e