12 lines
423 B
Mathematica
12 lines
423 B
Mathematica
|
function AA=FormAA(L_1Z,deltG,U_1W,Hcoma,deltH)
|
||
|
|
tOnes=eye(14);
|
||
|
|
tZeros=zeros(14);
|
||
|
|
AA=[
|
||
|
|
tOnes,L_1Z,tZeros,tZeros,tZeros,zeros(14,10);
|
||
|
|
tZeros,tOnes,tZeros,tZeros,-deltG',zeros(14,10);
|
||
|
|
tZeros,tZeros,tOnes,U_1W,tZeros,zeros(14,10);
|
||
|
|
tZeros,tZeros,tZeros,tOnes,deltG',zeros(14,10);
|
||
|
|
tZeros,tZeros,tZeros,tZeros,Hcoma,deltH;
|
||
|
|
zeros(10,14),zeros(10,14),zeros(10,14),zeros(10,14),deltH',zeros(10,10);
|
||
|
|
];
|
||
|
|
end
|