0001 function singelem = singelem(varargin)
0002
0003
0004
0005
0006
0007 switch nargin
0008 case 0
0009
0010 singelem.type='singelem';
0011 singelem.id=NaN;
0012 singelem.matid=NaN;
0013 singelem.g=zeros(2,1);
0014 singelem.h=zeros(2,1);
0015 singelem.k=zeros(2,1);
0016 singelem=class(singelem,'singelem');
0017
0018 case 1
0019
0020 if (isa(varargin{1},'singelem'))
0021 singelem = varargin{1};
0022 else
0023 error('singelem constructor error message: copy constructor called on a non ''singelem'' class object');
0024 end
0025 otherwise
0026 error('singelem constructor error message: 0 of 1 argument only in input.');
0027 end