/*$OpenXM: OpenXM/rc/asirrc,v 1.6 2000/01/21 01:22:39 takayama Exp $*/
load("gr")$
load("primdec")$
load("katsura")$
load("xm")$
User_asirrc=which(getenv("HOME")+"/.asirrc")$
if (type(User_asirrc)!=0) {
   print("Loading ~/.asirrc")$
   load(User_asirrc)$
}
end$