===================================================================
RCS file: /home/cvs/OpenXM/src/asir-doc/parts/asir.texi,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -p -r1.8 -r1.9
--- OpenXM/src/asir-doc/parts/asir.texi	2003/10/21 09:17:57	1.8
+++ OpenXM/src/asir-doc/parts/asir.texi	2003/11/27 12:08:58	1.9
@@ -1,4 +1,4 @@
-@comment $OpenXM: OpenXM/src/asir-doc/parts/asir.texi,v 1.7 2003/04/20 08:01:25 noro Exp $
+@comment $OpenXM: OpenXM/src/asir-doc/parts/asir.texi,v 1.8 2003/10/21 09:17:57 takayama Exp $
 \BJP
 @node ユーザ言語 Asir,,, Top
 @chapter ユーザ言語 Asir
@@ -349,6 +349,16 @@ def c(N)
         @}
     return A;
 @}
+
+@tex
+/* $A+B$ */
+@end tex
+
+def add(A,B)
+"add two numbers."
+@{
+    return A+B;
+@}
 @end example
 
 @noindent
@@ -361,6 +371,20 @@ In the second example, @code{c(N)} returns a vector, s
 @code{N+1}.  @code{A[I]} is a vector of length @code{I+1}, and
 each element is again a vector which contains
 \E
+
+@noindent
+\BJP
+3 つ目の例では, 引数並びのあとに文字列が置かれているが、これは
+Emacs-Lisp の関数定義に類似の機能で、ヘルプ用の文字列である。
+この例の場合、@code{help(add)} によってこの文字列が出力される。
+\E
+
+@table @t
+\JP @item 参照
+\EG @item References
+@fref{help}.
+@end table
+
 @iftex
 @tex
 ${_I}C_J$