DoErrors function

Fortran Simulate Genotyping Errors