hadamardProduct(List) -- Hadamard product of a list of homogeneous ideals, or points

i1 : S = QQ[x,y,z,t];

i2 : I = ideal(random(1,S),random(1,S));

o2 : Ideal of S

i3 : J = ideal(random(1,S),random(1,S));

o3 : Ideal of S

i4 : L = {I,J};

i5 : hadamardProduct(L)

                         2                                2                  
o5 = ideal(1640666412000x  - 127984188150x*y - 4545263450y  + 386029884240x*z
     ------------------------------------------------------------------------
                                   2                                       
     + 10982114325y*z - 1366052688z  + 6948299255625x*t - 676631565675y*t +
     ------------------------------------------------------------------------
                                    2
     67421131245z*t + 1514925696375t )

o5 : Ideal of S

i6 : P = point\{{1,2,3},{-1,1,1},{1,1/2,-1/3}}

                                                1    1
o6 = {Point{1, 2, 3}, Point{-1, 1, 1}, Point{1, -, - -}}
                                                2    3

o6 : List

i7 : hadamardProduct(P)

o7 = Point{-1, 1, -1}

o7 : Point