Winkelfunktionen am Einheitskreis

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Title:			 Winkelfunktionen am Einheitskreis
% Author:      Tobias Krähling
% Needs:       pstricks,pstricks-add
% DesignScale: unit=30mm
% Size:			   2.52 x 2.52	
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{\sbPSTDefault\sffamily
  \psset{unit=30mm}
  \begin{pspicture}(-1.21,-1.21)(1.31,1.31)
    \pscircle[linecolor=sbfillmed,linestyle=dashed](0,0){1.0}
    \psaxes[arrowlength=1.75,linewidth=0.17mm,subticks=4,arrows=->
           ](0,0)(-1.2,-1.2)(1.3,1.3)
    \psarc{->}(0,0){0.3}{0}{45}
    \psarc(0.707,0){0.1}{90}{180}\rput[b](0.67,0){$\cdot$}
    \uput[-90](1.2,0.0){$x$}
    \uput[180](0.0,1.2){$y$}
    \psline(0,0)(1.2,1.2)
    \psline[linewidth=1pt](0,0)(1.2,1.2)
    \pcline[offset=0pt,linecolor=sblinehighlight,linewidth=1pt
           ]{|*-|*}(0,0)(0.71,0)\bput*{:U}{cos}
    \pcline[linecolor=sblinehighlight,linewidth=1pt
           ]{|*-|*}(0.707,0)(0.707,0.707)\bput*[3pt]{:U}{sin}
    \pcline[linecolor=sblinemed,linewidth=1pt
           ]{|*-|*}(1,0)(1,1)\bput*{:U}{tan}
    \pcline[linecolor=sblinemed,linewidth=1pt
           ]{|*-|*}(0,-0.3)(1,-0.3)\bput*{:U}{cot}
    \uput{11pt}[20](0,0){$\varphi$}
  \end{pspicture}
}