function y=lookup_128
% Prepare table of indices of descendants for 4 scales
y=extract(reshape([257:512],16,16)');
y=[y ; extract(reshape([513:768],16,16)')];
y=[y ; extract(reshape([769:1024],16,16)')];
%------------------------------------------------------------------------
y=[y ; extract(reshape([1025:2048],32,32)')];
y=[y ; extract(reshape([2049:3072],32,32)')];
y=[y ; extract(reshape([3073:4096],32,32)')];
y=[y ; extract(reshape([4097:8192],64,64)')];
y=[y ; extract(reshape([8193:12288],64,64)')];
y=[y ; extract(reshape([12289:16384],64,64)')];
y=[zeros(64,4);y]; % was 512
indices=y;
save indices