/* Here's the Humbert component of discriminant 8 (degree 8)
   found originally by running findrosenhainrelation(8,8,100);
*/

h8:=
16*e1^4*e2^2*e3^2 - 16*e1^4*e2^2*e3 - 16*e1^4*e2*e3^2 + 16*e1^4*e2*e3 -
    16*e1^3*e2^3*e3^2 + 16*e1^3*e2^3*e3 - 16*e1^3*e2^2*e3^3 + 16*e1^3*e2^2*e3^2

    + 16*e1^3*e2*e3^3 - 16*e1^3*e2*e3 - e1^2*e2^4 + 16*e1^2*e2^3*e3^3 -
    16*e1^2*e2^3*e3 + 2*e1^2*e2^3 - 14*e1^2*e2^2*e3^2 + 14*e1^2*e2^2*e3 -
    e1^2*e2^2 - 16*e1^2*e2*e3^3 + 14*e1^2*e2*e3^2 + 2*e1^2*e2*e3 - e1^2*e3^4 +
    2*e1^2*e3^3 - e1^2*e3^2 + 2*e1*e2^4*e3 - 16*e1*e2^3*e3^3 + 14*e1*e2^3*e3^2 -

    2*e1*e2^3*e3 + 14*e1*e2^2*e3^3 - 12*e1*e2^2*e3^2 + 2*e1*e2*e3^4 -
    2*e1*e2*e3^3 - e2^4*e3^2 + 2*e2^3*e3^3 - e2^2*e3^4
;