0001 function copyNewAlphaToOld()
0002
0003
0004 x = readAlphaDatabase();
0005
0006 tnew = x{1};
0007 alphanew = x{2};
0008 gainnew = x{3};
0009 rnew = x{12};
0010 Tnew = x{13};
0011 tempsnew = x{15};
0012 horznew = x{14}(:,1:2);
0013 equanew = x{14}(:,3:4);
0014 TYPEnew = x{16};
0015 gainPOnew = [x{6}(:,1) x{8}(:,4) x{6}(:,2)];
0016 phi_fnew = x{9}(:,3);
0017
0018 writeAlphaDatabase_DD(tnew,alphanew,gainnew,gainPOnew,phi_fnew,rnew,Tnew,...
0019 tempsnew,horznew,equanew,TYPEnew,'REPLACE');
0020
0021 end
0022