|
用N[...]得出-0.175781
- Discriminant[-l-2 l^2-l^3-6 x+12 l x+16 l^2 x-2 l^3 x+24 x^2-36 l x^2-8 l^2 x^2-48 x^3+16 l x^3+48 x^4/.x->Root[5616 + 31104 # - 27000 #^2 - 26712 #^3 + 25119 #^4 - 5346 #^5 + 143 #^6 &, 4],l]//N
Copy the Code
用FullSimplify得出0
- Discriminant[-l-2 l^2-l^3-6 x+12 l x+16 l^2 x-2 l^3 x+24 x^2-36 l x^2-8 l^2 x^2-48 x^3+16 l x^3+48 x^4/. x -> Root[5616 + 31104 # - 27000 #^2 - 26712 #^3 + 25119 #^4 - 5346 #^5 + 143 #^6 &, 4],l]//FullSimplify
Copy the Code |
|