# Changing point size in Show

Suppose that a is a line plot produced with Plot, and b and c are scatterplots produced with ListPlot.

Furthermore, suppose that Show[a, b, c] produces this:

How can I modify the expression Show[a, b, c] so that the directive PointSize[Tiny] is applied to the points coming from b and c?

Maybe this /. PointSize[x_] -> PointSize[.02]
dat1 = Transpose[Sort /@ RandomReal[1, {2, 50}]];