function txt_numbers_write(filename,A)
fid = fopen(filename,'w+t');
if fid < 0
   fprintf('error opening file\n');
   return;
end
for ii = 1:size(A,1)
    fprintf(fid,'%6.3f,',A(ii,1:end-1));
    fprintf(fid,'%6.3f\n',A(ii,end));
end


