===================================================================
RCS file: /home/cvs/OpenXM/src/asir-doc/parts/asir.texi,v
retrieving revision 1.8
retrieving revision 1.10
diff -u -p -r1.8 -r1.10
--- 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:23:58	1.10
@@ -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.9 2003/11/27 12:08:58 ohara 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
@@ -371,6 +381,18 @@ ICJ
 @end ifinfo
 \JP を要素とする配列である. 
 \EG as its elements.
+
+@noindent
+\BJP
+3 つ目の例では, 引数並びのあとに文字列が置かれているが、これは
+Emacs-Lisp の関数定義に類似の機能で、ヘルプ用の文字列である。
+この例の場合、@code{help(add)} によってこの文字列が出力される。
+\E
+@table @t
+\JP @item 参照
+\EG @item References
+@fref{help}.
+@end table
 
 @noindent
 \BJP