[BACK]Return to Dmodule.texi CVS log [TXT][DIR] Up to [local] / OpenXM / src / asir-contrib / packages / doc

Annotation of OpenXM/src/asir-contrib/packages/doc/Dmodule.texi, Revision 1.3

1.2       okutani     1: @c $OpenXM$
1.1       takayama    2: @node D-module,,, $B$=$NB>$NH!?t(B
                      3: @section D-module
                      4: $B%U%!%$%k(B @file{gr}, @file{xm}, @file{Matrix}, @file{Diff} $B$,I,MW$G$9(B.
                      5: @menu
1.3     ! okutani     6: @c * dmodule_make_dv::
        !             7: * dmodule_d_op_tosm1::
        !             8: * dmodule_d_op_toasir::
        !             9: * dmodule_d_op_fromasir::
        !            10: * dmodule_ch_ideal::
        !            11: @c * dmodule_ch_ideal_appell1::
        !            12: @c * dmodule_ch_ideal_appell2::
        !            13: @c * dmodule_ch_ideal_appell3::
        !            14: @c * dmodule_ch_ideal_appell4::
        !            15: @c * dmodule_ch_ideal_selberg2::
        !            16: @c * dmodule_ch_ideal_gkz::
        !            17: * dmodule_restriction::
        !            18: @c * dmodule_restriction_appell1::
        !            19: @c * dmodule_restriction_appell2::
        !            20: @c * dmodule_restriction_appell3::
        !            21: @c * dmodule_restriction_appell4::
        !            22: @c * dmodule_restriction_selberg2::
        !            23: @c * dmodule_restriction_gkz::
        !            24: * dmodule_elimination::
        !            25: @c * dmodule_elimination_appell1::
        !            26: @c * dmodule_elimination_appell2::
        !            27: @c * dmodule_elimination_appell3::
        !            28: @c * dmodule_elimination_appell4::
        !            29: @c * dmodule_elimination_selberg2::
        !            30: @c * dmodule_elimination_gkz::
1.1       takayama   31: @end menu
                     32:
1.3     ! okutani    33: @node dmodule_d_op_tosm1,,, D-module
        !            34: @subsection @code{dmodule_d_op_tosm1}
        !            35: @findex dmodule_d_op_tosm1
1.1       takayama   36: @table @t
1.3     ! okutani    37: @item dmodule_d_op_tosm1(@var{LL},@var{V})
1.1       takayama   38: ::  $B%j%9%H7A<0$NHyJ,:nMQAG%j%9%H$r(B sm1 $B7A<0$KJQ49$7$^$9(B.
                     39: @end table
                     40: @table @var
                     41: @item return
                     42: $B%j%9%H(B
                     43: @item LL
                     44: $B%j%9%H(B
                     45: @item V
                     46: $B%j%9%H(B
                     47: @end table
                     48: @itemize @bullet
                     49: @item  $BHyJ,:nMQAG$N78?t$O@0?tB?9`<0$KJQ49$5$l$^$9(B.
1.3     ! okutani    50: @item  @code{dmodule_d_op_tosm1}$B$NNc(B
1.1       takayama   51: @end itemize
                     52: @example
1.3     ! okutani    53: [299] dmodule_d_op_tosm1([[[x,[2,0]],[-1,[0,0]]],
        !            54:                           [[y,[0,2]],[-1,[0,0]]]],[x,y]);
1.1       takayama   55: [ + ( + (1) x) dx^2 + ( + (-1)), + ( + (1) y) dy^2 + ( + (-1))]
                     56:
1.3     ! okutani    57: [300] dmodule_d_op_tosm1([[[x,[1,0]],[y,[0,1]],[1,[0,0]]],
        !            58:                           [[1,[2,0]],[1,[0,2]]]],[x,y]);
1.1       takayama   59: [ + ( + (1) x) dx + ( + (1) y) dy + ( + (1)), + ( + (1)) dx^2 + ( + (1)) dy^2]
                     60:
1.3     ! okutani    61: [301] dmodule_d_op_tosm1([[[1/2,[1,0]],[1,[0,0]]],
        !            62:                           [[1/3,[0,1]],[1/4,[0,0]]]],[x,y]);
1.1       takayama   63: [ + ( + (6)) dx + ( + (12)), + ( + (4)) dy + ( + (3))]
                     64:
1.3     ! okutani    65: [302] dmodule_d_op_tosm1([[[1/2*x,[1,0]],[1,[0,0]]],
        !            66:                           [[1/3*y,[0,1]],[1/4,[0,0]]]],[x,y]);
1.1       takayama   67: [ + ( + (6) x) dx + ( + (12)), + ( + (4) y) dy + ( + (3))]
                     68: @end example
                     69:
1.3     ! okutani    70: @node dmodule_d_op_toasir,,, D-module
        !            71: @subsection @code{dmodule_d_op_toasir}
        !            72: @findex dmodule_d_op_toasir
1.1       takayama   73: @table @t
1.3     ! okutani    74: @item dmodule_d_op_toasir(@var{LL},@var{V})
1.2       okutani    75: ::  $B%j%9%H7A<0$NHyJ,:nMQAG%j%9%H(B @var{LL} $B$r(B @code{asir} $B$NB?9`<0$KJQ49$7$^$9(B.
1.1       takayama   76: @end table
                     77: @table @var
                     78: @item return
                     79: $B%j%9%H(B
                     80: @item LL
                     81: $B%j%9%H(B
                     82: @item V
                     83: $B%j%9%H(B
                     84: @end table
                     85: @itemize @bullet
1.3     ! okutani    86: @item  @code{dmodule_d_op_toasir}$B$NNc(B
1.1       takayama   87: @end itemize
                     88: @example
1.3     ! okutani    89: [303] dmodule_d_op_toasir([[[1/2*x,[1,0]],[1,[0,0]]],
        !            90:                            [[1/3*y,[0,1]],[1/4,[0,0]]]],[x,y]);
1.1       takayama   91: [1/2*x*dx+1,1/3*y*dy+1/4]
                     92:
1.3     ! okutani    93: [304] dmodule_d_op_toasir([[[x,[1,0]],[y,[0,1]],[1,[0,0]]],
        !            94:                            [[1,[2,0]],[1,[0,2]]]],[x,y]);
1.1       takayama   95: [x*dx+y*dy+1,dx^2+dy^2]
                     96: @end example
                     97:
1.3     ! okutani    98: @node dmodule_d_op_fromasir,,, D-module
        !            99: @subsection @code{dmodule_d_op_fromasir}
        !           100: @findex dmodule_d_op_fromasir
1.1       takayama  101: @table @t
1.3     ! okutani   102: @item dmodule_d_op_fromasir(@var{D_list},@var{V})
1.2       okutani   103: ::  @code{asir} $B$NB?9`<0$+$i%j%9%H7A<0$NHyJ,:nMQAG%j%9%H$KJQ49$7$^$9(B.
1.1       takayama  104: @end table
                    105: @table @var
                    106: @item return
                    107: $B%j%9%H(B
                    108: @item D_list
                    109: $B%j%9%H(B
                    110: @item V
                    111: $B%j%9%H(B
                    112: @end table
                    113: @itemize @bullet
1.3     ! okutani   114: @item  @code{dmodule_d_op_fromasir}$B$NNc(B
1.1       takayama  115: @end itemize
                    116: @example
1.3     ! okutani   117: [305] dmodule_d_op_fromasir([1/2*x*dx+1,1/3*y*dy+1/4],[x,y]);
1.1       takayama  118: [[[1/2*x,[1,0]],[1,[0,0]]],[[1/3*y,[0,1]],[1/4,[0,0]]]]
                    119:
1.3     ! okutani   120: [306] dmodule_d_op_fromasir([x*dx+y*dy+1,dx^2+dy^2],[x,y]);
1.1       takayama  121: [[[x,[1,0]],[y,[0,1]],[1,[0,0]]],[[1,[2,0]],[1,[0,2]]]]
                    122: @end example
                    123:
1.3     ! okutani   124: @node dmodule_ch_ideal,,, D-module
        !           125: @subsection @code{dmodule_ch_ideal}
        !           126: @findex dmodule_ch_ideal
1.1       takayama  127: @table @t
1.3     ! okutani   128: @item dmodule_ch_ideal(@var{D_ideal},@var{V})
1.1       takayama  129: ::  @var{D_ideal}$B$N(Bcharacteristic ideal$B$r5a$a$^$9(B.
                    130: @end table
                    131: @table @var
                    132: @item return
                    133: $B%j%9%H(B
                    134: @item D_ideal
                    135: $B%j%9%H(B
                    136: @item V
                    137: $B%j%9%H(B
                    138: @end table
                    139: @itemize @bullet
1.3     ! okutani   140: @item  @code{dmodule_ch_ideal}$B$NNc(B
1.1       takayama  141: @end itemize
                    142: @example
1.3     ! okutani   143: [301] dmodule_ch_ideal(["x dx + y dy + 1","dx^2 + dy^2"],[x,y]);
1.1       takayama  144: [x*dx+y*dy,dx^2+dy^2,y*dy*dx-x*dy^2,(x^2+y^2)*dy^2]
                    145:
1.3     ! okutani   146: [302] dmodule_ch_ideal(["x dx + 1","dx dy"],[x,y]);
1.1       takayama  147: [x*dx,dy]
                    148: @end example
                    149:
1.3     ! okutani   150: @node dmodule_restriction,,, D-module
        !           151: @subsection @code{dmodule_restriction}
        !           152: @findex dmodule_restriction
1.1       takayama  153: @table @t
1.3     ! okutani   154: @item dmodule_restriction(@var{D_ideal},@var{V},@var{Rest})
1.1       takayama  155: ::  @var{D_ideal}$B$N(Brestriction$B$r5a$a$^$9(B.
                    156: @end table
                    157: @table @var
                    158: @item return
                    159: $B%j%9%H(B
                    160: @item @var{D_ideal}
                    161: $B%j%9%H(B
                    162: @item @var{V}
                    163: $B%j%9%H(B
                    164: @item @var{Rest}
                    165: $B%j%9%H(B
                    166: @end table
                    167: @itemize @bullet
1.3     ! okutani   168: @item  @code{dmodule_restriction}$B$NNc(B.
1.1       takayama  169: @end itemize
                    170: @example
1.3     ! okutani   171: [303] dmodule_restriction(["x dx + y dy + 1","dx^2 + dy^2"],[x,y],[y]);
1.1       takayama  172: [[2,[-x*dx-1,-e0*x*dx-2*e0]]]
                    173: @end example
                    174:
1.3     ! okutani   175: @node dmodule_elimination,,, D-module
        !           176: @subsection @code{dmodule_elimination}
        !           177: @findex dmodule_elimination
1.1       takayama  178: @table @t
1.3     ! okutani   179: @item dmodule_elimination(@var{D_ideal},@var{V},@var{Elim})
1.1       takayama  180: ::  @var{D_ideal}$B$N(Belimination ideal$B$r5a$a$^$9(B.
                    181: @end table
                    182: @table @var
                    183: @item return
                    184: $B%j%9%H(B
                    185: @item @var{D_ideal}
                    186: $B%j%9%H(B
                    187: @item @var{V}
                    188: $B%j%9%H(B
                    189: @item @var{Elim}
                    190: $B%j%9%H(B
                    191: @end table
                    192: @itemize @bullet
1.3     ! okutani   193: @item  @code{dmodule_elimination}$B$NNc(B.
1.1       takayama  194: @end itemize
                    195: @example
1.3     ! okutani   196: [305] dmodule_elimination(["x dx + y dy + 1","dx^2 + dy^2"],[x,y],[[y],[0]]);
1.1       takayama  197: [x^2*dx^2+4*x*dx+2]
1.3     ! okutani   198:
        !           199: [306] dmodule_elimination(["x dx + y dy + 1","dx^2 + dy^2"],[x,y],[[y],[a]]);
        !           200: [(x^2+a^2)*dx^2+4*x*dx+2]
        !           201: @end example
        !           202:
        !           203: @node dmodule_elimination_generic,,, D-module
        !           204: @subsection @code{dmodule_elimination_generic}
        !           205: @findex dmodule_elimination_generic
        !           206: @table @t
        !           207: @item dmodule_elimination_generic(@var{D_ideal},@var{Param},@var{V},@var{Elim})
        !           208: ::  generic parameter$B$r4^$`(B@var{D_ideal}$B$N(Belimination ideal$B$r5a$a$^$9(B.
        !           209: @end table
        !           210: @table @var
        !           211: @item return
        !           212: $B%j%9%H(B
        !           213: @item @var{D_ideal}
        !           214: $B%j%9%H(B
        !           215: @item @var{Param}
        !           216: $B%j%9%H(B
        !           217: @item @var{V}
        !           218: $B%j%9%H(B
        !           219: @item @var{Elim}
        !           220: $B%j%9%H(B
        !           221: @end table
        !           222: @itemize @bullet
        !           223: @item  @code{dmodule_elimination_generic}$B$NNc(B.
        !           224: @end itemize
        !           225: @example
        !           226: [307] dmodule_elimination_generic(["x dx + y dy + 1","dx^2 + dy^2 + a"],
        !           227:                                   [a],[x,y],[[y],[s]]);
        !           228: [(x^2+s^2)*dx^2+4*x*dx+a*s^2+2,2*a]
        !           229:
1.1       takayama  230: @end example
                    231:

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