+
−% FROMMODEL Construct an a built in model
+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−%
+
−% FUNCTION:    fromModel
+
−%
+
−% DESCRIPTION: Construct an ltpda uder objects with history from a
+
−%              built-in model
+
−%
+
−% CALL:        a = fromModel(a, pl)
+
−%
+
−% PARAMETER:   pl: Parameter list object
+
−%
+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−
+
−function [obj, ii, fcnname] = fromModel(obj, pl)
+
−  
+
−  % Get the name of the model the user wants
+
−  model = find(pl, 'built-in');
+
−  
+
−  % Get a list of user model directories
+
−  paths = utils.models.getBuiltinModelSearchPaths();
+
−  
+
−  for jj = 1:numel(paths)
+
−    utils.helper.msg(utils.const.msg.PROC1, 'looking for models in %s', paths{jj});
+
−  end
+
−  
+
−  % Give an error if the model name is a number
+
−  if isnumeric(model)
+
−    error(['### This syntax is no more supported. Please choose a model from the list you can obtain with: ' ...
+
−    '''%s.getBuiltInModels'''], class(obj));
+
−  end
+
−  
+
−  % Give an error if the model name is empty
+
−  if isempty(model)
+
−    error(['### No model specified. Please choose one from the list you can obtain with: ' ...
+
−    '''%s.getBuiltInModels'''], class(obj));
+
−  end
+
−  
+
−  % Find the matching model
+
−  try
+
−    fcnname = sprintf('%s_model_%s', class(obj), model);
+
−    ii = obj.getInfo(class(obj), 'From Built-in Model');
+
−    [obj, pl] = feval(fcnname, pl, ii);
+
−  catch ME
+
−    if strcmp(ME.identifier, 'MATLAB:UndefinedFunction') && length(ME.stack) == 3
+
−      % If the model is missing, tell the user
+
−      error(['### Model named ''%s'' not found. Please choose one from the list you can obtain with: ' ...
+
−        '''%s.getBuiltInModels'''], model, class(obj));
+
−    else
+
−      % If the error is different, just notify the user
+
−      rethrow(ME);
+
−    end
+
−  end
+
−  
+
−end
+
−