	\psset{xunit=1cm,yunit=0.02cm}
	\begin{pspicture}(-3,-300)(5,30)
		\psaxes[log=x,Dx=1,Dy=90]{->}(-2,0)(-2,-300)(5,30)
		\psplot[plotstyle=curve]{-2}{5}{10000 10 x exp mul 100000 10 x exp mul add 10000000 10 x exp mul add 10 x exp 3 exp sub 10 x exp 2 exp -10 mul 10 x exp 2 exp -1000 mul add 10 x exp 2 exp -10000 mul add 100000000 add atan -1 mul}
		\rput[l](5,0){$\omega$}
		\rput[r](-0.1,30){$\varphi\left(A_D\left(\omega\right)\right)$}
	\end{pspicture}