+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−%
+
−% DESCRIPTION: Builtin model for B
+
−%
+
−% This model builds an AO with a number in it.
+
−%
+
−%
+
−% CALL:
+
−%           p = ao(plist('built-in','b'))
+
−%
+
−% INPUTS:
+
−%
+
−%
+
−%
+
−% OUTPUTS:
+
−%           - p: an AO object representing a
+
−%
+
−%
+
−% VERSIONS:
+
−%        'alpha' = Reason: this version returns an AO with value 1
+
−%                     Who: Martin
+
−%                    When: 06-09-10
+
−%         'beta' = Reason: this version returns an AO with value 2
+
−%                     Who: Martin
+
−%                    When: 06-09-10
+
−%
+
−%
+
−% REFERENCES:
+
−%
+
−%
+
−% VERSION:     $Id: ao_model_b.m,v 1.3 2010/09/15 10:30:04 hewitson Exp $
+
−%
+
−% HISTORY:
+
−%
+
−%
+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−function varargout = ao_model_b(varargin)
+
−  
+
−  % Process inputs
+
−  [info, pl, constructorInfo, fcn] = utils.models.processModelInputs(varargin(:), mfilename, @getModelDescription, @getModelDocumentation, @getVersion, @versionTable);
+
−  if ~isempty(info)
+
−    varargout{1} = info;
+
−    return;
+
−  end
+
−  
+
−  % Build the object
+
−  out = fcn();
+
−  
+
−  % Set the method version string in the minfo object
+
−  if ~isempty(constructorInfo)
+
−    % If this is a user-call via a constructor, then we add history
+
−    out = addHistoryStep(out, constructorInfo, pl);
+
−  end
+
−  
+
−  if nargout > 0
+
−    varargout{1} = out;
+
−    varargout{2} = pl;
+
−  else
+
−    error('!!! Invalid number of output')
+
−  end
+
−end
+
−
+
−%--------------------------------------------------------------------------
+
−% AUTHORS EDIT THIS PART
+
−%--------------------------------------------------------------------------
+
−
+
−function desc = getModelDescription
+
−  desc = 'A model which builds a single value AO.';
+
−end
+
−
+
−function doc = getModelDocumentation
+
−  doc = '';
+
−end
+
−
+
−function vt = versionTable()
+
−  
+
−  vt = {'alpha', @versionAlpha, ...
+
−    'beta', @versionBeta};
+
−  
+
−end
+
−
+
−% This version uses:
+
−%  model b, version 'alpha'
+
−%  model c, version 'initial'
+
−%
+
−function varargout = versionAlpha(varargin)
+
−  
+
−  if nargin == 1 && ischar(varargin{1})
+
−    switch varargin{1}
+
−      case 'plist'
+
−        varargout{1} = plist('a', 1, 'b', 2, 'c', 3);
+
−      case 'description'
+
−        varargout{1} = 'returns an AO with value 1';
+
−      case 'info'
+
−        varargout{1} = [];
+
−      otherwise
+
−        error('unknown inputs');
+
−    end
+
−    return;
+
−  end
+
−  
+
−  % build model  
+
−  varargout{1} = ao(1);
+
−  
+
−end
+
−
+
−% This version uses:
+
−%  model b, version 'alpha'
+
−%  model c, version 'second'
+
−%
+
−function varargout = versionBeta(varargin)
+
−  
+
−  if nargin == 1 && ischar(varargin{1})
+
−    switch varargin{1}
+
−      case 'plist'
+
−        varargout{1} = plist('a', 1);
+
−      case 'description'
+
−        varargout{1} = 'returns an AO with value 2';
+
−      case 'info'
+
−        varargout{1} = [];
+
−      otherwise
+
−        error('unknown inputs');
+
−    end
+
−    return;
+
−  end
+
−  
+
−  % build model
+
−  varargout{1} = ao(2);
+
−end
+
−
+
−%--------------------------------------------------------------------------
+
−% AUTHORS SHOULD NOT NEED TO EDIT BELOW HERE
+
−%--------------------------------------------------------------------------
+
−
+
−
+
−%--------------------------------------------------------------------------
+
−% Get Version
+
−%--------------------------------------------------------------------------
+
−function v = getVersion
+
−  
+
−  v = '$Id: ao_model_b.m,v 1.3 2010/09/15 10:30:04 hewitson Exp $';
+
−  
+
−end
+
−