genoprob_to_patternprob function

Collapse genoprob according to pattern