/*-------------------------------------------------------------------
  xwordlength(x,n,char)
   returns length of word n in x char words
   if n > nbr of words 0 is returned
   Mark McDonald 2008
  -------------------------------------------------------------------*/
int *xwordlength(char *x, int xn, char *xdelim){
  char *xarray[];
  int xret;
  int nwrds;
  nwrds = strparsex(xarray, x, xdelim);
  if(xn > nwrds){return (0);}
  xn--;
  xret = strlen(xarray[xn]);
}//xwordlength