Calculate Sigma_ee and Sigma_uu matrices

calc_sigma(eval, D_l, X, OmegaU, OmegaE, UltVeh, Qi)

Arguments

eval	eigenvalues vector from decomposition of relatedness matrix
D_l	vector
X	design matrix
OmegaU	matrix
OmegaE	matrix
UltVeh	matrix
Qi	inverse of Q matrix