modChromsomePackages :: ([ChromosomeType] -> [ChromosomeType]) -> PackingSelectors -> PackingSelectors
modChromsomePackages f (orientationCs, fillCs, selectCs) = (f orientationCs, f fillCs, f selectCs)
modChromsomePackages :: ([ChromosomeType] -> [ChromosomeType]) -> PackingSelectors -> PackingSelectors
modChromsomePackages f (orientationCs, fillCs, selectCs) = (f orientationCs, f fillCs, f selectCs)
modChromsomePackages f (orientationCs, fillCs, selectCs) = (f orientationCs, f fillCs, f selectCs)