Changeset 17768
- Timestamp:
- 04/18/14 09:47:26 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/m/classes/damage.m
r17757 r17768 7 7 properties (SetAccess=public) 8 8 %damage 9 isdamage = NaN; 9 10 D = NaN; 10 11 law = ''; … … 100 101 101 102 %damage parameters: 103 obj.isdamage=false; 102 104 obj.D=0; 103 105 obj.law='undamaged'; … … 138 140 function md = checkconsistency(obj,md,solution,analyses) % {{{ 139 141 140 md = checkfield(md,'fieldname','damage.law','values',{'undamaged','pralong'}); 141 if ~strcmpi(obj.law,'undamaged'), 142 md = checkfield(md,'fieldname','damage.isdamage','values',[1,0]); 143 if obj.isdamage, 144 md = checkfield(md,'fieldname','damage.law','values',{'undamaged','pralong'}); 142 145 md = checkfield(md,'fieldname','damage.D','>=',0,'<=',obj.max_damage,'size',[md.mesh.numberofvertices 1]); 146 md = checkfield(md,'fieldname','damage.spcdamage','forcing',1); 143 147 md = checkfield(md,'fieldname','damage.max_damage','<',1,'>=',0); 144 md = checkfield(md,'fieldname','damage.spcdamage','forcing',1);145 148 146 149 md = checkfield(md,'fieldname','damage.stabilization','numel',[1],'values',[0 1 2]); … … 181 184 disp(sprintf(' Damage:\n')); 182 185 183 fielddisplay(obj,'law','damage law (string) from {''undamaged'',''pralong''}'); 184 if ~strcmpi(obj.law,'undamaged'), 186 fielddisplay(obj,'isdamage','is damage mechanics being used? {true,false}'); 187 if obj.isdamage, 188 fielddisplay(obj,'law','damage law (string) from {''undamaged'',''pralong''}'); 185 189 fielddisplay(obj,'D','damage tensor (scalar)'); 186 190 fielddisplay(obj,'spcdamage','damage constraints (NaN means no constraint)'); … … 209 213 function marshall(obj,md,fid) % {{{ 210 214 211 WriteData(fid,'object',obj,'fieldname','law','format','String'); 212 if ~strcmpi(obj.law,'undamaged'), 215 WriteData(fid,'object',obj,'fieldname','isdamage','format','Boolean'); 216 if obj.isdamage, 217 WriteData(fid,'object',obj,'fieldname','law','format','String'); 213 218 WriteData(fid,'object',obj,'fieldname','D','format','DoubleMat','mattype',1); 214 219 WriteData(fid,'object',obj,'fieldname','spcdamage','format','DoubleMat','mattype',1,'forcinglength',md.mesh.numberofvertices+1);
Note:
See TracChangeset
for help on using the changeset viewer.