11 lines
162 B
Mathematica
11 lines
162 B
Mathematica
|
function YY=FormYY(Init_L,Lul,Lz,Ly,Init_U,Luu,Lw,LxComa)
|
||
|
|
t=[
|
||
|
|
-inv(diag(Init_L))*Lul;
|
||
|
|
Lz;
|
||
|
|
-inv(diag(Init_U))*Luu;
|
||
|
|
-Lw;
|
||
|
|
LxComa;
|
||
|
|
-Ly;
|
||
|
|
];
|
||
|
|
YY=t;
|
||
|
|
end
|