%《MATLAB在電子信息課程中的應用》第五章例5.18程序q518
% 網絡參數變換
% 電子工業出版社出版  陳懷琛 吳大正 高西全合著  2001年10月

% 1. 網絡參數變換
format long
r=100; L=0.02; C=0.01;w=300;
z1=r; z2 =j*w*L; z3=1/(j*w*C);
Z(1,1) =z1+z2; Z(1,2)=z2; Z(2,1)=z2; Z(2,2)=z2+z3;
Y=inv(Z), 
H=[det(Z), Z(1,2); -Z(2,1),1] / Z(2,2),

% 以下的公式不是為了直接執行,而是為讀者復制和粘貼之用.   
%（1） Z=inv(Y); Y=inv(Z); B=inv(A); A=inv(B); H=inv(G); G=inv(H);
% 這三組關系是可從它們的定義得到的。
%（2） 由Z求A或H
%	A=[Z(1,1), det(Z); 1, Z(2,2)] / Z(2,1); 
%  H=[det(Z), Z(1,2); -Z(2,1),1] / Z(2,2); 
%（3） 由A求Z或H 
%	Z=[A(1,1), det(A); 1, A(2,2)] / A(2,1); 
%	H=[A(1,2), det(A); -1, A(2,1)] / A(2,2); 
%（4） 由H求A或Z 
%	Z=[det(H), H(1,2); -H(2,1),1] / H(2,2);
%	A=-[det(H), H(1,1); H(2,1),1] / H(2,1);
%有了這三類關系，這六種參數中任何兩者之間就都能變換了。例如已知Y陣，要求G陣，
%可用Z=inv(Y); G=inv([det(Z), Z(1,2); -Z(2,1),1] / Z(2,2)) 兩個語句求得。
%
% 2． 關于網絡的實驗參數公式
% 以下各式中，ZL=1/YL 為負載阻抗，ZS=1/YS為輸入端信號源阻抗：
% (1)輸入阻抗（負載端接ZL，即有U2=-ZL*I2）
%	Zin=U1/I1=(A(1,1)*ZL+A(1,2))/(A(2,1)*ZL+A(2,2));
% (2)輸出阻抗（輸入端接ZS，即有U1=-ZS*I1）
%	Zout=U2/I2=(A(2,2)*ZS+A(1,2))/(A(2,1)*ZS+A(1,1));
%	電壓比（負載端接ZL)
% Au=U2/U1=Z(2,1)*ZL/(det(Z)+Z(1,1)*ZL)=ZL/(A(1,1)*ZL+A(1,2));
%	電流比（負載端接ZL)
% Ai=I2/I1=-Z(2,1))/(Z(2,2)+ZL)=-1/(A(2,1)*ZL+A(2,2));
%	轉移阻抗（負載端接ZL)
% ZT=U2/I1=Z(2,1)*ZL/(Z(2,2)+ZL)=ZL/(A(2,1)*ZL+A(2,2));
%	轉移導納（負載端接ZL)
% YT=I2/U1=-Z(2,1)/(det(Z)+Z(1,1)*ZL)=-1/(A(1,1)*ZL+A(1,2));
%