function res=marche(m,n,p)
	z=zeros(m,1);
	res=[z 2*bool2s((rand(m,n-1)<p))-1];
	res=cumsum(res',1)';
endfunction