function check_coverage(dataset, population_groups):

   for group in population_groups:
      share_in_data = count(dataset, group) / length(dataset)
      share_in_population = population_groups[group]
      if abs(share_in_data - share_in_population) > threshold:
        report an unsupported case # this group is over- or under-represen
 ted
