For comparison with other CAS choose from: Axiom Derive Macsyma Maple Mathematica
com:=(1-(sin x)**2)**5*(1-(cos x)**2)**5*((sin x)**2+(cos x)**2)**5;
load_package compact;
20 10 20 8 20 6 com := sin(x) *cos(x) - 5*sin(x) *cos(x) + 10*sin(x) *cos(x) 20 4 20 2 20 - 10*sin(x) *cos(x) + 5*sin(x) *cos(x) - sin(x) 18 12 18 10 + 5*sin(x) *cos(x) - 30*sin(x) *cos(x) 18 8 18 6 + 75*sin(x) *cos(x) - 100*sin(x) *cos(x) 18 4 18 2 18 + 75*sin(x) *cos(x) - 30*sin(x) *cos(x) + 5*sin(x) 16 14 16 12 + 10*sin(x) *cos(x) - 75*sin(x) *cos(x) 16 10 16 8 + 235*sin(x) *cos(x) - 400*sin(x) *cos(x) 16 6 16 4 + 400*sin(x) *cos(x) - 235*sin(x) *cos(x) 16 2 16 14 16 + 75*sin(x) *cos(x) - 10*sin(x) + 10*sin(x) *cos(x) 14 14 14 12 - 100*sin(x) *cos(x) + 400*sin(x) *cos(x) 14 10 14 8 - 860*sin(x) *cos(x) + 1100*sin(x) *cos(x) 14 6 14 4 - 860*sin(x) *cos(x) + 400*sin(x) *cos(x) 14 2 14 12 18 - 100*sin(x) *cos(x) + 10*sin(x) + 5*sin(x) *cos(x) 12 16 12 14 - 75*sin(x) *cos(x) + 400*sin(x) *cos(x) 12 12 12 10 - 1100*sin(x) *cos(x) + 1780*sin(x) *cos(x) 12 8 12 6 - 1780*sin(x) *cos(x) + 1100*sin(x) *cos(x) 12 4 12 2 12 - 400*sin(x) *cos(x) + 75*sin(x) *cos(x) - 5*sin(x) 10 20 10 18 + sin(x) *cos(x) - 30*sin(x) *cos(x) 10 16 10 14 + 235*sin(x) *cos(x) - 860*sin(x) *cos(x) 10 12 10 10 + 1780*sin(x) *cos(x) - 2252*sin(x) *cos(x) 10 8 10 6 + 1780*sin(x) *cos(x) - 860*sin(x) *cos(x) 10 4 10 2 10 + 235*sin(x) *cos(x) - 30*sin(x) *cos(x) + sin(x) 8 20 8 18 - 5*sin(x) *cos(x) + 75*sin(x) *cos(x) 8 16 8 14 - 400*sin(x) *cos(x) + 1100*sin(x) *cos(x) 8 12 8 10 - 1780*sin(x) *cos(x) + 1780*sin(x) *cos(x) 8 8 8 6 - 1100*sin(x) *cos(x) + 400*sin(x) *cos(x) 8 4 8 2 - 75*sin(x) *cos(x) + 5*sin(x) *cos(x) 6 20 6 18 + 10*sin(x) *cos(x) - 100*sin(x) *cos(x) 6 16 6 14 + 400*sin(x) *cos(x) - 860*sin(x) *cos(x) 6 12 6 10 + 1100*sin(x) *cos(x) - 860*sin(x) *cos(x) 6 8 6 6 + 400*sin(x) *cos(x) - 100*sin(x) *cos(x) 6 4 4 20 + 10*sin(x) *cos(x) - 10*sin(x) *cos(x) 4 18 4 16 + 75*sin(x) *cos(x) - 235*sin(x) *cos(x) 4 14 4 12 + 400*sin(x) *cos(x) - 400*sin(x) *cos(x) 4 10 4 8 + 235*sin(x) *cos(x) - 75*sin(x) *cos(x) 4 6 2 20 + 10*sin(x) *cos(x) + 5*sin(x) *cos(x) 2 18 2 16 - 30*sin(x) *cos(x) + 75*sin(x) *cos(x) 2 14 2 12 - 100*sin(x) *cos(x) + 75*sin(x) *cos(x) 2 10 2 8 20 - 30*sin(x) *cos(x) + 5*sin(x) *cos(x) - cos(x) 18 16 14 12 + 5*cos(x) - 10*cos(x) + 10*cos(x) - 5*cos(x) 10 + cos(x)
compact(com,cos x^
2+sin x^
2=1);
10 10 sin(x) *cos(x)