Demonstration of Haplotype Block Detection Using Pattern Discovery