openEMS/matlab/CreateNF2FFBox.m

71 lines
2.4 KiB
Matlab

function [CSX nf2ff] = CreateNF2FFBox(CSX, name, start, stop, varargin)
% function [CSX nf2ff] = CreateNF2FFBox(CSX, name, start, stop, varargin)
%
% create the dump boxes needed for the near field to far field transformation
%
% input:
% name: name of this nf2ff box
% start/stop: start/stop coordinates for the nf2ff box (this box has to
% enclose all radiating structures!)
% optional inputs:
% 'Directions': enable/disable specific directions, e.g.
% 'Directions',[1 1 0 0 1 1]
% -> disable nf2ff in +/-y direction
%
% example:
% see Tutorials/Simple_Patch_Antenna.m
%
% See also AnalyzeNF2FF
%
% (C) 2010 Sebastian Held <sebastian.held@gmx.de>
% (C) 2010-2012 Thorsten Liebig <thorsten.liebig@gmx.de>
if (nargin<5)
directions = ones(6,1);
end
directions = ones(6,1);
add_args = {};
dump_type = 0;
for n=1:numel(varargin)/2
if strcmp(varargin{2*n-1},'Frequency')
add_args = {'Frequency', varargin{2*n}};
dump_type = 10;
end
if strcmp(varargin{2*n-1},'Directions')
directions=varargin{2*n};
end
end
nf2ff.name = name;
nf2ff.filenames_E = {[name '_E_xn'],[name '_E_xp'],[name '_E_yn'],[name '_E_yp'],[name '_E_zn'],[name '_E_zp']};
nf2ff.filenames_H = {[name '_H_xn'],[name '_H_xp'],[name '_H_yn'],[name '_H_yp'],[name '_H_zn'],[name '_H_zp']};
nf2ff.directions = directions;
for nd = 1:3
pos = 2*nd-1;
if (directions(pos))
l_start = start;
l_stop = stop;
l_stop(nd) = start(nd);
CSX = AddBox( AddDump(CSX,nf2ff.filenames_E{pos},'DumpType',dump_type,'DumpMode',2,'FileType',1,add_args{:}), nf2ff.filenames_E{pos}, 0, l_start, l_stop );
CSX = AddBox( AddDump(CSX,nf2ff.filenames_H{pos},'DumpType',dump_type+1,'DumpMode',2,'FileType',1,add_args{:}), nf2ff.filenames_H{pos}, 0, l_start, l_stop );
else
nf2ff.filenames_E{pos}='';
nf2ff.filenames_H{pos}='';
end
pos = 2*nd;
if (directions(pos))
l_start = start;
l_stop = stop;
l_start(nd) = stop(nd);
CSX = AddBox( AddDump(CSX,nf2ff.filenames_E{pos},'DumpType',dump_type,'DumpMode',2,'FileType',1,add_args{:}), nf2ff.filenames_E{pos}, 0, l_start, l_stop );
CSX = AddBox( AddDump(CSX,nf2ff.filenames_H{pos},'DumpType',dump_type+1,'DumpMode',2,'FileType',1,add_args{:}), nf2ff.filenames_H{pos}, 0, l_start, l_stop );
else
nf2ff.filenames_E{pos}='';
nf2ff.filenames_H{pos}='';
end
end