load OF
%addpath('/scr/em1/kappler/UXO/')
for i=1:numel(OF)
    OF{i}.INV.fname=OF{i}.fNameOrig;
    OF{i}.INV.avgPolarindex=OF{i}.polarIndex;
    plotInv(OF{i}.INV)
    waitforbuttonpress
end


%%STAGE1? Shear off all objects which have the following property:
%1. inFoot=1;
%2. z<30
%4. aPi<5;