% rad=archipolexample(win)  Beispiel einer Polarkoordinaten-Funktion
%   fuer die Archimedische Spirale (win in Radian)
function rad = archipol(win)
     rad = 0.1*win;
