if (!exists("dbname") && !exists("wh")) 
{
  wh <- "SCIENCE"
  dbname <- "prod"

  catn("Setting snowflake to wh='", wh, "' and dname='", dbname, "' as part of Looker supportFns", sep="")
  setSnowflake(wh=wh, dbname=dbname)
}