sig
  val reproduce :
    'Ga_types.population -> int list -> int list * 'Ga_types.population
end