%《MATLAB在電子信息課程中的應用》第五章例5.13程序q513
% 交流電路的穩態計算：利用模值求解
% 電子工業出版社出版  陳懷琛 吳大正 高西全合著  2001年10月

clear
IR=10;Xc=10;R=20;				% 設定元件值
U1m=200;U2m=200;			% 設定已知變量
YL(1)=U1m/U2m/Xc+sqrt((U1m/U2m/Xc)^2-(1/R)^2);
YL(2)=U1m/U2m/Xc-sqrt((U1m/U2m/Xc)^2-(1/R)^2)
XL=1./YL