commented out setwd() for portability