通信天线建模与MATLAB仿真分析原书配套光盘

这个这本书的配套光盘，里面的矩量法的matlab代码超级好用，矩量法学习的极佳的资源

function [Z]=       impmet（ EdgesTotalTrianglesTotal...
                            EdgeLengthK...
                            CenterCenter_...
                            TrianglePlusTriangleMinus...
                            RHO_PRHO_M...
                            RHO__PlusRHO__Minus...
                            FactorAFactorFi）;   
%IMPMET Standard impedance matrix （metal surface）
%
%	Returns the complex impedance matrix [EdgesTotal x EdgesTotal]
%	Uses 9 integration points for every triangle 
%   （barycentric subdivision）
%
%   The impedance matrix is calculated as a sum of the contributions
%   due to separate triangles （similar to the “face-pair“ method）. 
%   See Appendix B for a detailed algorithm.
% 
%   A 9-point quadrature is used for all integrals including 
%   the self-coupling terms. The alternative source code with 
%   the analytical approximation of the self-coupling terms 
%   is given in Appendix B. The difference between two methods 
%   is not significant. 
%
%   Copyright 2002 AEMM. Revision 2002/03/12 
%   Chapter 2

%Memory allocation
Z   =zeros  （EdgesTotalEdgesTotal）+j*zeros（EdgesTotalEdgesTotal）;

%Loop over integration triangles
for p=1:TrianglesTotal
    
    Plus     =find（TrianglePlus-p==0）;
    Minus    =find（TriangleMinus-p==0）;
    
    D=Center_-repmat（Center（:p）[1 9 TrianglesTotal]）; %[3 9 TrianglesTotal]     
    
    R=sqrt（sum（D.*D）） ;                             %[1 9 TrianglesTotal]
    g=exp（-K*R）./R     ;                            %[1 9 TrianglesTotal]
       
    gP=g（::TrianglePlus）;                         %[1 9 EdgesTotal]
    gM=g（::TriangleMinus）;                       %[1 9 EdgesTotal]
        
    Fi=sum（gP）-sum（gM）;                             %[1 1 EdgesTotal]
    ZF= FactorFi.*reshape（FiEdgesTotal1） ;        %[EdgesTotal 1]
        
    for k=1:length（Plus）
        n=Plus（k）;
        RP=repmat（RHO__Plus（::n）[1 1 EdgesTotal]）;         %[3 9 EdgesTotal]
        A=sum（gP.*sum（RP.*RHO_P））+sum（gM.*sum（RP.*RHO_M））;
        Z1= FactorA.*reshape（AEdgesTotal1）;    
        Z（:n）=Z（:n）+EdgeLength（n）*（Z1+ZF）;
    end
    for k=1:length（Minus）
        n=Minus（k）;
        RP=repmat（RHO__Minus（::n）[1 1 EdgesTotal]）;        %[3 9 EdgesTotal]
        A=sum（gP.*sum（RP.*RHO_P））+sum（gM.*sum（RP.*RHO_M））;
        Z1= FactorA.*reshape（AEdgesTotal1）;    
        Z（:n）=Z（:n）+EdgeLength（n）*（Z1-ZF）; 
    end
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2605  2009-12-07 20:59  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\current.mat

     文件     134998  2009-12-07 20:59  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\impedance.mat

     文件       2487  2009-12-07 20:57  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\impmet.m

     文件       2488  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\matlabcompiler\impmet.m

     文件      21139  2009-11-18 23:23  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\matlabcompiler\rwg3.ctf

     文件      10416  2009-11-18 23:23  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\matlabcompiler\rwg3.exe

     文件       1703  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\matlabcompiler\rwg3.m

     文件       2966  2009-11-18 23:23  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\matlabcompiler\rwg3_main.c

     文件      10641  2009-11-18 23:23  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\matlabcompiler\rwg3_mcc_component_data.c

     文件       2080  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\bowtie.m

     文件       5512  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\bowtie.mat

     文件       1389  2009-11-17 23:02  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\dipole.m

     文件       2352  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\dipole.mat

     文件        662  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\plate.m

     文件       2696  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\plate.mat

     文件       2696  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\platecoarse.mat

     文件      11272  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\platefine.mat

     文件       1513  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\slot.m

     文件      18072  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\slot.mat

     文件        521  2009-11-18 00:12  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh\viewer.m

     文件       2931  2009-12-07 20:54  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh1.mat

     文件      19148  2009-12-07 20:55  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\mesh2.mat

     文件       3079  2009-11-20 16:09  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\rwg1.m

     文件       3451  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\rwg2.m

     文件       1684  2009-12-07 20:56  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\rwg3.m

     文件       1682  2009-11-18 00:18  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\rwg4.m

     文件       1125  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\rwg5.m

     文件       1964  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter02\chapter02\rwg6.m

     文件       3040  2002-04-17 23:07  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter03\chapter03\current.mat

     文件       1759  2009-11-26 23:05  通信天线建模与MATLAB仿真分析（原书配套光盘）\chapter03\chapter03\efield1.m

............此处省略265个文件信息