wolffd@0: function logging( file,log_dat)
wolffd@0: % Log all values in data to the file
wolffd@0: % sontran2013
wolffd@0: stt  = exist(file,'file');
wolffd@0: if stt == 0
wolffd@0:     data = zeros(0,0);
wolffd@0: else
wolffd@0:     load(file);
wolffd@0: end
wolffd@0: data = [data;log_dat];
wolffd@0: if exist('OCTAVE_VERSION')
wolffd@0:   save('-mat-binary',file,'data');
wolffd@0: else
wolffd@0:   save(file,'data');
wolffd@0: end
wolffd@0: end
wolffd@0: