function re = setstar(U)
% U is a set of letters
% re is the regular expression U^*
k=length(U);
P=repmat('+',1,k);
up = [U;P];
up = up(:)';
re = ['(' up(1:end-1) ')*'];
return