mapUnionVarSet get_set xs = foldr (unionVarSet . get_set) emptyVarSet xs
mapUnionVarSet get_set xs = foldr (unionVarSet . get_set) emptyVarSet xs
mapUnionVarSet get_set xs = foldr (unionVarSet . get_set) emptyVarSet xs