SymmetricReduction[((a1-a2)(a1-a3)(a1-a4)(a2-a3)(a2-a4)(a3-a4))^2, {a1, a2, a3, a4}, {-a, b, -c, d}]

Uh oh! Wolfram|Alpha doesn't run without JavaScript.

Please enable JavaScript. If you don't know how, you can find instructionshere.Once you've done that, refresh this page to start using Wolfram|Alpha.