function rle = D35WQ8_rle_encoder(x)
    %x = int8(x);
    x = x(:);
    d = [true; diff(x) ~= 0];   
    b = x(d);                  
    k = find([d', true]);       
    n = diff(k)';
    rle = [b, n];
end

