% sigrep - Signal of repeated values
% sigrep :: natural, A:[[C,1]] -> signal(C,_).
function s=sigrep(n,x)
	%s=sigarray(repmat(x,1,n));
	s=take(n,sigconst(x));
