/*$OpenXM: OpenXM/rc/asirrc,v 1.9 2002/08/10 13:05:06 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$