end.m

来自「toolbox of BVQX, This is the access betw」· M 代码 · 共 46 行

function es = end(A,K,N)
% transio::end  - overloaded method

% Version:  v0.7b
% Build:    7082923
% Date:     Aug-29 2007, 11:25 PM CEST
% Author:   Jochen Weber, Brain Innovation, B.V., Maastricht, NL
% URL/Info: http://wiki.brainvoyager.com/BVQXtools

% check arguments
if nargin < 3
    error( ...
        'transio:TooFewArguments', ...
        'Too few arguments for end.' ...
    );
end

% get size
csz = A.DataDims;
csl = length(csz);

% check N
if  N ~= 1 && ...
    N ~= csl
    error( ...
        'transio:BadArgument', ...
        'Invalid end call.' ...
    );
end

% for N := 1
if N == 1
    es = prod(csz);
    
% otherwise go index
else
    if  K < 1 || ...
        K > N
        error( ...
            'transio:BadArgument', ...
            'Invalid end call.' ...
        );
    end
    es = csz(K);
end