load(sqdnst)$
rat(sqrtdenest(%o9)),algebraic=true;
shows that these are equivalent
On Sat, Dec 29, 2012 at 12:23 PM, Aleksas Domarkas <aleksasd873 at gmail.com>wrote:
> (%i8) as:solve(%);
> (%o8)
> [a=-(sqrt(30)+25)/35,a=(sqrt(30)-25)/35,a=-(sqrt(30)-25)/35,a=(sqrt(30)+25)/35]
>
> But
> (%i9) solve(1225*a^4-1310*a^2+289);
> (%o9)
> [a=-sqrt(10*sqrt(30)+131)/(7*sqrt(5)),a=sqrt(10*sqrt(30)+131)/(7*sqrt(5)),a=-sqrt(131-10*sqrt(30))/(7*sqrt(5)),a=sqrt(131-10*sqrt(30))/(7*sqrt(5))]
>