documentclass{standalone}
usepackage{tikz}
usetikzlibrary{
  calc,
  decorations.pathreplacing
}
begin{document}

begin{tikzpicture}[scale=1,
interface/.style={
    postaction={draw,decorate,decoration={border,angle=45,
                amplitude=-3mm,segment length=2mm}}},
]

coordinate (O) at (0,0);

fill[gray!10, rounded corners=2pt] (-3,-0.2) rectangle (5,0.2);
draw[black,line width=.5pt,interface](-3,0)--(5,0);

draw (O) node[xshift=-2mm, yshift=2mm] {$x_{0}$};
draw [line width=1pt] (O) -- (1,0) node (y) {};
filldraw[fill=white, line width=1pt] (1,0) circle(0.9mm) node[xshift=2mm, yshift=2mm]{$y_{0}$};
draw[line width=1pt] (O) -- (0,1);
filldraw[fill=white, line width=1pt] (0,1) circle(0.9mm) node[xshift=-2mm, yshift=2mm]{$z_{0}$};

node at (-2,0.75) {Real};
node at (-2,-0.75) [yshift=-1mm] {Image};

defang{60}
defL{13mm}

node at (3,1.25) (Pr) {-};
node at ($(Pr)+(ang:L/2)$) (mur){};

node at (3,-1.25) (Pi) {-};
node at ($(Pi)+(-ang:L/2)$) (mui){};


% Real
draw[gray](O) -- ($(Pr)+(ang:L/2)$) node[midway, above]{${r}$};
draw ($(Pr)+(ang:L/2)$) node[left] {$x$};
draw [line width=0.5pt] ($(Pr)+(ang:L/2)$) -- ++(ang-90:1);
filldraw[fill=white, line width=0.5pt] ($(Pr)+(ang:L/2)+(ang-90:1)$) circle(0.9mm) node[right]{$y$};
draw[line width=0.5pt] ($(Pr)+(ang:L/2)$) -- ++(ang:1);
filldraw[fill=white, line width=0.5pt] ($(Pr)+(ang:L/2)+(ang:1)$) circle(0.9mm) node[above]{$z$};

draw[->, >=stealth, ultra thick, shorten >=1mm] (Pr) -- ++(ang:L) node (Pr2)[xshift=1mm, yshift=1mm]{+};
draw[very thin] ($(mur)+({2.5mm*cos(90)},{2.5mm*sin(90)})$) arc (90:ang:2.5mm);
draw[very thin, ->] ($(mur)+({2.5mm*cos(150)},{2.5mm*sin(150)})$) arc (150:90:2.5mm) node [xshift=-1.5mm, yshift=1.5mm] {$theta$};
node at ($(Pr)+(ang:L/2)$) [xshift=3mm] {${mu}$};

filldraw[fill=white,line width=0.5pt]($(Pr)+(ang:L/2)$)circle(0.9mm);
filldraw[fill=black,line width=0.25pt]($(Pr)+(ang:L/2)$)circle(.25mm);

% Image
draw[gray](O) -- ($(Pi)+(-ang:L/2)$) node[midway, below]{${r^{prime}}$};
draw ($(Pi)+(-ang:L/2)$) node[left] {$x^{prime}$};
draw [line width=0.5pt] ($(Pi)+(-ang:L/2)$) -- ++(-ang+90:1);
filldraw[fill=white, line width=0.5pt] ($(Pi)+(-ang:L/2)+(-ang+90:1)$) circle(0.9mm) node[xshift=3mm, yshift=1mm]{$y^{prime}$};
draw[line width=0.5pt] ($(Pi)+(-ang:L/2)$) -- ++(-ang:1);
filldraw[fill=white, line width=0.5pt] ($(Pi)+(-ang:L/2)+(-ang:1)$) circle(0.9mm) node[xshift=2mm, yshift=-2mm]{$z^{prime}$};

draw[->, >=stealth, ultra thick, shorten >=1mm] (Pi) -- ++(-ang:L) node (Pi2)[xshift=1mm, yshift=-1mm]{+};
draw[very thin] ($(mui)+({2.5mm*cos(-90)},{2.5mm*sin(-90)})$) arc (-90:-ang:2.5mm);
draw[very thin, ->] ($(mui)+({2.5mm*cos(-150)},{2.5mm*sin(-150)})$) arc (-150:-90:2.5mm) node [xshift=-1.5mm, yshift=-1.5mm] {$theta$};
node at ($(Pi)+(-ang:L/2)$) [xshift=3.5mm] {${mu^{prime}}$};

filldraw[fill=white,line width=0.5pt]($(Pi)+(-ang:L/2)$)circle(0.9mm);
filldraw[fill=black,line width=0.25pt]($(Pi)+(-ang:L/2)$)circle(.25mm);

% Projection
draw[dashed, very thin] (mur) -- ($(O)!(mur)!(y)$) node[below](mux) {};
draw[ultra thin] (mur) -- ($(mur)+(0,0.4)$);

draw[dashed, very thin] (mui) -- ($(O)!(mui)!(y)$);
draw[ultra thin] (mui) -- ($(mui)+(0,-0.4)$);


filldraw[fill=white,line width=1pt](O)circle(0.9mm);
filldraw[fill=black,line width=0.5pt](O)circle(.25mm);


end{tikzpicture}

end{document}