quickHaplo function

Quick founder haplotype simulation