function closeall;
% close all file handles gauss and otherwise synonomous with fclose('all')
global gaussfh;
fclose('all');
gaussfh=-99.*ones(100,2);
return;