computeLinearModel(covList, m_constants)

function pooledCov = computeLinearModel(covList, m_constants)

% Linear Model Algorithm

% Johnson, R.A. & Wichern, D.W. Applied Multivariate Statistical Analysis,
% Prentice -Hall

pooledCov = zeros(m_constants.numVar);
for i = 1:m_constants.numGrp 
    pooledCov = pooledCov + (m_constants.numElemPerGrp(i) - 1) * covList{i};
end

pooledCov = pooledCov / (sum(m_constants.numElemPerGrp) - m_constants.numGrp);