Found a typo in dirichlet sampler.