1 files changed, 40 insertions, 0 deletions
diff --git a/hyp2mat/matlab/AddHyperLynxMetal2D.m b/hyp2mat/matlab/AddHyperLynxMetal2D.m
new file mode 100644
index 0000000..d0d908a
--- /dev/null
+++ b/hyp2mat/matlab/AddHyperLynxMetal2D.m
@@ -0,0 +1,40 @@
+function CSX = AddHyperLynxMetal2D(CSX, name, resistivity, thickness)
+% function CSX = AddHyperLynxMetal2D(CSX, name, resistivity, thickness)
+%
+% Add a metal as a 2D conducting sheet to a CSX model imported from HyperLynx.
+% 
+% arguments:
+%   name:         material name.
+%   resistivity:  metal resistivity
+%   thickness:    thickness of the metal layer, in m.
+% 
+% See also AddMaterial, AddDebyeMaterial, AddLorentzMaterial
+%
+
+% Copyright 2014 Koen De Vleeschauwer.
+%
+% This file is part of hyp2mat.
+%
+% This program is free software: you can redistribute it and/or modify
+% it under the terms of the GNU General Public License as published by
+% the Free Software Foundation, either version 3 of the License, or
+% (at your option) any later version.
+%
+% This program is distributed in the hope that it will be useful,
+% but WITHOUT ANY WARRANTY; without even the implied warranty of
+% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+% GNU General Public License for more details.
+%
+% You should have received a copy of the GNU General Public License
+% along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+% Copy this script to your project directory to customize. 
+
+if (resistivity > 0.0)
+  conductivity = 1.0 / resistivity;
+  CSX = AddConductingSheet(CSX, name, conductivity, thickness); % lossy conductor
+else
+  CSX = AddMetal(CSX, name); % perfect conductor
+end
+
+% not truncated