zSaveNTData

 zSaveNTData saves File in File.Filename.analyzed

0001 % zSaveNTData saves File in File.Filename.analyzed
0002 
0003 function [void] = zSaveNTData(Files,Verbose)
0004 
0005 if nargin < 2,
0006   Verbose = 1;
0007 end
0008 
0009 for f=1:length(Files),
0010 
0011   File = Files(f);
0012 
0013   File.Modified = 0;                          % flag to know to save
0014   File.Distance = [];                         % clear; recompute on load
0015 
0016   if ~(exist('PrecomputedData') == 7),        % if directory doesn't yet exist
0017     mkdir('PrecomputedData');
0018   end
0019 
0020   File.Filename = upper(File.Filename);
0021 
0022   if File.NumNT >= 0,
0023    File.Pair = [];
0024    File.CI   = [];
0025    File.SizeCode = 1;
0026 
0027    for n=1:length(File.NT),
0028      File.NT(n).Loc = [];
0029    end
0030 
0031    save([pwd filesep 'PrecomputedData' filesep File.Filename '.mat'],'File');
0032    if Verbose > 0,
0033      fprintf('Saved %s\n', [File.Filename '.mat']);
0034    end
0035   end
0036 
0037 end