gen_var_cov_matrix_block_designs function

Computes varcov matrix for block designs