isbvqxinifile.m

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

function isf = isBVQXinifile(hfile, isvalid)
% isBVQXinifile  - perform validity check on input
%
% FORMAT:       isfile = isBVQXinifile(test [, isvalid])
%
% Input fields:
%
%       test        variable to test
%
% Output fields:
%
%       isfile      1x1 false for non-matching classes or 1xN logical,
%                   true if OK, false if no longer in memory (if isvalid)

% Version:      v0.7b
% Build:        7090311
% Date:         Sep-03 2007, 11:17 AM CEST
% Author:       Jochen Weber, Brain Innovation, B.V., Maastricht, NL
% URL / Info:   http://wiki.brainvoyager.com/BVQXtools

% basic argument check
if nargin < 1
    error( ...
        'BVQXtools:BadArgument', ...
        'Call requires at least one input argument.' ...
    );
end

% initialise output
isf = isa(hfile, 'BVQXinifile');
if ~isf || ...
    nargin < 2 || ...
   ~islogical(isvalid) || ...
    isempty(isvalid)
    return;
end
isf = false(size(hfile));

% iterate over objects
for hc = 1:numel(hfile)
    isf(hc) = BVQXinifile(hfile(hc), 'isvalid');
end