Sophie

Sophie

distrib > Fedora > 15 > i386 > by-pkgid > 7ebd25ac536d248d499a3ce2acda963a > files > 2982

Macaulay2-1.3.1-8.fc15.i686.rpm

-- -*- M2-comint -*- {* hash: -87639677 *}

i1 : R = QQ[a..f]

o1 = R

o1 : PolynomialRing

i2 : I = ideal(a,b,c) * ideal(a,b,c)

             2                  2                  2
o2 = ideal (a , a*b, a*c, a*b, b , b*c, a*c, b*c, c )

o2 : Ideal of R

i3 : mingens I

o3 = | c2 bc ac b2 ab a2 |

             1       6
o3 : Matrix R  <--- R

i4 : J = ideal(a-1, b-2, c-3)

o4 = ideal (a - 1, b - 2, c - 3)

o4 : Ideal of R

i5 : I = J*J

             2                                                             
o5 = ideal (a  - 2a + 1, a*b - 2a - b + 2, a*c - 3a - c + 3, a*b - 2a - b +
     ------------------------------------------------------------------------
         2                                                                  
     2, b  - 4b + 4, b*c - 3b - 2c + 6, a*c - 3a - c + 3, b*c - 3b - 2c + 6,
     ------------------------------------------------------------------------
      2
     c  - 6c + 9)

o5 : Ideal of R

i6 : mingens I

o6 = | c2-6c+9 bc-3b-2c+6 ac-3a-c+3 b2-4b+4 ab-2a-b+2 a2-2a+1 |

             1       6
o6 : Matrix R  <--- R

i7 : M = matrix{{a^2*b*c-d*e*f,a^3*c-d^2*f,a*d*f-b*c*e-1}}

o7 = | a2bc-def a3c-d2f -bce+adf-1 |

             1       3
o7 : Matrix R  <--- R

i8 : I = kernel M

o8 = image {4} | -bce+adf-1 0          a3c-d2f   a4c-bcde-d   -a3ce+d2ef   a4df-bd2ef-a3    -a5df+abd2ef+a4  -a5cf+abcdef+adf |
           {4} | 0          -bce+adf-1 -a2bc+def -a3bc+bce2+e a3df-de2f-a2 -a3bdf+bde2f+a2b a4bdf-abde2f-a3b a4bcf-abce2f-aef |
           {3} | -a2bc+def  -a3c+d2f   0         -a2bcd+a3ce  -a5c+a2d2f   -a2bd2f+a3def    a3bd2f-a4def     a3bcdf-a4cef     |

                             3
o8 : R-module, submodule of R

i9 : J = image mingens I

o9 = image {4} | bce-adf+1 0         a3c-d2f   |
           {4} | 0         bce-adf+1 -a2bc+def |
           {3} | a2bc-def  a3c-d2f   0         |

                             3
o9 : R-module, submodule of R

i10 : I == J

o10 = true

i11 : trim I

o11 = image {4} | bce-adf+1 0         a3c-d2f   |
            {4} | 0         bce-adf+1 -a2bc+def |
            {3} | a2bc-def  a3c-d2f   0         |

                              3
o11 : R-module, submodule of R

i12 :