function pD = perP(p,Del)

%-parameter vector
% p{1} = [X1 X2 Vm Vp nTs Qm Qp nCs];
% p{2} = [tauT];
% p{3} = [tauC];
% p{4} = [Tp Ps Pt];
% p{5} = [C nCT];
% p{6} = [Xs Xm Xr Rs Rr ws Jg Tm];

pD = p;

pD{1}(2) = Del(1);
pD{4}(2) = Del(2);
pD{6}(8) = Del(3);
