function fh = smithchart(swr,cl)
% fh = smithchart(swr,cl)
% Smith Chart Plot
% swr ist ein optionaler Vektor, der fr jede Komponente von swr den entsprechenden
% swr-Kreis zeichnet, z.B. swr = [2 5]
% Mit cl kann optional die Farbe des Gitters angegeben werden (Default: 0.7*[1 1 1])
% In fh wird  figurehandle  des Plots ausgegeben.
% Mit line o.. kann in das Diagramm gezeichnet werden. Der Ursprung des
% kartesischen Achsensystems liegt in der Mitte. Der Radius des Randes ist 1.
