===================================================================
RCS file: /home/cvs/OpenXM/rc/asirrc,v
retrieving revision 1.4
retrieving revision 1.9
diff -u -p -r1.4 -r1.9
--- OpenXM/rc/asirrc	2000/01/16 06:08:53	1.4
+++ OpenXM/rc/asirrc	2002/08/10 13:05:06	1.9
@@ -1,7 +1,14 @@
-/*$OpenXM: OpenXM/rc/asirrc,v 1.3 1999/12/15 05:54:23 takayama Exp $*/
+/*$OpenXM: OpenXM/rc/asirrc,v 1.8 2002/01/06 08:47:35 takayama Exp $*/
 load("gr")$
 load("primdec")$
 load("katsura")$
+load("bfct")$
 load("xm")$
+load("names.rr")$
+User_asirrc=which(getenv("HOME")+"/.asirrc")$
+if (type(User_asirrc)!=0) {
+   print("Loading ~/.asirrc")$
+   load(User_asirrc)$
+}$
 end$