function [phi,del]=twopar(n,phi1,del1,n1,phi2,del2,n2)
% this function makes par parameters that switch between 2 ars
% n = no points to make
% n1 = no. times at model1
% n2 = no tome at model 2
phi=[];
del=[];
for i=1:n1
phi = [phi ; phi1];
del = [del ; del1];
end
for i=1:n2
phi = [phi ; phi2];
del = [del ; del2];
end