gusucode.com > matlab编程遗传算法计算匹配电路源码程序 > code1/code/MATLAB源代码/matlab_match/ABCD_6_1.m

    function [ A, B, C, D ] = ABCD_6_1(  )
%UNTITLED 此处显示有关此函数的摘要
%   33.4-37.2MHz
S11=[0.049+1i*0.208 ;0.114+1i*0.166 ;0.152+1i*0.102 ;0.154+1i*0.035 ;0.130-1i*0.012 ;0.099-1i*0.034 ;0.075-1i*0.038 ;0.066-1i*0.035 ;0.068-1i*0.036 ;0.074-1i*0.045 ;0.077-1i*0.063 ;0.074-1i*0.088 ;0.059-1i*0.113 ;0.036-1i*0.135 ;0.005-1i*0.150 ;-0.031-1i*0.155 ;-0.068-1i*0.150 ;-0.101-1i*0.133 ;-0.129-1i*0.109 ;-0.148-1i*0.078 ;-0.158-1i*0.044 ;-0.159-1i*0.010 ;-0.150+1i*0.022 ;-0.135+1i*0.050 ;-0.113+1i*0.071 ;-0.088+1i*0.086 ;-0.061+1i*0.093 ;-0.036+1i*0.093 ;-0.012+1i*0.086 ;0.008+1i*0.074 ;0.023+1i*0.058 ;0.032+1i*0.040 ;0.036+1i*0.021 ;0.035+1i*0.003 ;0.029-1i*0.012 ;0.019-1i*0.024 ;0.008-1i*0.032 ;-0.005-1i*0.035 ;-0.016-1i*0.035 ;-0.025-1i*0.031 ;-0.031-1i*0.025 ;-0.034-1i*0.018 ;-0.032-1i*0.012 ;-0.028-1i*0.009 ;-0.022-1i*0.010 ;-0.016-1i*0.016 ;-0.013-1i*0.027 ;-0.017-1i*0.042 ;-0.029-1i*0.058 ;-0.051-1i*0.071 ;-0.083-1i*0.076 ;-0.121-1i*0.066 ;-0.159-1i*0.038 ;-0.188+1i*0.011 ;-0.196+1i*0.077 ;-0.172+1i*0.147 ;-0.115+1i*0.206 ;-0.034+1i*0.234 ;0.052+1i*0.225 ];

S12=[-0.167-1i*0.459 ;-0.410-1i*0.443 ;-0.619-1i*0.285 ;-0.731-1i*0.052 ;-0.742+1i*0.196 ;-0.669+1i*0.424 ;-0.534+1i*0.608 ;-0.360+1i*0.737 ;-0.166+1i*0.812 ;0.033+1i*0.834 ;0.225+1i*0.809 ;0.400+1i*0.742 ;0.551+1i*0.641 ;0.673+1i*0.514 ;0.765+1i*0.368 ;0.823+1i*0.211 ;0.849+1i*0.048 ;0.844-1i*0.113 ;0.810-1i*0.267 ;0.748-1i*0.411 ;0.663-1i*0.539 ;0.558-1i*0.650 ;0.436-1i*0.739 ;0.302-1i*0.806 ;0.158-1i*0.848 ;0.010-1i*0.865 ;-0.139-1i*0.856 ;-0.283-1i*0.822 ;-0.420-1i*0.764 ;-0.545-1i*0.682 ;-0.654-1i*0.581 ;-0.744-1i*0.462 ;-0.812-1i*0.330 ;-0.857-1i*0.187 ;-0.877-1i*0.038 ;-0.871+1i*0.112 ;-0.839+1i*0.259 ;-0.781+1i*0.399 ;-0.700+1i*0.527 ;-0.597+1i*0.640 ;-0.475+1i*0.734 ;-0.338+1i*0.805 ;-0.188+1i*0.852 ;-0.030+1i*0.870 ;0.130+1i*0.859 ;0.289+1i*0.817 ;0.438+1i*0.744 ;0.573+1i*0.641 ;0.686+1i*0.509 ;0.771+1i*0.353 ;0.820+1i*0.179 ;0.829-1i*0.006 ;0.791-1i*0.193 ;0.705-1i*0.369 ;0.573-1i*0.520 ;0.398-1i*0.629 ;0.192-1i*0.679 ;-0.026-1i*0.648 ;-0.201-1i*0.528 ];

S21=[-0.166-1i*0.459 ;-0.411-1i*0.443 ;-0.619-1i*0.285 ;-0.731-1i*0.052 ;-0.743+1i*0.196 ;-0.670+1i*0.424 ;-0.535+1i*0.608 ;-0.361+1i*0.738 ;-0.166+1i*0.813 ;0.033+1i*0.835 ;0.225+1i*0.810 ;0.400+1i*0.743 ;0.551+1i*0.642 ;0.674+1i*0.515 ;0.765+1i*0.369 ;0.824+1i*0.211 ;0.850+1i*0.049 ;0.845-1i*0.113 ;0.810-1i*0.267 ;0.749-1i*0.411 ;0.664-1i*0.540 ;0.559-1i*0.650 ;0.437-1i*0.740 ;0.302-1i*0.807 ;0.158-1i*0.849 ;0.010-1i*0.866 ;-0.138-1i*0.857 ;-0.283-1i*0.822 ;-0.420-1i*0.764 ;-0.545-1i*0.683 ;-0.654-1i*0.581 ;-0.745-1i*0.463 ;-0.813-1i*0.330 ;-0.858-1i*0.187 ;-0.877-1i*0.039 ;-0.871+1i*0.112 ;-0.839+1i*0.259 ;-0.782+1i*0.399 ;-0.701+1i*0.527 ;-0.598+1i*0.640 ;-0.476+1i*0.734 ;-0.338+1i*0.806 ;-0.188+1i*0.852 ;-0.030+1i*0.871 ;0.130+1i*0.859 ;0.289+1i*0.818 ;0.438+1i*0.745 ;0.573+1i*0.641 ;0.687+1i*0.510 ;0.771+1i*0.354 ;0.821+1i*0.179 ;0.829-1i*0.006 ;0.792-1i*0.194 ;0.706-1i*0.369 ;0.573-1i*0.520 ;0.399-1i*0.629 ;0.192-1i*0.680 ;-0.026-1i*0.648 ;-0.202-1i*0.528 ];

S22=[-0.146+1i*0.127 ;-0.054-1i*0.031 ;-0.104-1i*0.082 ;-0.130-1i*0.051 ;-0.112-1i*0.009 ;-0.073+1i*0.017 ;-0.032+1i*0.025 ;0.004+1i*0.023 ;0.033+1i*0.013 ;0.057-1i*9.710E-4 ;0.076-1i*0.017 ;0.092-1i*0.035 ;0.102-1i*0.053 ;0.108-1i*0.074 ;0.110-1i*0.096 ;0.106-1i*0.117 ;0.096-1i*0.138 ;0.081-1i*0.155 ;0.062-1i*0.169 ;0.040-1i*0.178 ;0.016-1i*0.181 ;-0.009-1i*0.179 ;-0.032-1i*0.172 ;-0.053-1i*0.159 ;-0.070-1i*0.142 ;-0.083-1i*0.123 ;-0.091-1i*0.102 ;-0.094-1i*0.081 ;-0.092-1i*0.061 ;-0.086-1i*0.044 ;-0.077-1i*0.030 ;-0.066-1i*0.019 ;-0.055-1i*0.014 ;-0.044-1i*0.011 ;-0.034-1i*0.012 ;-0.027-1i*0.015 ;-0.022-1i*0.018 ;-0.020-1i*0.022 ;-0.020-1i*0.025 ;-0.020-1i*0.027 ;-0.022-1i*0.026 ;-0.022-1i*0.024 ;-0.020-1i*0.020 ;-0.016-1i*0.015 ;-0.007-1i*0.011 ;0.005-1i*0.009 ;0.021-1i*0.008 ;0.040-1i*0.014 ;0.061-1i*0.028 ;0.080-1i*0.049 ;0.095-1i*0.078 ;0.102-1i*0.114 ;0.098-1i*0.156 ;0.077-1i*0.197 ;0.036-1i*0.226 ;-0.020-1i*0.227 ;-0.069-1i*0.177 ;-0.015-1i*0.093 ;0.144-1i*0.011 ];

A=((1+S11).*(1-S22)+S12.*S21)./(2.*S21);
B=50.*((1+S11).*(1+S22)-S12.*S21)./(2.*S21);
C=((1-S11).*(1-S22)-S12.*S21)./(2.*S21.*50);
D=((1-S11).*(1+S22)+S12.*S21)./(2.*S21);
end