===================================================================
RCS file: /home/cvs/OpenXM/src/asir-contrib/packages/doc/Attic/Diff.texi,v
retrieving revision 1.1
retrieving revision 1.5
diff -u -p -r1.1 -r1.5
--- OpenXM/src/asir-contrib/packages/doc/Attic/Diff.texi	1999/11/27 11:25:18	1.1
+++ OpenXM/src/asir-contrib/packages/doc/Attic/Diff.texi	2000/01/31 11:01:00	1.5
@@ -1,4 +1,4 @@
-@c $OpenXM: OpenXM/src/asir99/lib/contrib/packages/doc/Diff.texi,v 1.4 1999/11/24 10:24:36 okutani Exp $
+@c $OpenXM: OpenXM/src/asir-contrib/packages/doc/Diff.texi,v 1.4 2000/01/21 12:54:39 okutani Exp $
 @node Differential equations,,, その他の函数
 @section Differential equations
 ファイル @file{gr}, @file{Matrix} が必要です.
@@ -16,7 +16,7 @@ $$ [ [ [f_{\alpha^{(1)}},[\alpha_{1}^{(1)},\ldots,\alp
 $$ [ [x,[1,0]],[y,[0,1]],[1,[0,0]] ] $$
 となります. また微分作用素のリストで$x dx + y dy + 1, dx^2 + dy^2$を表すと
 $$ [ [ [x,[1,0]],[y,[0,1]],[1,[0,0]] ],[ [1,[2,0]],[1,[0,2]] ] ] $$
-となります.
+となります. またこれらの表現法を使うときは変数リストを常に意識している必要があります。
 @end tex
 @menu
 @c * diff_op_hg1::
@@ -35,13 +35,15 @@ $$ [ [ [x,[1,0]],[y,[0,1]],[1,[0,0]] ],[ [1,[2,0]],[1,
 @c * diff_act_selberg2::
 @c * diff_act_gkz::
 * diff_poly_solve::
-@c * diff_poly_solve_hg1::
+* diff_poly_solve_hg1::
 @c * diff_poly_solve_appell1::
 @c * diff_poly_solve_appell2::
 @c * diff_poly_solve_appell3::
-@c * diff_poly_solve_appell4::
+* diff_poly_solve_appell4::
 @c * diff_poly_solve_selberg2::
 @c * diff_poly_solve_gkz::
+* diff_rat_solve::
+@c * diff_pseries_appell4::
 @end menu
 
 @node diff_op_appell4,,, Differential equations
@@ -157,3 +159,85 @@ $$ [ [ [x,[1,0]],[y,[0,1]],[1,[0,0]] ],[ [1,[2,0]],[1,
 [_33*y^2*x^2,[_33]]
 @end example
 
+@node diff_poly_solve_hg1,,, Differential equations
+@subsection @code{diff_poly_solve_hg1}
+@findex diff_poly_solve_hg1
+@table @t
+@item diff_poly_solve_hg1(@var{a},@var{b},@var{c},@var{V})
+::  ガウスの超幾何微分方程式の多項式解を求める.
+@end table
+@table @var
+@item return
+リスト
+@item a, b, c
+有理式
+@item V
+リスト
+@end table
+@itemize @bullet
+@item  @code{diff_poly_solve_hg1}の例.
+@end itemize
+@example
+[334] diff_poly_solve_hg1(-3,-6,-5,[x]);
+[_1*x^6-2*_0*x^3+9/2*_0*x^2-18/5*_0*x+_0,[_0,_1]]
+
+[335] diff_poly_solve_hg1(-3,-6,-7,[x]);
+[-4/7*_2*x^3+15/7*_2*x^2-18/7*_2*x+_2,[_2]]
+@end example
+
+@node diff_poly_solve_appell4,,, Differential equations
+@subsection @code{diff_poly_solve_appell4}
+@findex diff_poly_solve_appell4
+@table @t
+@item diff_poly_solve_appell4(@var{a},@var{b},@var{c1},@var{c2},@var{V})
+::  F_4がみたす線型微分方程式系の多項式解を求める.
+@end table
+@table @var
+@item return
+リスト
+@item a, b, c1, c2
+有理式
+@item V
+リスト
+@end table
+@itemize @bullet
+@item  @code{diff_poly_solve_appell4}の例.
+@end itemize
+@example
+[299] diff_poly_solve_appell4(-3,1,-1,-1,[x,y]);
+[-_26*x^3+(3*_26*y+_26)*x^2+3*_24*y^2*x-_24*y^3+_24*y^2,[_24,_26]]
+
+[300] diff_poly_solve_appell4(-3,1,1,-1,[x,y]);
+[-3*_45*y^2*x-_45*y^3+_45*y^2,[_45]]
+@end example
+
+@node diff_rat_solve,,, Differential equations
+@subsection @code{diff_rat_solve}
+@findex diff_rat_solve
+@table @t
+@item diff_rat_solve(@var{LL},@var{Dn},@var{N},@var{V})
+::  与えられた線型微分方程式系の分母が @var{Dn}, 分子が @var{N} 次以下の多項式であるような解を求める.
+@end table
+@table @var
+@item return
+リスト
+@item LL
+リスト
+@item Dn
+有理式
+@item N
+整数
+@item V
+リスト
+@end table
+@itemize @bullet
+@item  @code{diff_rat_solve}の例.
+@end itemize
+@example
+[333] diff_rat_solve([[[x,[1]],[1,[0]]]],x,1,[x]);
+[(_8)/(x),[_8]]
+
+[350] D = diff_op_appell4(0,0,3,0,[x,y])$
+[351] diff_rat_solve(D,x^2,2,[x,y]);
+[(_118*x^2-_114*y*x+1/2*_114*y^2+_114*y)/(x^2),[_114,_118]]
+@end example