suffixTableName :: TablePopulationMode -> Text -> TableName -> TableName
suffixTableName popMode suffix tableName = case popMode of
  FullPopulation        -> tableName <> suffix
  IncrementalPopulation -> tableName
suffixTableName :: TablePopulationMode -> Text -> TableName -> TableName
suffixTableName popMode suffix tableName = case popMode of
  FullPopulation        -> tableName <> suffix
  IncrementalPopulation -> tableName
suffixTableName popMode suffix tableName = case popMode of
  FullPopulation        -> tableName <> suffix
  IncrementalPopulation -> tableName