copy_mom in master

[rossibarra]

need change to copy_mom in master to prevent odd things when recombination breakpoints are identical (which happens with few loci or high recombination rates)

recp=unique(c(1,sort(round(runif(co, min=2, max=numloci-1))), numloci+1)) #position