NT = [];
for i = 3:37
    
    addpath('/Users/mueen/Downloads/04.Eq_Lopnor');

    eval(sprintf('cd %s/wf/',flist(i).name));
    a = readsac();
    NT = [NT; a];
    eval('cd ..');
    eval('cd ..');
end
    
