radians, degrees, gradians bug report

[roadrunner]

Not sure if this is a bug or not, but:

solve([(h/x1) = (tan(a1)),(h/(x1+x2)) = (tan(a2))],[h,x1])

returns:

[[x2*tan(a1)*tan(a2)/(tan(a1)-tan(a2)),x2*tan(a2)/(tan(a1)-tan(a2))]]

in degrees and gradians mode, but returns:

[[(x2*cos(a1)*sin(a1)*sin(a2)^2-x2*cos(a2)*sin(a1)^2*sin(a2))/(2*cos(a1)*cos(a2)*sin(a1)*sin(a2)+2*sin(a1)^2*sin(a2)^2-sin(a1)^2-sin(a2)^2),x2*tan(a2)/(tan(a1)-tan(a2))]]

in radians mode. All other setting the same.

Simplification set to minimum or none returns the same result. Simplification set to maximum, angle set to radians returns:

[[(x2*cos(a1)*sin(a1)*sin(a2)^2-x2*cos(a2)*sin(a1)^2*sin(a2))/(2*cos(a1)*cos(a2)*sin(a1)*sin(a2)+2*sin(a1)^2*sin(a2)^2-sin(a1)^2-sin(a2)^2),(-x2*cos(a1)^2*cos(a2)^2+x2*cos(a1)^2-x2*cos(a1)*cos(a2)*sin(a1)*sin(a2))/(2*cos(a1)^2*cos(a2)^2-cos(a1)^2+2*cos(a1)*cos(a2)*sin(a1)*sin(a2)-cos(a2)^2)]]

I didn't go thru all the math, but I believe all results are mathematically equivalent. I just would have expected the simplification process to be independent of the angular unit setting.

-road