function [str,n]=uschoose(lstr,default)

if(nargin==1) 
  default={''}; 
end
if(~iscell(lstr)) 
  if(strcmp(lstr,'')==1)
    lstr=default;
  else
    lstr={lstr};
  end
end

N=length(lstr);

n=floor(rand*N)+1;
str=lstr{n};
