www.gusucode.com > mbc 工具箱 matlab 源码程序 > mbc/@mbcfoundation/@DCTManager/isParpoolOpen.m

    function ret= isParpoolOpen(varargin)
%isParpoolOpen check whether parpool is open
%    OK= mbcfoundation.DCTManager.isParpoolOpen()

%   Copyright 2010-2013 The MathWorks, Inc.

try
    % check DCT is available
    ret = mbcfoundation.DCTManager.isDCTAvailable ...
        && ~isempty(gcp(varargin{:}));
    if ret
        % if dct is available
        p = parcluster;
        % check it is a windows OS
        ret = strcmp(p.OperatingSystem,'windows'); 
    end
catch
    ret = false;
end