function [out]=aleatoriz(input)

out = zeros(size(input));
for it=1:length(out)
    if it>18
        out(it) = xor(out(it),out(it-18));
    end
    if it>23
        out(it) = xor(out(it),out(it-23));
    end
    
    out(it) = xor(out(it),input(it));
end


%out = filter(1,[1 zeros(1,17) -1 zeros(1,4) -1],double(input));
%out = out(1:length(input));
%out = uint32(mod(out,2));
