source: issm/trunk/src/m/model/process_solve_options.m@ 8577

Last change on this file since 8577 was 8577, checked in by Mathieu Morlighem, 14 years ago

try and use feature('GetPid') instead of our own mex GetPId

File size: 2.2 KB
Line 
1function outoptions=process_solve_options(options)
2%DEFAULT_SOLVE_OPTIONS - set up default options for solve phase
3%
4% Usage:
5% options=process_solve_options(options)
6%
7% See also: SOLVE
8
9%solution_type: check on this option, error out otherwise
10solution_type=getfieldvalue(options,'solution_type');
11if ischar(solution_type), error(['only Enums are supported as ''solution_type''. For example: md=solve(md,''solution_type'',DiagnosticSolutionEnum); ']); end
12if ~ismember(solution_type,[DiagnosticSolutionEnum,PrognosticSolutionEnum,ThermalSolutionEnum,...
13 SteadystateSolutionEnum,ParametersSolutionEnum,TransientSolutionEnum,EnthalpySolutionEnum,...
14 BalancethicknessSolutionEnum,BalancevelocitiesSolutionEnum,BedSlopeSolutionEnum,SurfaceSlopeSolutionEnum,GroundingLineMigration2DSolutionEnum,HydrologySolutionEnum,FlaimSolutionEnum]),
15 error(['process_solve_options error message: solution_type ' EnumToString(solution_type) ' not supported yet!']);
16end
17outoptions.solution_type=solution_type;
18
19outoptions.upload=getfieldvalue(options,'upload','off');
20outoptions.batch=getfieldvalue(options,'batch','no');
21outoptions.directory=getfieldvalue(options,'directory','');
22
23% process qmu arguments
24outoptions.qmudir=getfieldvalue(options,'qmudir',['qmu' num2str(feature('GetPid'))]); % qmudir =['qmu_' datestr(now,'yyyymmdd_HHMMSS')];
25outoptions.qmufile=getfieldvalue(options,'qmufile','qmu');% qmufile cannot be changed unless ????script.sh is also changed
26outoptions.overwrite=getfieldvalue(options,'overwrite','n');
27outoptions.keep=getfieldvalue(options,'keep','n');
28outoptions.ivar=getfieldvalue(options,'ivar',1);
29outoptions.iresp=getfieldvalue(options,'iresp',1);
30outoptions.imethod=getfieldvalue(options,'imethod',1);
31outoptions.iparams=getfieldvalue(options,'iparams',1);
32outoptions.runmpi=getfieldvalue(options,'runmpi',false);
33
34% process flaim arguments
35outoptions.fmdir=getfieldvalue(options,'fmdir',['fm' num2str(feature('GetPid'))]);
36outoptions.fmfile=getfieldvalue(options,'fmfile','fm_targets');
37outoptions.overwrite=getfieldvalue(options,'overwrite','n');
38outoptions.keep=getfieldvalue(options,'keep','y');
39outoptions.latsgn=getfieldvalue(options,'latsgn',0);
40outoptions.cmap=getfieldvalue(options,'cmap',[]);
Note: See TracBrowser for help on using the repository browser.