Sophie

Sophie

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

Macaulay2-1.3.1-8.fc15.i686.rpm

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

i1 : R = ZZ/1277[x,y];

i2 : I = ideal(x^3 - 2*x*y, x^2*y - 2*y^2 + x);

o2 : Ideal of R

i3 : (x^3 - 2*x) % I

o3 = -2x

o3 : R

i4 : (x^3) % I

o4 = 0

o4 : R

i5 : S = ZZ[x,y];

i6 : 144*x^2*y^2 % (7*x*y-2)

         2 2
o6 = - 3x y  + 12

o6 : S

i7 : S = QQ[a..f]

o7 = S

o7 : PolynomialRing

i8 : J = ideal(a*b*c-d*e*f,a*b*d-c*e*f, a*c*e-b*d*f)

o8 = ideal (a*b*c - d*e*f, a*b*d - c*e*f, a*c*e - b*d*f)

o8 : Ideal of S

i9 : C = res J

      1      3      6      6      2
o9 = S  <-- S  <-- S  <-- S  <-- S  <-- 0
                                         
     0      1      2      3      4      5

o9 : ChainComplex

i10 : F = syz transpose C.dd_4

o10 = {-8} | 0 0 a de  ce bd  bc  0   0   0  0   |
      {-8} | 0 b 0 df  cf 0   0   ad  ac  0  0   |
      {-8} | c 0 0 -ef 0  -bf 0   -ae 0   ab 0   |
      {-8} | d 0 0 0   ef 0   bf  0   ae  0  ab  |
      {-8} | 0 e 0 0   0  -df -cf 0   0   ad -ac |
      {-8} | 0 0 f 0   0  0   0   -de -ce bd -bc |

              6       11
o10 : Matrix S  <--- S

i11 : G = transpose C.dd_3

o11 = {-8} | bd  -ce de  a 0  0  |
      {-8} | -ac -cf df  0 -b 0  |
      {-8} | -bf -ab -ef 0 0  -c |
      {-8} | -ae -ef -ab 0 0  -d |
      {-8} | -df -ad ac  0 -e 0  |
      {-8} | ce  -bd bc  f 0  0  |

              6       6
o11 : Matrix S  <--- S

i12 : G % F

o12 = 0

              6       6
o12 : Matrix S  <--- S

i13 : F % G

o13 = {-8} | 0 0 0 de  ce bd  bc  0   bd  -ce de  |
      {-8} | 0 0 0 df  cf 0   0   ad  0   -cf df  |
      {-8} | 0 0 0 -ef 0  -bf 0   -ae -bf 0   -ef |
      {-8} | 0 0 0 0   ef 0   bf  0   0   -ef 0   |
      {-8} | 0 0 0 0   0  -df -cf 0   -df 0   0   |
      {-8} | 0 0 0 0   0  0   0   -de 0   0   0   |

              6       11
o13 : Matrix S  <--- S

i14 : A = QQ[x,y,z]/(x^3-y^2-3)

o14 = A

o14 : QuotientRing

i15 : I = ideal(x^4, y^4)

                2        4
o15 = ideal (x*y  + 3x, y )

o15 : Ideal of A

i16 : J = ideal(x^3*y^2, x^2*y^3)

              4     2   2 3
o16 = ideal (y  + 3y , x y )

o16 : Ideal of A

i17 : (gens J) % I

o17 = 0

              1       2
o17 : Matrix A  <--- A

i18 : kk = frac(ZZ[a,b])

o18 = kk

o18 : FractionField

i19 : B = kk[x,y,z]

o19 = B

o19 : PolynomialRing

i20 : I = ideal(a*x^2-b*x-y-1, 1/b*y^2-z-1)

                2                1 2
o20 = ideal (a*x  - b*x - y - 1, -y  - z - 1)
                                 b

o20 : Ideal of B

i21 : gens gb I

o21 = | y2-bz-b x2-b/ax-1/ay-1/a |

              1       2
o21 : Matrix B  <--- B

i22 : x^2*y^2 % I

       2              2
      b       b      b     b    b    b
o22 = --x*z + -y*z + --x + -y + -z + -
       a      a       a    a    a    a

o22 : B

i23 :