dist.asd function

Allelic Sharing Distance