/*-------------------------------------------------------------------
  xlower(string)
   returns string converted to lower case
   Mark McDonald 2008
  -------------------------------------------------------------------*/
char *xlower(char *x){
  char *xret;
  strcpy(xret,x);
  strlwr(xret);
  return(xret);
}//xlower