wip m1_Vbeta_inv_Sigmabeta_j_draw function