vi.dist function

Port of the vi.dist function from the mcclust package which is no longer maintained.