[BACK]Return to minimal-note-ja.txt CVS log [TXT][DIR] Up to [local] / OpenXM / src / k097 / lib / minimal

Annotation of OpenXM/src/k097/lib/minimal/minimal-note-ja.txt, Revision 1.3

1.3     ! takayama    1: $OpenXM: OpenXM/src/k097/lib/minimal/minimal-note-ja.txt,v 1.2 2000/05/24 15:24:54 takayama Exp $
1.1       takayama    2:
                      3: SpairAndReduction() :
                      4:    $BM?$($i$l$?(B pair $B$r(B reduction $B$9$k(B.
                      5:    V-minimal $B$KI,MW$+$I$&$+$NH=Dj$b$9$k(B.
                      6:
                      7: SpairAndReduction2():
                      8:   tower2 = StowerOf(tower,level-1);
                      9:   SsetTower(tower2);
                     10:   /** sm1(" show_ring ");   */
                     11:
                     12:   $BM?$($i$l$?(B pair $B$r(B reduction $B$9$k$?$a$N(B schreyer order
                     13:   $B$r@_Dj$9$k(B.  Resolution $B$N?<$5$K1~$8$F(B, tower $B$b?<$/$9$kI,MW$,$"$k(B.
                     14:
                     15:
                     16:   if (IsConstant(t_syz[i])){
                     17:
                     18:   Syzygy $B$r$_$F(B, $BDj?t@.J,$,$J$$$+(B check.
                     19:   t_syz[i] $B$,Dj?t@.J,$G$"$l$P(B, $B0l$DA0$N(B GB $B$N9=@.MWAG$G$"$k(B
                     20:   g_i $B$,M>J,$J(B GB $B$G$"$k2DG=@-$,$?$+$$(B.
                     21:   SpairAndReduction() ( LaScala-Stillman $B$NJ}K!(B) $B$H$N@09g@-$r$H$k$?$a(B
                     22:   g_i $B$r(B tmp[0] $B$KBeF~$7(B ( reduction $B$G$-$J$+$C$?$U$j$r$9$k(B )
                     23:   g_i $B$N(B V-degree $B$r$7$i$Y$k(B.
                     24:
                     25:
                     26: Sannfs2_laScala2()
                     27: Sannfs3_laScala2()  $B$r:n$k(B.
                     28:
                     29: $BFs$D$N%"%k%4%j%:%`$NHf3S(B.
                     30: In(11)=sm1_pmat(a1[1]); $B$N=gHV$r$+$($k(B.
                     31:  [
                     32:    [    3*Dx^2*h , 0 , Dy , -Dz ]
                     33:    [    6*x*Dy*Dz^2-9*y*Dx^2*h , -2*x*Dy*Dz^2+3*y*Dx^2*h , -2*x*Dx-3*y*Dy , 0]
                     34:    [    2*x*Dx+3*z*Dz-h^2 , y*Dy-z*Dz , 0 , 0 ]
                     35:    [    2*x*Dy*Dz , 0 , z , -y ]
                     36:
                     37:    [    0 , 2*x*Dy^2*Dz-3*z*Dx^2*h , 0 , 2*x*Dx+3*z*Dz ]
                     38:  ]
                     39: In(12)=sm1_pmat(a2[1]);
                     40:  [
                     41:    [    3*Dx^2*h , 0 , Dy , -Dz ]
                     42:    [    6*x*Dy*Dz^2-9*y*Dx^2*h , -2*x*Dy*Dz^2+3*y*Dx^2*h , -2*x*Dx-3*y*Dy, 0 ]
                     43:    [    2*x*Dx+3*z*Dz-h^2 , y*Dy-z*Dz , 0 , 0 ]
                     44:    [    2*x*Dy*Dz , 0 , z , -y ]
                     45:
                     46:    [    9*z*Dx^2*h , 2*x*Dy^2*Dz-3*z*Dx^2*h , 3*z*Dy , 2*x*Dx ]
                     47:    [    2*x*Dx*Dz^2+3*z*Dz^3+5*Dz^2*h^2 , y*Dy*Dz^2-z*Dz^3-2*Dz^2*h^2 , 0 , 0 ]
                     48:  ]
                     49: In(13)=
                     50:
                     51: ----------------------
                     52: In(16)=sm1_pmat(a1[2]);
                     53:  [
                     54:    [    -2*x*Dx-3*y*Dy-3*z*Dz-6*h^2 , -Dy , -Dz , 3*Dx^2*h , 3*Dy^2 , 3*Dy*Dz , -2*x*Dy , 2*x*Dz , 0 ]
                     55:    [    3*y*z , z , y , -2*x*Dy*Dz , -3*z*Dy , 2*x*Dx , 2*x*z , -2*x*y , 0 ]
                     56:  ]
                     57: In(17)=sm1_pmat(a2[2]);
                     58:  [
                     59:    [    -y , 2*x*Dy*Dz , z , 0 , 2*x*Dx , 0 ]
                     60:    [    -Dz , 3*Dx^2*h , Dy , -2*x*Dx-3*y*Dy-3*h^2 , -3*Dy*Dz , 0 ]
                     61:  ]
                     62: In(18)=
                     63:
1.2       takayama   64: ---------------------------
                     65:
                     66: May 22, (Tue),  5:50 (Spain local time, 12:50 JST)
                     67:
                     68: kan96xx/Kan/resol.c $B$G(B,
                     69:    RemoveRedundantInSchreyerSkelton = 0
                     70: $B$KJQ$($F(B ($B$3$N(B option $B$b$"$?$i$7$/2C$($k(B), schreyer $B$,@5$7$/F0$/$+(B
                     71: $BD4$Y$k$3$H$K$9$k(B.
                     72: ( commit $B$O(B kan96xx $B$H(B k097 $BN>J}$9$Y$7(B.)
                     73:
                     74: test8() $B$G(B sm1 $B$G=q$$$?J}$N(B Schreyer $B$r8+$k$H(B,
                     75:    RemoveRedundantInSchreyerSkelton = 1
                     76: $B$G$b(B,
                     77: kernel = image
                     78: $B$H$J$C$F$$$k$N$G0J8e$3$N(B option $B$O(B 1 $B$N$^$^;H$&$3$H$H$9$k(B.
                     79: $BMW$9$k$K(B k0 $B$N%3!<%I$,$I$&$d$i$*$+$7$$$i$7$$(B.
1.3     ! takayama   80:
        !            81: -----------------------------------
        !            82: June 8, 2000 (Thu), 9:10 (Spain local time)
        !            83: hol.sm1 :  gb_h, syz_h, isSameIdeal, isSameIdeal_h
        !            84: complex.sm1 :  isExact, isExact_h
        !            85:
        !            86: syzygy $B$r(B homogenization $B$r2p$7$F7W;;$9$k$N$OLdBj$"$j(B.
        !            87: --> usage of isExact
        !            88:
        !            89: [(Homogenize_vec) 0] system_variable : vector $B$N(B homogenize $B$r$7$J$$(B.
        !            90: (grade) (module1v) switch_function : vector $BJQ?t$O(B, total
        !            91:        degree $B$K?t$($J$$(B.
        !            92: ==> $BL58B%k!<%W$KCm0U(B   ---> gb_h, syz_h  $B$N(B usage.
        !            93:
        !            94: minimal-test.k $B$N(B ann(x^3-y^2*z^2) $B$N(B laplace $BJQ49$N(B
        !            95: betti $B?t$,JQ(B, exact $B$G$J$$(B, $B$r(B isExact_h $B$G(B check
        !            96: $B$7$h$&(B.
        !            97:
        !            98: minimal-test.k
        !            99: test10();
        !           100:   LaScala-Stillman $B$NJ}K!$G$D$/$C$?(B, schreyer resol $B$,(B exact $B$+(B
        !           101:   $BD4$Y$k(B.
        !           102:   $BNcBj$O(B, ann(1/(x^3-y^2 z^2)) $B$N(B Laplace $BJQ49(B.
        !           103:
        !           104:

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>