Changeset 11388
- Timestamp:
- 02/10/12 07:21:59 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/m/classes/solver.m
r11219 r11388 6 6 classdef solver 7 7 properties (SetAccess=public) 8 options= {NoneAnalysisEnum,mumpsoptions};8 options=cell(0,0); 9 9 end 10 10 methods … … 26 26 function obj = setdefaultparameters(obj) % {{{ 27 27 28 %MUMPS is the default solver 29 obj.options={'NoneAnalysis',mumpsoptions}; 30 28 31 end % }}} 29 function obj=addoptions(obj,analysis,solveroptions) % {{{1 32 function obj = addoptions(obj,analysis,solveroptions) % {{{1 33 34 %Convert analysis from enum to string 35 analysis=EnumToString(analysis); 36 30 37 %first, find out if analysis has already been supplied 31 38 found=false; 32 39 for i=1:size(obj.options,1), 33 40 inanalysis=obj.options{i,1}; 34 if inanalysis==analysis,41 if strcmp(inanalysis,analysis), 35 42 found=true; 36 obj.options{i,1} =analysis;37 obj.options{i,2} =solveroptions;43 obj.options{i,1} = analysis; 44 obj.options{i,2} = solveroptions; 38 45 break; 39 46 end 40 47 end 48 41 49 if ~found, 42 obj.options{end+1,1}= analysis;43 obj.options{end,2} =solveroptions;50 obj.options{end+1,1}= analysis; 51 obj.options{end,2} = solveroptions; 44 52 end 45 53 end … … 70 78 71 79 %first write analysis: 72 fprintf(fid,'\n+%s\n', EnumToString(analysis)); %append a + to recognize it's an analysis enum80 fprintf(fid,'\n+%s\n',analysis); %append a + to recognize it's an analysis enum 73 81 74 82 %now, write options … … 126 134 end 127 135 128 disp(sprintf(' %s -> ''%s''', EnumToString(analysis),string));136 disp(sprintf(' %s -> ''%s''',analysis,string)); 129 137 end 130 138 end
Note:
See TracChangeset
for help on using the changeset viewer.