Annotation of OpenXM/src/asir-contrib/packages/doc/Dmodule.texi, Revision 1.1
1.1 ! takayama 1: @c $OpenXM: OpenXM/src/asir99/lib/contrib/packages/doc/Dmodule.texi,v 1.3 1999/11/23 05:57:47 okutani Exp $
! 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
! 6: @c * dmod_make_dv::
! 7: * dmod_d_op_tosm1::
! 8: * dmod_d_op_toasir::
! 9: * dmod_d_op_fromasir::
! 10: * dmod_ch_ideal::
! 11: @c * dmod_ch_ideal_appell1::
! 12: @c * dmod_ch_ideal_appell2::
! 13: @c * dmod_ch_ideal_appell3::
! 14: @c * dmod_ch_ideal_appell4::
! 15: @c * dmod_ch_ideal_selberg2::
! 16: @c * dmod_ch_ideal_gkz::
! 17: * dmod_restriction::
! 18: @c * dmod_restriction_appell1::
! 19: @c * dmod_restriction_appell2::
! 20: @c * dmod_restriction_appell3::
! 21: @c * dmod_restriction_appell4::
! 22: @c * dmod_restriction_selberg2::
! 23: @c * dmod_restriction_gkz::
! 24: * dmod_elimination::
! 25: @c * dmod_elimination_appell1::
! 26: @c * dmod_elimination_appell2::
! 27: @c * dmod_elimination_appell3::
! 28: @c * dmod_elimination_appell4::
! 29: @c * dmod_elimination_selberg2::
! 30: @c * dmod_elimination_gkz::
! 31: @end menu
! 32:
! 33: @node dmod_d_op_tosm1,,, D-module
! 34: @subsection @code{dmod_d_op_tosm1}
! 35: @findex dmod_d_op_tosm1
! 36: @table @t
! 37: @item dmod_d_op_tosm1(@var{LL},@var{V})
! 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.
! 50: @item @code{dmod_d_op_tosm1}$B$NNc(B
! 51: @end itemize
! 52: @example
! 53: [299] dmod_d_op_tosm1([[[x,[2,0]],[-1,[0,0]]],[[y,[0,2]],[-1,[0,0]]]],[x,y]);
! 54: [ + ( + (1) x) dx^2 + ( + (-1)), + ( + (1) y) dy^2 + ( + (-1))]
! 55:
! 56: [300] dmod_d_op_tosm1([[[x,[1,0]],[y,[0,1]],[1,[0,0]]],[[1,[2,0]],[1,[0,2]]]],[x,y]);
! 57: [ + ( + (1) x) dx + ( + (1) y) dy + ( + (1)), + ( + (1)) dx^2 + ( + (1)) dy^2]
! 58:
! 59: [301] dmod_d_op_tosm1([[[1/2,[1,0]],[1,[0,0]]],[[1/3,[0,1]],[1/4,[0,0]]]],[x,y]);
! 60: [ + ( + (6)) dx + ( + (12)), + ( + (4)) dy + ( + (3))]
! 61:
! 62: [302] dmod_d_op_tosm1([[[1/2*x,[1,0]],[1,[0,0]]],[[1/3*y,[0,1]],[1/4,[0,0]]]],[x,y]);
! 63: [ + ( + (6) x) dx + ( + (12)), + ( + (4) y) dy + ( + (3))]
! 64: @end example
! 65:
! 66: @node dmod_d_op_toasir,,, D-module
! 67: @subsection @code{dmod_d_op_toasir}
! 68: @findex dmod_d_op_toasir
! 69: @table @t
! 70: @item dmod_d_op_toasir(@var{LL},@var{V})
! 71: :: $B%j%9%H7A<0$NHyJ,:nMQAG%j%9%H(B @var{LL} $B$r(B asir $B$NB?9`<0$KJQ49$7$^$9(B.
! 72: @end table
! 73: @table @var
! 74: @item return
! 75: $B%j%9%H(B
! 76: @item LL
! 77: $B%j%9%H(B
! 78: @item V
! 79: $B%j%9%H(B
! 80: @end table
! 81: @itemize @bullet
! 82: @item @code{dmod_d_op_toasir}$B$NNc(B
! 83: @end itemize
! 84: @example
! 85: [303] dmod_d_op_toasir([[[1/2*x,[1,0]],[1,[0,0]]],[[1/3*y,[0,1]],[1/4,[0,0]]]],[x,y]);
! 86: [1/2*x*dx+1,1/3*y*dy+1/4]
! 87:
! 88: [304] dmod_d_op_toasir([[[x,[1,0]],[y,[0,1]],[1,[0,0]]],[[1,[2,0]],[1,[0,2]]]],[x,y]);
! 89: [x*dx+y*dy+1,dx^2+dy^2]
! 90: @end example
! 91:
! 92: @node dmod_d_op_fromasir,,, D-module
! 93: @subsection @code{dmod_d_op_fromasir}
! 94: @findex dmod_d_op_fromasir
! 95: @table @t
! 96: @item dmod_d_op_fromasir(@var{D_list},@var{V})
! 97: :: asir $B$NB?9`<0$+$i%j%9%H7A<0$NHyJ,:nMQAG%j%9%H$KJQ49$7$^$9(B.
! 98: @end table
! 99: @table @var
! 100: @item return
! 101: $B%j%9%H(B
! 102: @item D_list
! 103: $B%j%9%H(B
! 104: @item V
! 105: $B%j%9%H(B
! 106: @end table
! 107: @itemize @bullet
! 108: @item @code{dmod_d_op_fromasir}$B$NNc(B
! 109: @end itemize
! 110: @example
! 111: [305] dmod_d_op_fromasir([1/2*x*dx+1,1/3*y*dy+1/4],[x,y]);
! 112: [[[1/2*x,[1,0]],[1,[0,0]]],[[1/3*y,[0,1]],[1/4,[0,0]]]]
! 113:
! 114: [306] dmod_d_op_fromasir([x*dx+y*dy+1,dx^2+dy^2],[x,y]);
! 115: [[[x,[1,0]],[y,[0,1]],[1,[0,0]]],[[1,[2,0]],[1,[0,2]]]]
! 116: @end example
! 117:
! 118: @node dmod_ch_ideal,,, D-module
! 119: @subsection @code{dmod_ch_ideal}
! 120: @findex dmod_ch_ideal
! 121: @table @t
! 122: @item dmod_ch_ideal(@var{D_ideal},@var{V})
! 123: :: @var{D_ideal}$B$N(Bcharacteristic ideal$B$r5a$a$^$9(B.
! 124: @end table
! 125: @table @var
! 126: @item return
! 127: $B%j%9%H(B
! 128: @item D_ideal
! 129: $B%j%9%H(B
! 130: @item V
! 131: $B%j%9%H(B
! 132: @end table
! 133: @itemize @bullet
! 134: @item @code{dmod_ch_ideal}$B$NNc(B
! 135: @end itemize
! 136: @example
! 137: [301] dmod_ch_ideal(["x dx + y dy + 1","dx^2 + dy^2"],[x,y]);
! 138: [x*dx+y*dy,dx^2+dy^2,y*dy*dx-x*dy^2,(x^2+y^2)*dy^2]
! 139:
! 140: [302] dmod_ch_ideal(["x dx + 1","dx dy"],[x,y]);
! 141: [x*dx,dy]
! 142: @end example
! 143:
! 144: @node dmod_restriction,,, D-module
! 145: @subsection @code{dmod_restriction}
! 146: @findex dmod_restriction
! 147: @table @t
! 148: @item dmod_restriction(@var{D_ideal},@var{V},@var{Rest})
! 149: :: @var{D_ideal}$B$N(Brestriction$B$r5a$a$^$9(B.
! 150: @end table
! 151: @table @var
! 152: @item return
! 153: $B%j%9%H(B
! 154: @item @var{D_ideal}
! 155: $B%j%9%H(B
! 156: @item @var{V}
! 157: $B%j%9%H(B
! 158: @item @var{Rest}
! 159: $B%j%9%H(B
! 160: @end table
! 161: @itemize @bullet
! 162: @item @code{dmod_restriction}$B$NNc(B.
! 163: @end itemize
! 164: @example
! 165: [303] dmod_restriction(["x dx + y dy + 1","dx^2 + dy^2"],[x,y],[y]);
! 166: [[2,[-x*dx-1,-e0*x*dx-2*e0]]]
! 167: @end example
! 168:
! 169: @node dmod_elimination,,, D-module
! 170: @subsection @code{dmod_elimination}
! 171: @findex dmod_elimination
! 172: @table @t
! 173: @item dmod_elimination(@var{D_ideal},@var{V},@var{Elim})
! 174: :: @var{D_ideal}$B$N(Belimination ideal$B$r5a$a$^$9(B.
! 175: @end table
! 176: @table @var
! 177: @item return
! 178: $B%j%9%H(B
! 179: @item @var{D_ideal}
! 180: $B%j%9%H(B
! 181: @item @var{V}
! 182: $B%j%9%H(B
! 183: @item @var{Elim}
! 184: $B%j%9%H(B
! 185: @end table
! 186: @itemize @bullet
! 187: @item @code{dmod_elimination}$B$NNc(B.
! 188: @end itemize
! 189: @example
! 190: [304] dmod_elimination(["x dx + y dy + 1","dx^2 + dy^2"],[x,y],[y]);
! 191: [x^2*dx^2+4*x*dx+2]
! 192: @end example
! 193:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>