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