Annotation of OpenXM/src/k097/Doc/standard-suppl.texi, Revision 1.1
1.1 ! takayama 1: %% $OpenXM$
! 2: /*&C
! 3: \input texinfo
! 4: @iftex
! 5: @catcode`@#=6
! 6: @def@b#1{{@bf@gt #1}}
! 7: @catcode`@#=@other
! 8: @end iftex
! 9: @overfullrule=0pt
! 10: @c -*-texinfo-*-
! 11: @comment %**start of header
! 12: @setfilename standard-suppl
! 13: @settitle standard-suppl
! 14: @comment %**end of header
! 15: @comment %@setchapternewpage odd
! 16:
! 17: @iftex
! 18: @comment @finalout
! 19: @end iftex
! 20:
! 21: @titlepage
! 22:
! 23: */
! 24:
! 25: //&C @title Kan/k0 Standard library (supplement).
! 26: //&ja @subtitle Kan/k0 Standard Library $B%Q%C%1!<%8(B ($BJdB-(B) User's Manual ($BF|K\8lHG(B)
! 27: //&en @subtitle Kan/k0 Standard Library Package (supplement) User's Manual
! 28: /*&C
! 29: @subtitle Edition 1.1.3 for OpenXM/kan/k0
! 30: @subtitle January 8, 2001.
! 31:
! 32: @author by Nobuki Takayama
! 33: @end titlepage
! 34:
! 35: @synindex vr fn
! 36:
! 37: @comment node-name, next, previous, up
! 38: @node Top,, (dir), (dir)
! 39:
! 40: */
! 41:
! 42: /*&ja
! 43:
! 44: @menu
! 45: * $B4pK\(B $BH!?t(B::
! 46: * $B:w0z(B::
! 47: @end menu
! 48:
! 49: */
! 50: /*&en
! 51:
! 52: @menu
! 53: * Standard function::
! 54: * index::
! 55: @end menu
! 56:
! 57: */
! 58:
! 59: @c -------------- Standard $B4pK\(B ----------------------
! 60: @c $B$3$l$i$N4pK\4X?t$O(B slib.k, help.k $BEy(B, starup.k $B$h$jFI$_9~$^$l$k4X?t(B
! 61: @c $B$G$"$k$,(B, HelpAdd $B$G$O=q$+$l$F$$$J$$(B.
! 62: /*&ja
! 63:
! 64: @node $B4pK\(B $BH!?t(B,,, Top
! 65: @chapter $B4pK\(B $BH!?t(B
! 66: @section $BH!?t0lMw(B
! 67: */
! 68: /*&en
! 69:
! 70: @node Standard function,,, Top
! 71: @chapter Standard function
! 72: @section A list of functions
! 73: */
! 74: /*&C
! 75: @menu
! 76: * GetRing::
! 77: * SetRing::
! 78: @end menu
! 79: */
! 80:
! 81:
! 82: /*&ja
! 83: @c %%%%%%%%%%%%%%%%%%%% start of GetRing %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
! 84: @menu
! 85: * GetRing::
! 86: @end menu
! 87: @node GetRing,,, $B4pK\(B $BH!?t(B
! 88: @subsection @code{GetRing}
! 89: @findex GetRing
! 90: @table @t
! 91: @item GetRing(@var{f})
! 92: :: @var{f} $B$NMWAG$NB0$9$k4D$rLa$9(B.
! 93: @end table
! 94:
! 95: @table @var
! 96: @item return
! 97: $B4D(B
! 98: @item f
! 99: $B%*%V%8%'%/%H(B
! 100: @end table
! 101:
! 102: @itemize @bullet
! 103: @item @var{f} $B$NMWAG$^$?$O(B @var{f} $B<+?H$NB0$9$k4D$rLa$9(B.
! 104: $B4D$,$J$$$H$-$O(B null $B$rLa$9(B.
! 105: @end itemize
! 106:
! 107: @example
! 108: In(16)= RingD("x,y");
! 109: In(17)= r = GetRing([x^2,0,1]);
! 110: @end example
! 111:
! 112: @table @t
! 113: @item $B;2>H(B
! 114: @code{SetRing}, @code{ChangeRing}.
! 115: @end table
! 116: @c %%%%%%%%%%%%%%%%%%%% end of GetRing %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
! 117: */
! 118:
! 119: /*&ja
! 120: @c %%%%%%%%%%%%%%%%%%%% start of SetRing %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
! 121: @menu
! 122: * SetRing::
! 123: @end menu
! 124: @node SetRing,,, $B4pK\(B $BH!?t(B
! 125: @subsection @code{SetRing}
! 126: @findex SetRing
! 127: @table @t
! 128: @item SetRing(@var{r})
! 129: :: Current ring $B$r(B @var{r} $B$KJQ99$9$k(B.
! 130: @end table
! 131:
! 132: @table @var
! 133: @item return
! 134: $B$J$7(B
! 135: @item r
! 136: $B4D(B
! 137: @end table
! 138:
! 139: @itemize @bullet
! 140: @item Current ring $B$r(B @var{r} $B$KJQ99$9$k(B.
! 141: @end itemize
! 142:
! 143: @example
! 144: In(16)= RingD("x,y");
! 145: In(17)= f=[x^2,0,1]; r = GetRing(f);
! 146: In(19)= RingD("p,q");
! 147: In(20)= SetRing(r);
! 148: In(21)= f = DC(f,"polynomial");
! 149: @end example
! 150:
! 151: @table @t
! 152: @item $B;2>H(B
! 153: @code{GetRing}, @code{ChangeRing}, @code{DC}.
! 154: @end table
! 155: @c %%%%%%%%%%%%%%%%%%%% end of SetRing %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
! 156: */
! 157:
! 158:
! 159: /*&ja
! 160: @node $B:w0z(B,,, Top
! 161: @unnumbered $B:w0z(B
! 162: */
! 163: /*&en
! 164: @node index,,, Top
! 165: @unnumbered index
! 166: */
! 167: /*&C
! 168: @printindex fn
! 169: @printindex cp
! 170: @iftex
! 171: @vfill @eject
! 172: @end iftex
! 173: @summarycontents
! 174: @contents
! 175: @bye
! 176: */
! 177:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>