.First.lib <- function(lib.loc,section)
{
cat("\nSpatial Point Pattern Analysis Code in S-Plus\n")
cat("\n Version 2 - Spatial and Space-Time analysis\n")
dynpath <- paste(lib.loc,section,"splancs.o", sep = "/")
cat(paste("Loading ", dynpath, "\n", sep = ""))
dyn.load(dynpath)
}