===================================================================
RCS file: /home/cvs/OpenXM/src/asir-port/cgi/cgi-asir-r-fd.sh,v
retrieving revision 1.1
retrieving revision 1.5
diff -u -p -r1.1 -r1.5
--- OpenXM/src/asir-port/cgi/cgi-asir-r-fd.sh	2014/07/27 03:18:44	1.1
+++ OpenXM/src/asir-port/cgi/cgi-asir-r-fd.sh	2015/02/25 04:47:50	1.5
@@ -1,14 +1,22 @@
 #!/bin/bash
-# $OpenXM$
-## Replace $OpenXM_HOME by an absolute path of your cite.
+# $OpenXM: OpenXM/src/asir-port/cgi/cgi-asir-r-fd.sh,v 1.4 2014/08/31 21:06:19 takayama Exp $
+## Replace $OpenXM_HOME by an absolute path of your cite and uncoment out.
+#export OpenXM_HOME=/private/taka/OpenXM
+export HOME=/tmp
+## Note that OpenXM_tmp is set in the dot.bashrc below as HOME/.OpenXM_tmp
 source $OpenXM_HOME/rc/dot.bashrc
 #source /home/taka/OpenXM/rc/dot.bashrc
 export TMP=/tmp
-export CGI_ASIR_ALLOW="[(version) (asir_contrib_copyright) (r_ahvec)]"
+export CGI_ASIR_ALLOW="[(version) (asir_contrib_copyright) (a_ahvec) (r_ahvec)]"
 export CGI_ASIR_TLIMIT="3600"
 export OX_ASIR_LOAD_FILE=$OpenXM_HOME/src/asir-port/cgi/r-fd.rr
 export CGI_ASIR_MSG="<pre>
- Example. r_fd(-1,[-2,-3],10,[[1,1/2,1/3],[1,1,1]]);
+ Example. r_ahvec(-1,[-2,-3],10,[[1,1/2,1/3],[1,1,1]])
+ r_ahvec(A,B,C,P),  P is a 2 by m matrix.
+ Contingency table:
+ -A,     0,    0,   0
+ C-1,-B[0],-B[1],-B[2]
+ It returns (Z, d21 Z, d22 Z, ..., d2m Z).
 </pre><br>"
 WFILE=/tmp/tmp-post-$$.txt
 tee /tmp/t.txt | oxdecode_post >${WFILE}