singelem

PURPOSE ^

SINGELEM - contructor for singelem objects

SYNOPSIS ^

function singelem = singelem(varargin)

DESCRIPTION ^

SINGELEM - contructor for singelem objects

   Usage:
      singelem = singelem(varargin)

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function singelem = singelem(varargin)
0002 %SINGELEM - contructor for singelem objects
0003 %
0004 %   Usage:
0005 %      singelem = singelem(varargin)
0006 
0007 switch nargin
0008 case 0
0009     % if no input arguments, create a default object
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     %If single argument of class singelem, we have a copy constructor.
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

Generated on Sun 29-Mar-2009 20:22:55 by m2html © 2003