0001 function acceleratedtriaelem = acceleratedtriaelem(varargin)
0002
0003
0004
0005
0006
0007 switch nargin
0008 case 0
0009
0010 acceleratedtriaelem.type='acceleratedtriaelem';
0011 acceleratedtriaelem.x=NaN;
0012 acceleratedtriaelem.y=NaN;
0013 acceleratedtriaelem.index=NaN;
0014 acceleratedtriaelem.thickness=NaN;
0015 acceleratedtriaelem.thickness_el=NaN;
0016 acceleratedtriaelem.bed=NaN;
0017 acceleratedtriaelem.surface=NaN;
0018 acceleratedtriaelem.nods=NaN;
0019 acceleratedtriaelem.nel=NaN;
0020 acceleratedtriaelem.B_bar=NaN;
0021 acceleratedtriaelem.glen_coeff=NaN;
0022 acceleratedtriaelem.friction_type=NaN;
0023 acceleratedtriaelem.drag=NaN;
0024 acceleratedtriaelem.p=NaN;
0025 acceleratedtriaelem.q=NaN;
0026 acceleratedtriaelem.matid=NaN;
0027 acceleratedtriaelem.meanvel=NaN;
0028 acceleratedtriaelem.epsvel=NaN;
0029 acceleratedtriaelem.index_icefront=NaN;
0030 acceleratedtriaelem.gridoniceshelf=NaN;
0031 acceleratedtriaelem.elementonicesheet=NaN;
0032
0033 acceleratedtriaelem=class(acceleratedtriaelem,'acceleratedtriaelem');
0034
0035 case 1
0036
0037 if (isa(varargin{1},'acceleratedtriaelem'))
0038 acceleratedtriaelem = varargin{1};
0039 else
0040 error('acceleratedtriaelem constructor error message: copy constructor called on a non ''acceleratedtriaelem'' class object');
0041 end
0042 otherwise
0043 error('acceleratedtriaelem constructor error message: 0 of 1 argument only in input.');
0044 end