function res = check2dgauss(fname)% CHECK2DGAUSS Checks if given file containes bivariate Gaussians.%% Synopsis:%  res = check2dgauss(fname)%% Description:%  If the file 'fname' contains a matrix Mean [2 x ncomp],%  a matrix Cov [2 x 2 x ncomp] and a vector y [1 x ncomp]%  then it returns 1 else it returns  0.%% Input:%  fname [string] File name.% % Output:%  res [1x1] Equals to 1 if it is valid file otherwise 0.%% About: Statistical Pattern Recognition Toolbox                                % (C) 1999-2003, Written by Vojtech Franc and Vaclav Hlavac                     % <a href="http://www.cvut.cz">Czech Technical University Prague</a>            % <a href="http://www.feld.cvut.cz">Faculty of Electrical Engineering</a>       % <a href="http://cmp.felk.cvut.cz">Center for Machine Perception</a>                                                                                           % Modifications: % 1-may-2004, VF% 13-Feb-2003, VF  data=load( fname);if ~isfield( data, 'Mean'), res=0; return; endif ~isfield( data, 'Cov'), res=0; return; endif ~isfield( data, 'y'), res=0; return; endif size(data.Mean,1) ~= 2, res=0; return; endif size(data.Cov,1) ~= 2, res=0; return; endif size(data.Cov,2) ~= 2, res=0; return; endif size(data.Cov,3) ~= size(data.Mean,2), res=0; return; endif size(data.y,2) ~= size(data.Mean,2), res=0; return; endres=1;return;