(***********************************************************************

                    Mathematica-Compatible Notebook

This notebook can be used on any computer system with Mathematica 4.0,
MathReader 4.0, or any compatible application. The data for the notebook 
starts with the line containing stars above.

To get the notebook into a Mathematica-compatible application, do one of 
the following:

* Save the data starting with the line of stars above into a file
  with a name ending in .nb, then open the file inside the application;

* Copy the data starting with the line of stars above to the
  clipboard, then use the Paste menu command inside the application.

Data for notebooks contains only printable 7-bit ASCII and can be
sent directly in email or through ftp in text mode.  Newlines can be
CR, LF or CRLF (Unix, Macintosh or MS-DOS style).

NOTE: If you modify the data for this notebook not in a Mathematica-
compatible application, you must delete the line below containing the 
word CacheID, otherwise Mathematica-compatible applications may try to 
use invalid cache data.

For more information on notebooks and Mathematica-compatible 
applications, contact Wolfram Research:
  web: http://www.wolfram.com
  email: info@wolfram.com
  phone: +1-217-398-0700 (U.S.)

Notebook reader applications are available free of charge from 
Wolfram Research.
***********************************************************************)



(*NotebookFileLineBreakTest
NotebookFileLineBreakTest*)
(*WindowFrame->Normal*)



Notebook[{
Cell["Analog Insydes RF Extensions", "Title"],

Cell["Importing Touchstone s-Parameter Files", "Subtitle"],

Cell["\<\
Copyright \[Copyright] 2003 by Eckhard Hennig \
<eckhard@kaninkolo.de>
[see detailed copyright notice at end of notebook]\
\>", "Subsubtitle"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: 1 
%%ImageSize: 300 300 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.416667 0.5 0.416667 [
[ 0 0 0 0 ]
[ 1 1 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 1 L
0 1 L
closepath
clip
newpath
.7 g
.5 Mabswid
[ ] 0 setdash
newpath
.63889 .5 .27778 112.62 247.38 arc
s
newpath
.77778 .5 .13889 0 360 arc
s
newpath
.91667 .29167 .20833 157.38 216.87 arc
s
newpath
.91667 -0.33333 .83333 118.072 143.13 arc
s
newpath
.91667 1.33333 .83333 216.87 241.928 arc
s
newpath
.91667 .70833 .20833 143.13 202.62 arc
s
.5 g
.004 w
newpath
.5 .5 .41667 0 360 arc
s
newpath
.70833 .5 .20833 0 360 arc
s
newpath
.91667 .08333 .41667 90 180 arc
s
.08333 .5 m
.91667 .5 L
s
newpath
.91667 .91667 .41667 180 270 arc
s
1 g
.5 .5 m
.5 .5 .00833 0 365.73 arc
F
.5 g
newpath
.5 .5 .00833 0 365.73 arc
s
0 g
[(0.5)] .40278 .475 0 0 Mshowa
[(2.)] .68056 .475 0 0 Mshowa
[(-2.)] .775 .13333 0 0 Mshowa
[(-0.5)] .225 .13333 0 0 Mshowa
[(0.5)] .225 .86667 0 0 Mshowa
[(2.)] .775 .86667 0 0 Mshowa
[(0.)] .125 .475 0 0 Mshowa
[(1.)] .54167 .475 0 0 Mshowa
[(-1.)] .5 .04167 0 0 Mshowa
[(0.)] .04167 .5 0 0 Mshowa
[(1.)] .5 .95833 0 0 Mshowa
1 0 0 r
.005 w
.49999 .49792 m
.49999 .49766 L
.49998 .49737 L
.49998 .49705 L
.49997 .49668 L
.49997 .49627 L
.49996 .49581 L
.49995 .4953 L
.49993 .49472 L
.49992 .49407 L
.49989 .49334 L
.49987 .49252 L
.49983 .49159 L
.49979 .49056 L
.49973 .48939 L
.49966 .48809 L
.49957 .48662 L
.49946 .48498 L
.49932 .48313 L
.49914 .48106 L
.49891 .47873 L
.49863 .47613 L
.49827 .4732 L
.49782 .46993 L
.49725 .46627 L
.49654 .46218 L
.49564 .4576 L
.49451 .45251 L
.4931 .44683 L
.49133 .44053 L
.48912 .43356 L
.48637 .42587 L
.48294 .41744 L
.4787 .40824 L
.47348 .39829 L
.46709 .38762 L
.45931 .37632 L
.44994 .36453 L
.43876 .35246 L
.42558 .34041 L
.41029 .32874 L
.39284 .31788 L
.37331 .30833 L
.35193 .30057 L
.32906 .29505 L
.30522 .29211 L
.28103 .29194 L
.25711 .29455 L
.2341 .29978 L
.21251 .30729 L
Mistroke
.19274 .31665 L
.17504 .32737 L
.15948 .33897 L
.14606 .351 L
.13465 .36308 L
.12506 .37491 L
.11711 .38628 L
.11056 .39704 L
.1052 .40708 L
.10086 .41637 L
.09734 .4249 L
.09451 .43267 L
.09224 .43973 L
.09043 .44611 L
.08897 .45185 L
.08782 .45702 L
.08689 .46165 L
.08616 .4658 L
.08558 .46951 L
.08511 .47283 L
.08474 .47579 L
.08445 .47843 L
.08422 .48079 L
.08404 .48289 L
.08389 .48476 L
.08378 .48643 L
.08368 .48792 L
.08361 .48924 L
.08355 .49042 L
.08351 .49147 L
.08347 .49241 L
.08344 .49324 L
.08342 .49398 L
.0834 .49464 L
.08339 .49523 L
.08338 .49576 L
.08337 .49622 L
.08336 .49664 L
.08335 .49701 L
.08335 .49733 L
.08335 .49763 L
.08334 .49789 L
.08334 .49812 L
.08334 .49833 L
.08334 .49851 L
.08334 .49867 L
.08334 .49882 L
.08334 .49895 L
.08334 .49906 L
.08333 .49917 L
Mistroke
Mfstroke
.02 w
.49999 .49792 Mdot
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  Editable->False,
  ShowCellBracket->False,
  ImageSize->{212, 212},
  ImageMargins->{{0, 0}, {0, 0}},
  ImageRegion->{{0, 1}, {0, 1}}],

Cell[CellGroupData[{

Cell["Initialization", "Section"],

Cell["\<\
Set the current working directory to the folder in which this \
notebook resides.\
\>", "Text"],

Cell[BoxData[{
    \(\(Off[General::spell1];\)\), "\[IndentingNewLine]", 
    \(\($NotebookDirectory = 
        ToFileName@
          First["\<FileName\>" /. 
              NotebookInformation[
                EvaluationNotebook[]]];\)\), "\[IndentingNewLine]", 
    \(\(SetDirectory[$NotebookDirectory];\)\)}], "Input"],

Cell["Load Analog Insydes 2 and the RF extensions.", "Text"],

Cell[BoxData[
    \(<< AnalogInsydes`\)], "Input"],

Cell[BoxData[
    \(<< AnalogInsydes`RF`\)], "Input"],

Cell["Set graphics display options.", "Text"],

Cell[BoxData[
    \(\(SetOptions[{SmithChart, BodePlot}, 
        ImageSize \[Rule] 500];\)\)], "Input"]
}, Closed]],

Cell[CellGroupData[{

Cell["Reading Touchstone Files", "Section"],

Cell[TextData[{
  "You can import s-parameter data into ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " from Touchstone files using the command ",
  StyleBox["ReadTouchstone", "MR"],
  ". Here is an example for a two-port s-parameter file:"
}], "Text"],

Cell[CellGroupData[{

Cell[BoxData[
    \(\(!! t305113b.s2p\)\)], "Input"],

Cell["\<\
!AT-30511
!S and NOISE PARAMETERS at Vce=2.7V  Ic=5mA.   LAST UPDATED 04-10-94

# ghz s ma r 50
0.1\t0.88\t-11\t13.32\t169\t0.01\t83\t0.97\t-5
0.5\t0.70\t-48\t10.49\t134\t0.04\t64\t0.82\t-22
0.9\t0.49\t-72\t7.73\t111\t0.05\t57\t0.70\t-30
1.0\t0.46\t-77\t7.15\t107\t0.06\t55\t0.69\t-31
1.5\t0.30\t-100\t5.27\t89\t0.07\t53\t0.62\t-35
1.8\t0.24\t-112\t4.52\t81\t0.08\t52\t0.59\t-37
2.0\t0.21\t-120\t4.13\t76\t0.09\t52\t0.58\t-39
2.4\t0.16\t-140\t3.52\t67\t0.10\t50\t0.57\t-42
3.0\t0.13\t-172\t2.88\t55\t0.12\t48\t0.55\t-46
4.0\t0.15\t137\t2.25\t38\t0.15\t44\t0.53\t-55
5.0\t0.21\t106\t1.87\t22\t0.18\t39\t0.52\t-64

0.5\t1.1\t0.77\t9\t1.10
0.9\t1.2\t0.71\t18\t0.96
1.8\t1.5\t0.60\t45\t0.66
2.4\t1.8\t0.51\t65\t0.47
\
\>", "Print"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(spAT30511 = ReadTouchstone["\<t305113b.s2p\>"]\)], "Input"],

Cell[BoxData[
    RowBox[{"{", 
      RowBox[{"{", 
        RowBox[{
          RowBox[{"\<\"S11\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S21\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S12\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S22\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"NoiseFigure", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{5.`*^8, 2.4`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"SourceReflection", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{5.`*^8, 2.4`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"NoiseResistance", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{5.`*^8, 2.4`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", \(Type \[Rule] "S"\), 
          ",", \(ReferenceImpedance \[Rule] 50.`\)}], "}"}], "}"}]], "Output"]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["Displaying s-Parameter Data", "Section"],

Cell[TextData[{
  "To plot s-parameter data in a Smith chart, you must specify the option ",
  StyleBox["DataConversion\[Rule]False", "MR"],
  ". This prevents ",
  StyleBox["SmithChart", "MR"],
  " from applying the bilinear transformation from impedances to reflection \
coefficients to its input data."
}], "Text"],

Cell[CellGroupData[{

Cell[BoxData[
    \(SmithChart[
      spAT30511, {"\<S11\>"[f], "\<S12\>"[f]}, {f, 1. \ 10\^8, 5. \ 10\^9}, 
      DataConversion \[Rule] False, GridResolution \[Rule] High]\)], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: 1.175 
%%ImageSize: 500 587.5 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.47619 0.670833 0.47619 [
[ 0 0 0 0 ]
[ 1 1.175 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
% Start of sub-graphic
p
0.0238095 0.194643 0.97619 1.14702 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.454545 0.5 0.454545 [
[ 0 0 0 0 ]
[ 1 1 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 1 L
0 1 L
closepath
clip
newpath
.7 g
.5 Mabswid
[ ] 0 setdash
newpath
.54132 .5 .41322 95.4526 264.547 arc
s
newpath
.57576 .5 .37879 43.6028 316.397 arc
s
newpath
.6049 .5 .34965 104.863 255.137 arc
s
newpath
.62987 .5 .32468 108.925 251.075 arc
s
newpath
.65152 .5 .30303 33.3985 326.602 arc
s
newpath
.67045 .5 .28409 115.989 244.011 arc
s
newpath
.70202 .5 .25253 121.891 238.109 arc
s
newpath
.74793 .5 .20661 95.4526 264.547 arc
s
newpath
.77273 .5 .18182 79.6111 280.389 arc
s
newpath
.80303 .5 .15152 33.3985 326.602 arc
s
newpath
.84091 .5 .11364 43.6028 316.397 arc
s
newpath
.87879 .5 .07576 0 360 arc
s
newpath
.91322 .5 .04132 0 360 arc
s
newpath
.9329 .5 .02165 0 360 arc
s
newpath
.95455 .45455 .04545 90 258.579 arc
s
newpath
.95455 .40909 .09091 116.785 247.38 arc
s
newpath
.95455 .34848 .15152 120.51 233.13 arc
s
newpath
.95455 .27273 .22727 126.87 216.87 arc
s
newpath
.95455 .12121 .37879 133.603 190.389 arc
s
newpath
.95455 .19697 .30303 131.112 202.62 arc
s
newpath
.95455 -0.00505 .50505 138.455 173.974 arc
s
newpath
.95455 -0.06818 .56818 133.603 167.32 arc
s
newpath
.95455 -0.14935 .64935 116.268 159.984 arc
s
newpath
.95455 -0.25758 .75758 123.398 151.928 arc
s
newpath
.95455 -0.40909 .90909 99.5273 143.13 arc
s
newpath
.95455 -0.63636 1.13636 112.62 133.603 arc
s
newpath
.95455 -1.01515 1.51515 107.062 123.398 arc
s
newpath
.95455 -1.77273 2.27273 95.7248 112.62 arc
s
newpath
.95455 -4.04545 4.54545 95.7248 101.421 arc
s
newpath
.95455 5.04545 4.54545 258.579 264.275 arc
s
newpath
.95455 2.77273 2.27273 247.38 264.275 arc
s
newpath
.95455 2.01515 1.51515 236.602 252.938 arc
s
newpath
.95455 1.63636 1.13636 226.397 247.38 arc
s
newpath
.95455 1.40909 .90909 216.87 260.473 arc
s
newpath
.95455 1.25758 .75758 208.072 236.602 arc
s
newpath
.95455 1.14935 .64935 200.016 243.732 arc
s
newpath
.95455 1.06818 .56818 192.68 226.397 arc
s
newpath
.95455 1.00505 .50505 186.026 221.545 arc
s
newpath
.95455 .87879 .37879 169.611 226.397 arc
s
newpath
.95455 .80303 .30303 157.38 228.888 arc
s
newpath
.95455 .72727 .22727 143.13 233.13 arc
s
newpath
.95455 .65152 .15152 126.87 239.49 arc
s
newpath
.95455 .59091 .09091 112.62 243.215 arc
s
newpath
.95455 .54545 .04545 101.421 270 arc
s
.5 g
.004 w
newpath
.5 .5 .45455 0 360 arc
s
newpath
.72727 .5 .22727 0 360 arc
s
newpath
.95455 .04545 .45455 100.389 180 arc
s
.04545 .5 m
.95455 .5 L
s
newpath
.95455 .95455 .45455 180 259.611 arc
s
1 g
.5 .5 m
.5 .5 .00909 0 365.73 arc
F
.5 g
newpath
.5 .5 .00909 0 365.73 arc
s
0 g
[(0.1)] .15083 .48636 0 0 Mshowa
[(0.2)] .2197 .48636 0 0 Mshowa
[(0.3)] .27797 .48636 0 0 Mshowa
[(0.4)] .32792 .48636 0 0 Mshowa
[(0.5)] .37121 .48636 0 0 Mshowa
[(0.6)] .40909 .48636 0 0 Mshowa
[(0.8)] .47222 .48636 0 0 Mshowa
[(1.2)] .56405 .48636 0 0 Mshowa
[(1.5)] .61364 .48636 0 0 Mshowa
[(2.)] .67424 .48636 0 0 Mshowa
[(3.)] .75 .48636 0 0 Mshowa
[(5.)] .82576 .48636 0 0 Mshowa
[(10.)] .89463 .48636 0 0 Mshowa
[(20.)] .93398 .48636 0 0 Mshowa
[(-10.)] .96782 .40549 0 0 Mshowa
[(-5.)] .94056 .31643 0 0 Mshowa
[(-3.)] .88182 .21364 0 0 Mshowa
[(-2.)] .78636 .11818 0 0 Mshowa
[(-1.2)] .58607 .03055 0 0 Mshowa
[(-1.5)] .68357 .05944 0 0 Mshowa
[(-0.9)] .4499 .02536 0 0 Mshowa
[(-0.8)] .39523 .03437 0 0 Mshowa
[(-0.7)] .33664 .05156 0 0 Mshowa
[(-0.6)] .2754 .07888 0 0 Mshowa
[(-0.5)] .21364 .11818 0 0 Mshowa
[(-0.4)] .15439 .17085 0 0 Mshowa
[(-0.3)] .10154 .23728 0 0 Mshowa
[(-0.2)] .05944 .31643 0 0 Mshowa
[(-0.1)] .03218 .40549 0 0 Mshowa
[(0.1)] .03218 .59451 0 0 Mshowa
[(0.2)] .05944 .68357 0 0 Mshowa
[(0.3)] .10154 .76272 0 0 Mshowa
[(0.4)] .15439 .82915 0 0 Mshowa
[(0.5)] .21364 .88182 0 0 Mshowa
[(0.6)] .2754 .92112 0 0 Mshowa
[(0.7)] .33664 .94844 0 0 Mshowa
[(0.8)] .39523 .96563 0 0 Mshowa
[(0.9)] .4499 .97464 0 0 Mshowa
[(1.2)] .58607 .96945 0 0 Mshowa
[(1.5)] .68357 .94056 0 0 Mshowa
[(2.)] .78636 .88182 0 0 Mshowa
[(3.)] .88182 .78636 0 0 Mshowa
[(5.)] .94056 .68357 0 0 Mshowa
[(10.)] .96782 .59451 0 0 Mshowa
[(0.)] .06818 .48636 0 0 Mshowa
[(1.)] .52273 .48636 0 0 Mshowa
[(-1.)] .5 .02273 0 0 Mshowa
[(0.)] .02273 .5 0 0 Mshowa
[(1.)] .5 .97727 0 0 Mshowa
1 0 0 r
.005 w
.89265 .42368 m
.8847 .41659 L
.87533 .40825 L
.86431 .39843 L
.85134 .38687 L
.83607 .37327 L
.81809 .35726 L
.79694 .33841 L
.77204 .31623 L
.74273 .29012 L
.70916 .26418 L
.67661 .26975 L
.63831 .2763 L
.59321 .284 L
.55147 .29462 L
.52539 .31753 L
.49652 .34588 L
.47074 .37648 L
.45638 .40627 L
.44802 .43648 L
.44333 .46641 L
.44206 .4954 L
.44675 .5251 L
.45598 .55772 L
.47369 .59176 L
s
.02 w
.89265 .42368 Mdot
0 .8 0 r
.005 w
[ .03 .02 ] 0 setdash
.50055 .50451 m
.50088 .50504 L
.50127 .50565 L
.50172 .50638 L
.50226 .50723 L
.50289 .50824 L
.50363 .50942 L
.5045 .51081 L
.50553 .51245 L
.50674 .51438 L
.50808 .51641 L
.50908 .51703 L
.51025 .51775 L
.51163 .5186 L
.51498 .52167 L
.51672 .52328 L
.51815 .52453 L
.5202 .52647 L
.52351 .53009 L
.52733 .53361 L
.53171 .53677 L
.53733 .54099 L
.54414 .54469 L
.55265 .54839 L
.56358 .55149 L
s
.02 w
.50055 .50451 Mdot
MathSubEnd
P
% End of sub-graphic
0 g
.14286 .02798 m
.14286 .12321 L
.95238 .12321 L
.95238 .02798 L
F
1 g
.11905 .05179 m
.11905 .14702 L
.92857 .14702 L
.92857 .05179 L
F
0 g
.001 w
[ ] 0 setdash
.11905 .05179 m
.92857 .05179 L
.92857 .14702 L
.11905 .14702 L
.11905 .05179 L
s
% Start of sub-graphic
p
0.119048 0.0517857 0.928571 0.147024 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0396825 0.396825 0.00498504 0.0498504 [
[ 0 0 0 0 ]
[ 1 .11765 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .11765 L
0 .11765 L
closepath
clip
newpath
% Start of sub-graphic
p
0.0714286 0.00897308 0.468254 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
1 0 0 r
.005 w
[ ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.26984 .06281 -81 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(S11) show
81.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
81.000 13.000 moveto
(@) show
87.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(f) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
93.000 13.000 moveto
(D) show
1.000 setlinewidth
grestore
% Start of sub-graphic
p
0.531746 0.00897308 0.928571 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
0 .8 0 r
.005 w
[ .03 .02 ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.73016 .06281 -81 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(S12) show
81.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
81.000 13.000 moveto
(@) show
87.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(f) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
93.000 13.000 moveto
(D) show
1.000 setlinewidth
grestore
MathSubEnd
P
% End of sub-graphic
0 0 m
1 0 L
1 1.175 L
0 1.175 L
closepath
clip
newpath
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{500, 587.5}],

Cell[BoxData[
    TagBox[\(\[SkeletonIndicator]  Graphics  \[SkeletonIndicator]\),
      False,
      Editable->False]], "Output"]
}, Open  ]],

Cell["\<\
You can also display s-parameter data in Analog Insydes Bode plots.\
\
\>", "Text"],

Cell[CellGroupData[{

Cell[BoxData[
    \(BodePlot[
      Evaluate["\<S21\>"[f] /. spAT30511], {f, 1. \ 10\^8, 
        5. \ 10\^9}]\)], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .75 
%%ImageSize: 500 375 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0178571 0.714286 [
[ 0 0 0 0 ]
[ 1 .75 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .75 L
0 .75 L
closepath
clip
newpath
% Start of sub-graphic
p
0.0238095 0.392857 0.97619 0.732143 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
-4.4607 0.560564 -0.0797498 0.0159165 [
[.02381 -0.0125 -17 -12.875 ]
[.02381 -0.0125 17 0 ]
[.19256 -0.0125 -17 -12.875 ]
[.19256 -0.0125 17 0 ]
[.41563 -0.0125 -17 -12.875 ]
[.41563 -0.0125 17 0 ]
[.58437 -0.0125 -17 -12.875 ]
[.58437 -0.0125 17 0 ]
[.75312 -0.0125 -17 -12.875 ]
[.75312 -0.0125 17 0 ]
[.97619 -0.0125 -17 -12.875 ]
[.97619 -0.0125 17 0 ]
[.5 -0.0125 -29 -25.75 ]
[.5 -0.0125 29 -12.875 ]
[-0.0125 .03962 -18 -4.5 ]
[-0.0125 .03962 0 4.5 ]
[-0.0125 .07942 -12 -4.5 ]
[-0.0125 .07942 0 4.5 ]
[-0.0125 .11921 -24 -4.5 ]
[-0.0125 .11921 0 4.5 ]
[-0.0125 .159 -12 -4.5 ]
[-0.0125 .159 0 4.5 ]
[-0.0125 .19879 -24 -4.5 ]
[-0.0125 .19879 0 4.5 ]
[-0.0125 .23858 -12 -4.5 ]
[-0.0125 .23858 0 4.5 ]
[-0.0125 .27837 -24 -4.5 ]
[-0.0125 .27837 0 4.5 ]
[-0.01875 .1425 -36.875 -44 ]
[-0.01875 .1425 -24 44 ]
[ -0.0025 -0.0025 0 0 ]
[ 1.0025 .2875 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 .5 r
.25 Mabswid
[ ] 0 setdash
.02381 0 m
.02381 .285 L
s
.19256 0 m
.19256 .285 L
s
.41563 0 m
.41563 .285 L
s
.58437 0 m
.58437 .285 L
s
.75312 0 m
.75312 .285 L
s
.97619 0 m
.97619 .285 L
s
.29127 0 m
.29127 .285 L
s
.3613 0 m
.3613 .285 L
s
.46001 0 m
.46001 .285 L
s
.49754 0 m
.49754 .285 L
s
.53005 0 m
.53005 .285 L
s
.55872 0 m
.55872 .285 L
s
.85183 0 m
.85183 .285 L
s
.92187 0 m
.92187 .285 L
s
0 .03962 m
1 .03962 L
s
0 .07942 m
1 .07942 L
s
0 .11921 m
1 .11921 L
s
0 .159 m
1 .159 L
s
0 .19879 m
1 .19879 L
s
0 .23858 m
1 .23858 L
s
0 g
.02381 0 m
.02381 .00625 L
s
gsave
.02381 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.0) show
81.000 13.000 moveto
(E8) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.19256 0 m
.19256 .00625 L
s
gsave
.19256 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(2.0) show
81.000 13.000 moveto
(E8) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.41563 0 m
.41563 .00625 L
s
gsave
.41563 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(5.0) show
81.000 13.000 moveto
(E8) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.58437 0 m
.58437 .00625 L
s
gsave
.58437 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.75312 0 m
.75312 .00625 L
s
gsave
.75312 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(2.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.97619 0 m
.97619 .00625 L
s
gsave
.97619 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(5.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.001 w
.29127 0 m
.29127 .00375 L
s
.3613 0 m
.3613 .00375 L
s
.46001 0 m
.46001 .00375 L
s
.49754 0 m
.49754 .00375 L
s
.53005 0 m
.53005 .00375 L
s
.55872 0 m
.55872 .00375 L
s
.85183 0 m
.85183 .00375 L
s
.92187 0 m
.92187 .00375 L
s
.005 w
0 0 m
1 0 L
s
gsave
.5 -0.0125 -90 -29.75 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Frequency) show
117.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
0 .03962 m
.00625 .03962 L
s
[(7.5)] -0.0125 .03962 1 0 Mshowa
0 .07942 m
.00625 .07942 L
s
[(10)] -0.0125 .07942 1 0 Mshowa
0 .11921 m
.00625 .11921 L
s
[(12.5)] -0.0125 .11921 1 0 Mshowa
0 .159 m
.00625 .159 L
s
[(15)] -0.0125 .159 1 0 Mshowa
0 .19879 m
.00625 .19879 L
s
[(17.5)] -0.0125 .19879 1 0 Mshowa
0 .23858 m
.00625 .23858 L
s
[(20)] -0.0125 .23858 1 0 Mshowa
0 .27837 m
.00625 .27837 L
s
[(22.5)] -0.0125 .27837 1 0 Mshowa
.125 Mabswid
0 .00779 m
.00375 .00779 L
s
0 .01575 m
.00375 .01575 L
s
0 .02371 m
.00375 .02371 L
s
0 .03167 m
.00375 .03167 L
s
0 .04758 m
.00375 .04758 L
s
0 .05554 m
.00375 .05554 L
s
0 .0635 m
.00375 .0635 L
s
0 .07146 m
.00375 .07146 L
s
0 .08737 m
.00375 .08737 L
s
0 .09533 m
.00375 .09533 L
s
0 .10329 m
.00375 .10329 L
s
0 .11125 m
.00375 .11125 L
s
0 .12717 m
.00375 .12717 L
s
0 .13512 m
.00375 .13512 L
s
0 .14308 m
.00375 .14308 L
s
0 .15104 m
.00375 .15104 L
s
0 .16696 m
.00375 .16696 L
s
0 .17491 m
.00375 .17491 L
s
0 .18287 m
.00375 .18287 L
s
0 .19083 m
.00375 .19083 L
s
0 .20675 m
.00375 .20675 L
s
0 .21471 m
.00375 .21471 L
s
0 .22266 m
.00375 .22266 L
s
0 .23062 m
.00375 .23062 L
s
0 .24654 m
.00375 .24654 L
s
0 .2545 m
.00375 .2545 L
s
0 .26246 m
.00375 .26246 L
s
0 .27041 m
.00375 .27041 L
s
.005 w
0 0 m
0 .285 L
s
gsave
-0.01875 .1425 -135.438 -10.4375 Mabsadd m
1 1 Mabs scale
currentpoint translate
105 10.4375 translate
90 rotate
-105 -10.4375 translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Magnitude) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
123.000 13.000 moveto
(H) show
129.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(dB) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
141.000 13.000 moveto
(L) show
147.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
.02381 .27875 m
.02381 .285 L
s
.19256 .27875 m
.19256 .285 L
s
.41563 .27875 m
.41563 .285 L
s
.58437 .27875 m
.58437 .285 L
s
.75312 .27875 m
.75312 .285 L
s
.97619 .27875 m
.97619 .285 L
s
.001 w
.29127 .28125 m
.29127 .285 L
s
.3613 .28125 m
.3613 .285 L
s
.46001 .28125 m
.46001 .285 L
s
.49754 .28125 m
.49754 .285 L
s
.53005 .28125 m
.53005 .285 L
s
.55872 .28125 m
.55872 .285 L
s
.85183 .28125 m
.85183 .285 L
s
.92187 .28125 m
.92187 .285 L
s
.005 w
0 .285 m
1 .285 L
s
1 0 m
1 .285 L
s
0 0 m
1 0 L
1 .285 L
0 .285 L
closepath
clip
newpath
1 0 0 r
.02381 .27821 m
.06349 .27605 L
.10317 .27354 L
.14286 .27065 L
.18254 .26733 L
.22222 .26359 L
.2619 .25946 L
.30159 .25509 L
.34127 .25077 L
.38095 .2471 L
.42063 .24404 L
.46032 .23394 L
.5 .22218 L
.53968 .20921 L
.57937 .19441 L
.61905 .17934 L
.65873 .16188 L
.69841 .1432 L
.7381 .1238 L
.77778 .10456 L
.81746 .08473 L
.85714 .06417 L
.89683 .04521 L
.93651 .02554 L
.97619 .00679 L
s
MathSubEnd
P
% End of sub-graphic
% Start of sub-graphic
p
0.0238095 0.0178571 0.97619 0.357143 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
-4.4607 0.560564 0.630887 0.00184645 [
[.02381 -0.0125 -17 -12.875 ]
[.02381 -0.0125 17 0 ]
[.19256 -0.0125 -17 -12.875 ]
[.19256 -0.0125 17 0 ]
[.41563 -0.0125 -17 -12.875 ]
[.41563 -0.0125 17 0 ]
[.58437 -0.0125 -17 -12.875 ]
[.58437 -0.0125 17 0 ]
[.75312 -0.0125 -17 -12.875 ]
[.75312 -0.0125 17 0 ]
[.97619 -0.0125 -17 -12.875 ]
[.97619 -0.0125 17 0 ]
[.5 -0.0125 -29 -25.75 ]
[.5 -0.0125 29 -12.875 ]
[-0.0125 .00309 -24 -4.5 ]
[-0.0125 .00309 0 4.5 ]
[-0.0125 .04002 -24 -4.5 ]
[-0.0125 .04002 0 4.5 ]
[-0.0125 .07695 -24 -4.5 ]
[-0.0125 .07695 0 4.5 ]
[-0.0125 .11388 -24 -4.5 ]
[-0.0125 .11388 0 4.5 ]
[-0.0125 .15081 -24 -4.5 ]
[-0.0125 .15081 0 4.5 ]
[-0.0125 .18774 -24 -4.5 ]
[-0.0125 .18774 0 4.5 ]
[-0.0125 .22467 -24 -4.5 ]
[-0.0125 .22467 0 4.5 ]
[-0.0125 .2616 -24 -4.5 ]
[-0.0125 .2616 0 4.5 ]
[-0.01875 .1425 -36.875 -35 ]
[-0.01875 .1425 -24 35 ]
[ -0.0025 -0.0025 0 0 ]
[ 1.0025 .2875 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 .5 r
.25 Mabswid
[ ] 0 setdash
.02381 0 m
.02381 .285 L
s
.19256 0 m
.19256 .285 L
s
.41563 0 m
.41563 .285 L
s
.58437 0 m
.58437 .285 L
s
.75312 0 m
.75312 .285 L
s
.97619 0 m
.97619 .285 L
s
.29127 0 m
.29127 .285 L
s
.3613 0 m
.3613 .285 L
s
.46001 0 m
.46001 .285 L
s
.49754 0 m
.49754 .285 L
s
.53005 0 m
.53005 .285 L
s
.55872 0 m
.55872 .285 L
s
.85183 0 m
.85183 .285 L
s
.92187 0 m
.92187 .285 L
s
0 .04002 m
1 .04002 L
s
0 .07695 m
1 .07695 L
s
0 .11388 m
1 .11388 L
s
0 .15081 m
1 .15081 L
s
0 .18774 m
1 .18774 L
s
0 .22467 m
1 .22467 L
s
0 .2616 m
1 .2616 L
s
0 g
.02381 0 m
.02381 .00625 L
s
gsave
.02381 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.0) show
81.000 13.000 moveto
(E8) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.19256 0 m
.19256 .00625 L
s
gsave
.19256 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(2.0) show
81.000 13.000 moveto
(E8) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.41563 0 m
.41563 .00625 L
s
gsave
.41563 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(5.0) show
81.000 13.000 moveto
(E8) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.58437 0 m
.58437 .00625 L
s
gsave
.58437 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.75312 0 m
.75312 .00625 L
s
gsave
.75312 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(2.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.97619 0 m
.97619 .00625 L
s
gsave
.97619 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(5.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.001 w
.29127 0 m
.29127 .00375 L
s
.3613 0 m
.3613 .00375 L
s
.46001 0 m
.46001 .00375 L
s
.49754 0 m
.49754 .00375 L
s
.53005 0 m
.53005 .00375 L
s
.55872 0 m
.55872 .00375 L
s
.85183 0 m
.85183 .00375 L
s
.92187 0 m
.92187 .00375 L
s
.005 w
0 0 m
1 0 L
s
gsave
.5 -0.0125 -90 -29.75 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Frequency) show
117.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
0 .00309 m
.00625 .00309 L
s
[(-340)] -0.0125 .00309 1 0 Mshowa
0 .04002 m
.00625 .04002 L
s
[(-320)] -0.0125 .04002 1 0 Mshowa
0 .07695 m
.00625 .07695 L
s
[(-300)] -0.0125 .07695 1 0 Mshowa
0 .11388 m
.00625 .11388 L
s
[(-280)] -0.0125 .11388 1 0 Mshowa
0 .15081 m
.00625 .15081 L
s
[(-260)] -0.0125 .15081 1 0 Mshowa
0 .18774 m
.00625 .18774 L
s
[(-240)] -0.0125 .18774 1 0 Mshowa
0 .22467 m
.00625 .22467 L
s
[(-220)] -0.0125 .22467 1 0 Mshowa
0 .2616 m
.00625 .2616 L
s
[(-200)] -0.0125 .2616 1 0 Mshowa
.125 Mabswid
0 .01233 m
.00375 .01233 L
s
0 .02156 m
.00375 .02156 L
s
0 .03079 m
.00375 .03079 L
s
0 .04925 m
.00375 .04925 L
s
0 .05849 m
.00375 .05849 L
s
0 .06772 m
.00375 .06772 L
s
0 .08618 m
.00375 .08618 L
s
0 .09542 m
.00375 .09542 L
s
0 .10465 m
.00375 .10465 L
s
0 .12311 m
.00375 .12311 L
s
0 .13234 m
.00375 .13234 L
s
0 .14158 m
.00375 .14158 L
s
0 .16004 m
.00375 .16004 L
s
0 .16927 m
.00375 .16927 L
s
0 .17851 m
.00375 .17851 L
s
0 .19697 m
.00375 .19697 L
s
0 .2062 m
.00375 .2062 L
s
0 .21543 m
.00375 .21543 L
s
0 .2339 m
.00375 .2339 L
s
0 .24313 m
.00375 .24313 L
s
0 .25236 m
.00375 .25236 L
s
0 .27083 m
.00375 .27083 L
s
0 .28006 m
.00375 .28006 L
s
.005 w
0 0 m
0 .285 L
s
gsave
-0.01875 .1425 -126.438 -10.4375 Mabsadd m
1 1 Mabs scale
currentpoint translate
96 10.4375 translate
90 rotate
-96 -10.4375 translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Phase) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
99.000 13.000 moveto
(H) show
105.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(deg) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
123.000 13.000 moveto
(L) show
129.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
.02381 .27875 m
.02381 .285 L
s
.19256 .27875 m
.19256 .285 L
s
.41563 .27875 m
.41563 .285 L
s
.58437 .27875 m
.58437 .285 L
s
.75312 .27875 m
.75312 .285 L
s
.97619 .27875 m
.97619 .285 L
s
.001 w
.29127 .28125 m
.29127 .285 L
s
.3613 .28125 m
.3613 .285 L
s
.46001 .28125 m
.46001 .285 L
s
.49754 .28125 m
.49754 .285 L
s
.53005 .28125 m
.53005 .285 L
s
.55872 .28125 m
.55872 .285 L
s
.85183 .28125 m
.85183 .285 L
s
.92187 .28125 m
.92187 .285 L
s
.005 w
0 .285 m
1 .285 L
s
1 0 m
1 .285 L
s
0 0 m
1 0 L
1 .285 L
0 .285 L
closepath
clip
newpath
1 0 0 r
.02381 .27821 m
.06349 .27607 L
.10317 .27345 L
.14286 .27025 L
.18254 .26631 L
.22222 .26142 L
.2619 .25533 L
.30159 .24771 L
.34127 .23816 L
.38095 .22623 L
.42063 .21279 L
.46032 .20526 L
.5 .19486 L
.53968 .18021 L
.57937 .16533 L
.61905 .15563 L
.65873 .14215 L
.69841 .12619 L
.7381 .11222 L
.77778 .0983 L
.81746 .08329 L
.85714 .06609 L
.89683 .05048 L
.93651 .03001 L
.97619 .00679 L
s
MathSubEnd
P
% End of sub-graphic
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{500, 375}],

Cell[BoxData[
    TagBox[\(\[SkeletonIndicator]  Graphics  \[SkeletonIndicator]\),
      False,
      Editable->False]], "Output"]
}, Open  ]],

Cell["Display the noise figure data.", "Text"],

Cell[CellGroupData[{

Cell[BoxData[
    \(BodePlot[
      Evaluate[NoiseFigure[f] /. spAT30511], {f, 5. \ 10\^8, 2.4\ 10\^9}, 
      PhaseDisplay \[Rule] None, MagnitudeDisplay \[Rule] Linear, 
      TraceNames \[Rule] "\<Noise figure\>"]\)], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .9 
%%ImageSize: 500 450 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.47619 0.521429 0.47619 [
[ 0 0 0 0 ]
[ 1 .9 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
% Start of sub-graphic
p
0.0238095 0.164286 0.97619 0.878571 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
-12.1374 1.39801 -1.10459 1.02041 [
[.44465 -0.0125 -17 -12.875 ]
[.44465 -0.0125 17 0 ]
[.69083 -0.0125 -17 -12.875 ]
[.69083 -0.0125 17 0 ]
[.86549 -0.0125 -17 -12.875 ]
[.86549 -0.0125 17 0 ]
[.5 -0.0125 -29 -25.75 ]
[.5 -0.0125 29 -12.875 ]
[-0.0125 .01786 -18 -4.5 ]
[-0.0125 .01786 0 4.5 ]
[-0.0125 .1199 -18 -4.5 ]
[-0.0125 .1199 0 4.5 ]
[-0.0125 .22194 -18 -4.5 ]
[-0.0125 .22194 0 4.5 ]
[-0.0125 .32398 -18 -4.5 ]
[-0.0125 .32398 0 4.5 ]
[-0.0125 .42602 -18 -4.5 ]
[-0.0125 .42602 0 4.5 ]
[-0.0125 .52806 -18 -4.5 ]
[-0.0125 .52806 0 4.5 ]
[-0.0125 .6301 -18 -4.5 ]
[-0.0125 .6301 0 4.5 ]
[-0.0125 .73214 -18 -4.5 ]
[-0.0125 .73214 0 4.5 ]
[-0.01875 .375 -30.875 -32 ]
[-0.01875 .375 -18 32 ]
[ -0.0025 -0.0025 0 0 ]
[ 1.0025 .7525 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 .5 r
.25 Mabswid
[ ] 0 setdash
.44465 0 m
.44465 .75 L
s
.69083 0 m
.69083 .75 L
s
.86549 0 m
.86549 .75 L
s
.50252 0 m
.50252 .75 L
s
.55535 0 m
.55535 .75 L
s
.60395 0 m
.60395 .75 L
s
.64894 0 m
.64894 .75 L
s
.73001 0 m
.73001 .75 L
s
.76682 0 m
.76682 .75 L
s
.80153 0 m
.80153 .75 L
s
.83435 0 m
.83435 .75 L
s
0 .1199 m
1 .1199 L
s
0 .22194 m
1 .22194 L
s
0 .32398 m
1 .32398 L
s
0 .42602 m
1 .42602 L
s
0 .52806 m
1 .52806 L
s
0 .6301 m
1 .6301 L
s
0 g
.44465 0 m
.44465 .00625 L
s
gsave
.44465 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.69083 0 m
.69083 .00625 L
s
gsave
.69083 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.5) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.86549 0 m
.86549 .00625 L
s
gsave
.86549 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(2.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.001 w
.50252 0 m
.50252 .00375 L
s
.55535 0 m
.55535 .00375 L
s
.60395 0 m
.60395 .00375 L
s
.64894 0 m
.64894 .00375 L
s
.73001 0 m
.73001 .00375 L
s
.76682 0 m
.76682 .00375 L
s
.80153 0 m
.80153 .00375 L
s
.83435 0 m
.83435 .00375 L
s
.005 w
0 0 m
1 0 L
s
gsave
.5 -0.0125 -90 -29.75 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Frequency) show
117.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
0 .01786 m
.00625 .01786 L
s
[(1.1)] -0.0125 .01786 1 0 Mshowa
0 .1199 m
.00625 .1199 L
s
[(1.2)] -0.0125 .1199 1 0 Mshowa
0 .22194 m
.00625 .22194 L
s
[(1.3)] -0.0125 .22194 1 0 Mshowa
0 .32398 m
.00625 .32398 L
s
[(1.4)] -0.0125 .32398 1 0 Mshowa
0 .42602 m
.00625 .42602 L
s
[(1.5)] -0.0125 .42602 1 0 Mshowa
0 .52806 m
.00625 .52806 L
s
[(1.6)] -0.0125 .52806 1 0 Mshowa
0 .6301 m
.00625 .6301 L
s
[(1.7)] -0.0125 .6301 1 0 Mshowa
0 .73214 m
.00625 .73214 L
s
[(1.8)] -0.0125 .73214 1 0 Mshowa
.125 Mabswid
0 .03827 m
.00375 .03827 L
s
0 .05867 m
.00375 .05867 L
s
0 .07908 m
.00375 .07908 L
s
0 .09949 m
.00375 .09949 L
s
0 .14031 m
.00375 .14031 L
s
0 .16071 m
.00375 .16071 L
s
0 .18112 m
.00375 .18112 L
s
0 .20153 m
.00375 .20153 L
s
0 .24235 m
.00375 .24235 L
s
0 .26276 m
.00375 .26276 L
s
0 .28316 m
.00375 .28316 L
s
0 .30357 m
.00375 .30357 L
s
0 .34439 m
.00375 .34439 L
s
0 .3648 m
.00375 .3648 L
s
0 .3852 m
.00375 .3852 L
s
0 .40561 m
.00375 .40561 L
s
0 .44643 m
.00375 .44643 L
s
0 .46684 m
.00375 .46684 L
s
0 .48724 m
.00375 .48724 L
s
0 .50765 m
.00375 .50765 L
s
0 .54847 m
.00375 .54847 L
s
0 .56888 m
.00375 .56888 L
s
0 .58929 m
.00375 .58929 L
s
0 .60969 m
.00375 .60969 L
s
0 .65051 m
.00375 .65051 L
s
0 .67092 m
.00375 .67092 L
s
0 .69133 m
.00375 .69133 L
s
0 .71173 m
.00375 .71173 L
s
.005 w
0 0 m
0 .75 L
s
gsave
-0.01875 .375 -117.438 -10.4375 Mabsadd m
1 1 Mabs scale
currentpoint translate
93 10.4375 translate
90 rotate
-93 -10.4375 translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Magnitude) show
123.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
.44465 .74375 m
.44465 .75 L
s
.69083 .74375 m
.69083 .75 L
s
.86549 .74375 m
.86549 .75 L
s
.001 w
.50252 .74625 m
.50252 .75 L
s
.55535 .74625 m
.55535 .75 L
s
.60395 .74625 m
.60395 .75 L
s
.64894 .74625 m
.64894 .75 L
s
.73001 .74625 m
.73001 .75 L
s
.76682 .74625 m
.76682 .75 L
s
.80153 .74625 m
.80153 .75 L
s
.83435 .74625 m
.83435 .75 L
s
.005 w
0 .75 m
1 .75 L
s
1 0 m
1 .75 L
s
0 0 m
1 0 L
1 .75 L
0 .75 L
closepath
clip
newpath
1 0 0 r
.02381 .01786 m
.06349 .02647 L
.10317 .03567 L
.14286 .04549 L
.18254 .05597 L
.22222 .06716 L
.2619 .0791 L
.30159 .09185 L
.34127 .10547 L
.38095 .12003 L
.42063 .14072 L
.46032 .1628 L
.5 .18638 L
.53968 .21154 L
.57937 .23841 L
.61905 .26709 L
.65873 .29771 L
.69841 .33039 L
.7381 .36529 L
.77778 .40254 L
.81746 .45044 L
.85714 .51412 L
.89683 .5821 L
.93651 .65467 L
.97619 .73214 L
s
MathSubEnd
P
% End of sub-graphic
0 g
.14286 .02143 m
.14286 .11667 L
.95238 .11667 L
.95238 .02143 L
F
1 g
.11905 .04524 m
.11905 .14048 L
.92857 .14048 L
.92857 .04524 L
F
0 g
.001 w
[ ] 0 setdash
.11905 .04524 m
.92857 .04524 L
.92857 .14048 L
.11905 .14048 L
.11905 .04524 L
s
% Start of sub-graphic
p
0.119048 0.0452381 0.928571 0.140476 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0735294 0.735294 0.00498504 0.0498504 [
[ 0 0 0 0 ]
[ 1 .11765 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .11765 L
0 .11765 L
closepath
clip
newpath
% Start of sub-graphic
p
0.132353 0.00897308 0.867647 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
1 0 0 r
.005 w
[ ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.5 .06281 -99 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Noise) show
99.000 13.000 moveto
(figure) show
135.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
MathSubEnd
P
% End of sub-graphic
0 0 m
1 0 L
1 .9 L
0 .9 L
closepath
clip
newpath
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{500, 450}],

Cell[BoxData[
    TagBox[\(\[SkeletonIndicator]  Graphics  \[SkeletonIndicator]\),
      False,
      Editable->False]], "Output"]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["ReadTouchstone Options", "Section"],

Cell[TextData[{
  StyleBox["ReadTouchstone", "MR"],
  " has these options."
}], "Text"],

Cell[CellGroupData[{

Cell[BoxData[
    \(Options[ReadTouchstone]\)], "Input"],

Cell[BoxData[
    \({InterpolationOrder \[Rule] 1, Ports \[Rule] 2, 
      ShowHeader \[Rule] False}\)], "Output"]
}, Open  ]],

Cell[TextData[{
  "The option ",
  StyleBox["InterpolationOrder", "MR"],
  " specifies the interpolation order to be used in the interpolating \
functions returned by ",
  StyleBox["ReadTouchstone", "MR"],
  ". ",
  StyleBox["Ports", "MR"],
  " specifies the number of ports of the device described in the Touchstone \
file. By default, the device is assumed to be a two-port. With the option ",
  StyleBox["ShowHeader", "MR"],
  ", you can turn on and off the display of file header lines."
}], "Text"],

Cell[CellGroupData[{

Cell[BoxData[
    \(spAT30511b = 
      ReadTouchstone["\<t305113b.s2p\>", InterpolationOrder \[Rule] 2, 
        ShowHeader \[Rule] True]\)], "Input"],

Cell[BoxData[
    InterpretationBox[GridBox[{
          {"\<\"---------- File Header ----------\"\>"},
          {"\<\"!AT-30511\"\>"},
          {"\<\"!S and NOISE PARAMETERS at Vce=2.7V  Ic=5mA.   LAST UPDATED \
04-10-94\"\>"},
          {"\<\"\"\>"},
          {"\<\"---------------------------------\"\>"}
          },
        GridBaseline->{Baseline, {1, 1}},
        ColumnAlignments->{Left}],
      ColumnForm[ {"---------- File Header ----------", "!AT-30511", 
        "!S and NOISE PARAMETERS at Vce=2.7V  Ic=5mA.   LAST UPDATED \
04-10-94", "", "---------------------------------"}],
      Editable->False]], "Print"],

Cell[BoxData[
    RowBox[{"{", 
      RowBox[{"{", 
        RowBox[{
          RowBox[{"\<\"S11\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S21\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S12\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S22\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^8, 5.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"NoiseFigure", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{5.`*^8, 2.4`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"SourceReflection", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{5.`*^8, 2.4`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"NoiseResistance", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{5.`*^8, 2.4`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", \(Type \[Rule] "S"\), 
          ",", \(ReferenceImpedance \[Rule] 50.`\)}], "}"}], "}"}]], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(SmithChart[
      spAT30511b, {"\<S11\>"[f], "\<S12\>"[f]}, {f, 1. \ 10\^8, 5. \ 10\^9}, 
      DataConversion \[Rule] False, GridResolution \[Rule] High]\)], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: 1.175 
%%ImageSize: 500 587.5 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.47619 0.670833 0.47619 [
[ 0 0 0 0 ]
[ 1 1.175 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
% Start of sub-graphic
p
0.0238095 0.194643 0.97619 1.14702 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.454545 0.5 0.454545 [
[ 0 0 0 0 ]
[ 1 1 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 1 L
0 1 L
closepath
clip
newpath
.7 g
.5 Mabswid
[ ] 0 setdash
newpath
.54132 .5 .41322 95.4526 264.547 arc
s
newpath
.57576 .5 .37879 43.6028 316.397 arc
s
newpath
.6049 .5 .34965 104.863 255.137 arc
s
newpath
.62987 .5 .32468 108.925 251.075 arc
s
newpath
.65152 .5 .30303 33.3985 326.602 arc
s
newpath
.67045 .5 .28409 115.989 244.011 arc
s
newpath
.70202 .5 .25253 121.891 238.109 arc
s
newpath
.74793 .5 .20661 95.4526 264.547 arc
s
newpath
.77273 .5 .18182 79.6111 280.389 arc
s
newpath
.80303 .5 .15152 33.3985 326.602 arc
s
newpath
.84091 .5 .11364 43.6028 316.397 arc
s
newpath
.87879 .5 .07576 0 360 arc
s
newpath
.91322 .5 .04132 0 360 arc
s
newpath
.9329 .5 .02165 0 360 arc
s
newpath
.95455 .45455 .04545 90 258.579 arc
s
newpath
.95455 .40909 .09091 116.785 247.38 arc
s
newpath
.95455 .34848 .15152 120.51 233.13 arc
s
newpath
.95455 .27273 .22727 126.87 216.87 arc
s
newpath
.95455 .12121 .37879 133.603 190.389 arc
s
newpath
.95455 .19697 .30303 131.112 202.62 arc
s
newpath
.95455 -0.00505 .50505 138.455 173.974 arc
s
newpath
.95455 -0.06818 .56818 133.603 167.32 arc
s
newpath
.95455 -0.14935 .64935 116.268 159.984 arc
s
newpath
.95455 -0.25758 .75758 123.398 151.928 arc
s
newpath
.95455 -0.40909 .90909 99.5273 143.13 arc
s
newpath
.95455 -0.63636 1.13636 112.62 133.603 arc
s
newpath
.95455 -1.01515 1.51515 107.062 123.398 arc
s
newpath
.95455 -1.77273 2.27273 95.7248 112.62 arc
s
newpath
.95455 -4.04545 4.54545 95.7248 101.421 arc
s
newpath
.95455 5.04545 4.54545 258.579 264.275 arc
s
newpath
.95455 2.77273 2.27273 247.38 264.275 arc
s
newpath
.95455 2.01515 1.51515 236.602 252.938 arc
s
newpath
.95455 1.63636 1.13636 226.397 247.38 arc
s
newpath
.95455 1.40909 .90909 216.87 260.473 arc
s
newpath
.95455 1.25758 .75758 208.072 236.602 arc
s
newpath
.95455 1.14935 .64935 200.016 243.732 arc
s
newpath
.95455 1.06818 .56818 192.68 226.397 arc
s
newpath
.95455 1.00505 .50505 186.026 221.545 arc
s
newpath
.95455 .87879 .37879 169.611 226.397 arc
s
newpath
.95455 .80303 .30303 157.38 228.888 arc
s
newpath
.95455 .72727 .22727 143.13 233.13 arc
s
newpath
.95455 .65152 .15152 126.87 239.49 arc
s
newpath
.95455 .59091 .09091 112.62 243.215 arc
s
newpath
.95455 .54545 .04545 101.421 270 arc
s
.5 g
.004 w
newpath
.5 .5 .45455 0 360 arc
s
newpath
.72727 .5 .22727 0 360 arc
s
newpath
.95455 .04545 .45455 100.389 180 arc
s
.04545 .5 m
.95455 .5 L
s
newpath
.95455 .95455 .45455 180 259.611 arc
s
1 g
.5 .5 m
.5 .5 .00909 0 365.73 arc
F
.5 g
newpath
.5 .5 .00909 0 365.73 arc
s
0 g
[(0.1)] .15083 .48636 0 0 Mshowa
[(0.2)] .2197 .48636 0 0 Mshowa
[(0.3)] .27797 .48636 0 0 Mshowa
[(0.4)] .32792 .48636 0 0 Mshowa
[(0.5)] .37121 .48636 0 0 Mshowa
[(0.6)] .40909 .48636 0 0 Mshowa
[(0.8)] .47222 .48636 0 0 Mshowa
[(1.2)] .56405 .48636 0 0 Mshowa
[(1.5)] .61364 .48636 0 0 Mshowa
[(2.)] .67424 .48636 0 0 Mshowa
[(3.)] .75 .48636 0 0 Mshowa
[(5.)] .82576 .48636 0 0 Mshowa
[(10.)] .89463 .48636 0 0 Mshowa
[(20.)] .93398 .48636 0 0 Mshowa
[(-10.)] .96782 .40549 0 0 Mshowa
[(-5.)] .94056 .31643 0 0 Mshowa
[(-3.)] .88182 .21364 0 0 Mshowa
[(-2.)] .78636 .11818 0 0 Mshowa
[(-1.2)] .58607 .03055 0 0 Mshowa
[(-1.5)] .68357 .05944 0 0 Mshowa
[(-0.9)] .4499 .02536 0 0 Mshowa
[(-0.8)] .39523 .03437 0 0 Mshowa
[(-0.7)] .33664 .05156 0 0 Mshowa
[(-0.6)] .2754 .07888 0 0 Mshowa
[(-0.5)] .21364 .11818 0 0 Mshowa
[(-0.4)] .15439 .17085 0 0 Mshowa
[(-0.3)] .10154 .23728 0 0 Mshowa
[(-0.2)] .05944 .31643 0 0 Mshowa
[(-0.1)] .03218 .40549 0 0 Mshowa
[(0.1)] .03218 .59451 0 0 Mshowa
[(0.2)] .05944 .68357 0 0 Mshowa
[(0.3)] .10154 .76272 0 0 Mshowa
[(0.4)] .15439 .82915 0 0 Mshowa
[(0.5)] .21364 .88182 0 0 Mshowa
[(0.6)] .2754 .92112 0 0 Mshowa
[(0.7)] .33664 .94844 0 0 Mshowa
[(0.8)] .39523 .96563 0 0 Mshowa
[(0.9)] .4499 .97464 0 0 Mshowa
[(1.2)] .58607 .96945 0 0 Mshowa
[(1.5)] .68357 .94056 0 0 Mshowa
[(2.)] .78636 .88182 0 0 Mshowa
[(3.)] .88182 .78636 0 0 Mshowa
[(5.)] .94056 .68357 0 0 Mshowa
[(10.)] .96782 .59451 0 0 Mshowa
[(0.)] .06818 .48636 0 0 Mshowa
[(1.)] .52273 .48636 0 0 Mshowa
[(-1.)] .5 .02273 0 0 Mshowa
[(0.)] .02273 .5 0 0 Mshowa
[(1.)] .5 .97727 0 0 Mshowa
1 0 0 r
.005 w
.89265 .42368 m
.88394 .41268 L
.87378 .4002 L
.86194 .38616 L
.84818 .37052 L
.83222 .35334 L
.81377 .33483 L
.7925 .31541 L
.7681 .29583 L
.74026 .27733 L
.70801 .26403 L
.66804 .26858 L
.62694 .27475 L
.58681 .28313 L
.55101 .29456 L
.51862 .3124 L
.49001 .34095 L
.46983 .37719 L
.45594 .40662 L
.44706 .43665 L
.44209 .46849 L
.44154 .49576 L
.44477 .52652 L
.45459 .5586 L
.47369 .59176 L
s
.02 w
.89265 .42368 Mdot
0 .8 0 r
.005 w
[ .03 .02 ] 0 setdash
.50055 .50451 m
.50095 .50523 L
.5014 .50605 L
.50192 .50698 L
.50252 .50804 L
.50321 .50922 L
.504 .51052 L
.50488 .51194 L
.50586 .51346 L
.50695 .51501 L
.50791 .5162 L
.50778 .51546 L
.50852 .51567 L
.51066 .51743 L
.51491 .52159 L
.51899 .52564 L
.52033 .5268 L
.52008 .52619 L
.52345 .52996 L
.52759 .53437 L
.53154 .53652 L
.53731 .54109 L
.54408 .54509 L
.55247 .54864 L
.56358 .55149 L
s
.02 w
.50055 .50451 Mdot
MathSubEnd
P
% End of sub-graphic
0 g
.14286 .02798 m
.14286 .12321 L
.95238 .12321 L
.95238 .02798 L
F
1 g
.11905 .05179 m
.11905 .14702 L
.92857 .14702 L
.92857 .05179 L
F
0 g
.001 w
[ ] 0 setdash
.11905 .05179 m
.92857 .05179 L
.92857 .14702 L
.11905 .14702 L
.11905 .05179 L
s
% Start of sub-graphic
p
0.119048 0.0517857 0.928571 0.147024 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0396825 0.396825 0.00498504 0.0498504 [
[ 0 0 0 0 ]
[ 1 .11765 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .11765 L
0 .11765 L
closepath
clip
newpath
% Start of sub-graphic
p
0.0714286 0.00897308 0.468254 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
1 0 0 r
.005 w
[ ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.26984 .06281 -81 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(S11) show
81.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
81.000 13.000 moveto
(@) show
87.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(f) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
93.000 13.000 moveto
(D) show
1.000 setlinewidth
grestore
% Start of sub-graphic
p
0.531746 0.00897308 0.928571 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
0 .8 0 r
.005 w
[ .03 .02 ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.73016 .06281 -81 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(S12) show
81.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
81.000 13.000 moveto
(@) show
87.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(f) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
93.000 13.000 moveto
(D) show
1.000 setlinewidth
grestore
MathSubEnd
P
% End of sub-graphic
0 0 m
1 0 L
1 1.175 L
0 1.175 L
closepath
clip
newpath
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{500, 587.5}],

Cell[BoxData[
    TagBox[\(\[SkeletonIndicator]  Graphics  \[SkeletonIndicator]\),
      False,
      Editable->False]], "Output"]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["Another Example", "Section"],

Cell[CellGroupData[{

Cell[BoxData[
    \(spHMC287MS8 = 
      ReadTouchstone["\<HMC287MS8_02.s2p\>", 
        ShowHeader \[Rule] True]\)], "Input"],

Cell[BoxData[
    InterpretationBox[GridBox[{
          {"\<\"---------- File Header ----------\"\>"},
          {"\<\"!Hittite Microwave Corporation\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"!12 Elizabeth Drive\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"!Chelmsford, MA 01824\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"!Tel: 978-250-3343\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"!Fax: 978-250-3373\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"!Device: HMC287MS8, 2.3-2.5 GHz LNA with AGC in 8-lead \
Grounded Base surface Mount Plastic Package\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"!Misc: Vdd = +3V Idd = 9.6 mA Vctl = \
0.2V.\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"!\\t\\t\\t\\t\\t\\t\\t\\t\\t\\t\\t\\t\\t\"\>"},
          {"\<\"---------------------------------\"\>"}
          },
        GridBaseline->{Baseline, {1, 1}},
        ColumnAlignments->{Left}],
      ColumnForm[ {"---------- File Header ----------", 
        "!Hittite Microwave Corporation\t\t\t\t\t\t\t\t", 
        "!12 Elizabeth Drive\t\t\t\t\t\t\t\t", 
        "!Chelmsford, MA 01824\t\t\t\t\t\t\t\t", 
        "!Tel: 978-250-3343\t\t\t\t\t\t\t\t", 
        "!Fax: 978-250-3373\t\t\t\t\t\t\t\t", 
        "!Device: HMC287MS8, 2.3-2.5 GHz LNA with AGC in 8-lead Grounded Base \
surface Mount Plastic Package\t\t\t\t\t\t\t\t", 
        "!Misc: Vdd = +3V Idd = 9.6 mA Vctl = 0.2V.\t\t\t\t\t\t\t\t", 
        "!\t\t\t\t\t\t\t\t\t\t\t\t\t", "---------------------------------"}],
      Editable->False]], "Print"],

Cell[BoxData[
    RowBox[{"{", 
      RowBox[{"{", 
        RowBox[{
          RowBox[{"\<\"S11\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^9, 6.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S21\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^9, 6.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S12\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^9, 6.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", 
          RowBox[{"\<\"S22\"\>", "\[Rule]", 
            TagBox[\(InterpolatingFunction[{{1.`*^9, 6.`*^9}}, "<>"]\),
              False,
              Editable->False]}], ",", \(Type \[Rule] "S"\), 
          ",", \(ReferenceImpedance \[Rule] 50.`\)}], "}"}], "}"}]], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(BodePlot[
      Evaluate["\<S21\>"[f] /. spHMC287MS8], {f, 1. \ 10\^9, 6. \ 10\^9}, 
      PlotPoints \[Rule] 100]\)], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .75 
%%ImageSize: 500 375 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0178571 0.714286 [
[ 0 0 0 0 ]
[ 1 .75 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .75 L
0 .75 L
closepath
clip
newpath
% Start of sub-graphic
p
0.0238095 0.392857 0.97619 0.732143 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
-10.9913 1.2239 0.00678571 0.0115264 [
[.02381 -0.0125 -17 -12.875 ]
[.02381 -0.0125 17 0 ]
[.23933 -0.0125 -17 -12.875 ]
[.23933 -0.0125 17 0 ]
[.39224 -0.0125 -17 -12.875 ]
[.39224 -0.0125 17 0 ]
[.60776 -0.0125 -17 -12.875 ]
[.60776 -0.0125 17 0 ]
[.87928 -0.0125 -17 -12.875 ]
[.87928 -0.0125 17 0 ]
[.5 -0.0125 -29 -25.75 ]
[.5 -0.0125 29 -12.875 ]
[-0.0125 .00679 -6 -4.5 ]
[-0.0125 .00679 0 4.5 ]
[-0.0125 .06442 -6 -4.5 ]
[-0.0125 .06442 0 4.5 ]
[-0.0125 .12205 -12 -4.5 ]
[-0.0125 .12205 0 4.5 ]
[-0.0125 .17968 -12 -4.5 ]
[-0.0125 .17968 0 4.5 ]
[-0.0125 .23731 -12 -4.5 ]
[-0.0125 .23731 0 4.5 ]
[-0.01875 .1425 -24.875 -44 ]
[-0.01875 .1425 -12 44 ]
[ -0.0025 -0.0025 0 0 ]
[ 1.0025 .2875 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 .5 r
.25 Mabswid
[ ] 0 setdash
.02381 0 m
.02381 .285 L
s
.23933 0 m
.23933 .285 L
s
.39224 0 m
.39224 .285 L
s
.60776 0 m
.60776 .285 L
s
.87928 0 m
.87928 .285 L
s
.07447 0 m
.07447 .285 L
s
.12072 0 m
.12072 .285 L
s
.16327 0 m
.16327 .285 L
s
.20266 0 m
.20266 .285 L
s
.27363 0 m
.27363 .285 L
s
.30586 0 m
.30586 .285 L
s
.33624 0 m
.33624 .285 L
s
.36498 0 m
.36498 .285 L
s
.76067 0 m
.76067 .285 L
s
.97619 0 m
.97619 .285 L
s
0 .06442 m
1 .06442 L
s
0 .12205 m
1 .12205 L
s
0 .17968 m
1 .17968 L
s
0 .23731 m
1 .23731 L
s
0 g
.02381 0 m
.02381 .00625 L
s
gsave
.02381 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.23933 0 m
.23933 .00625 L
s
gsave
.23933 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.5) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.39224 0 m
.39224 .00625 L
s
gsave
.39224 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(2.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.60776 0 m
.60776 .00625 L
s
gsave
.60776 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(3.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.87928 0 m
.87928 .00625 L
s
gsave
.87928 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(5.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.001 w
.07447 0 m
.07447 .00375 L
s
.12072 0 m
.12072 .00375 L
s
.16327 0 m
.16327 .00375 L
s
.20266 0 m
.20266 .00375 L
s
.27363 0 m
.27363 .00375 L
s
.30586 0 m
.30586 .00375 L
s
.33624 0 m
.33624 .00375 L
s
.36498 0 m
.36498 .00375 L
s
.76067 0 m
.76067 .00375 L
s
.97619 0 m
.97619 .00375 L
s
.005 w
0 0 m
1 0 L
s
gsave
.5 -0.0125 -90 -29.75 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Frequency) show
117.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
0 .00679 m
.00625 .00679 L
s
[(0)] -0.0125 .00679 1 0 Mshowa
0 .06442 m
.00625 .06442 L
s
[(5)] -0.0125 .06442 1 0 Mshowa
0 .12205 m
.00625 .12205 L
s
[(10)] -0.0125 .12205 1 0 Mshowa
0 .17968 m
.00625 .17968 L
s
[(15)] -0.0125 .17968 1 0 Mshowa
0 .23731 m
.00625 .23731 L
s
[(20)] -0.0125 .23731 1 0 Mshowa
.125 Mabswid
0 .01831 m
.00375 .01831 L
s
0 .02984 m
.00375 .02984 L
s
0 .04136 m
.00375 .04136 L
s
0 .05289 m
.00375 .05289 L
s
0 .07594 m
.00375 .07594 L
s
0 .08747 m
.00375 .08747 L
s
0 .099 m
.00375 .099 L
s
0 .11052 m
.00375 .11052 L
s
0 .13358 m
.00375 .13358 L
s
0 .1451 m
.00375 .1451 L
s
0 .15663 m
.00375 .15663 L
s
0 .16816 m
.00375 .16816 L
s
0 .19121 m
.00375 .19121 L
s
0 .20273 m
.00375 .20273 L
s
0 .21426 m
.00375 .21426 L
s
0 .22579 m
.00375 .22579 L
s
0 .24884 m
.00375 .24884 L
s
0 .26037 m
.00375 .26037 L
s
0 .27189 m
.00375 .27189 L
s
0 .28342 m
.00375 .28342 L
s
.005 w
0 0 m
0 .285 L
s
gsave
-0.01875 .1425 -123.438 -10.4375 Mabsadd m
1 1 Mabs scale
currentpoint translate
105 10.4375 translate
90 rotate
-105 -10.4375 translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Magnitude) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
123.000 13.000 moveto
(H) show
129.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(dB) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
141.000 13.000 moveto
(L) show
147.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
.02381 .27875 m
.02381 .285 L
s
.23933 .27875 m
.23933 .285 L
s
.39224 .27875 m
.39224 .285 L
s
.60776 .27875 m
.60776 .285 L
s
.87928 .27875 m
.87928 .285 L
s
.001 w
.07447 .28125 m
.07447 .285 L
s
.12072 .28125 m
.12072 .285 L
s
.16327 .28125 m
.16327 .285 L
s
.20266 .28125 m
.20266 .285 L
s
.27363 .28125 m
.27363 .285 L
s
.30586 .28125 m
.30586 .285 L
s
.33624 .28125 m
.33624 .285 L
s
.36498 .28125 m
.36498 .285 L
s
.76067 .28125 m
.76067 .285 L
s
.97619 .28125 m
.97619 .285 L
s
.005 w
0 .285 m
1 .285 L
s
1 0 m
1 .285 L
s
0 0 m
1 0 L
1 .285 L
0 .285 L
closepath
clip
newpath
1 0 0 r
.02381 .00932 m
.03343 .01648 L
.04305 .0229 L
.05267 .02922 L
.06229 .03609 L
.07191 .04275 L
.08153 .04964 L
.09115 .05647 L
.10077 .06325 L
.11039 .0701 L
.12001 .07684 L
.12963 .08409 L
.13925 .09109 L
.14887 .09803 L
.15849 .105 L
.16811 .112 L
.17773 .11906 L
.18735 .12606 L
.19697 .13312 L
.20659 .14019 L
.21621 .14689 L
.22583 .15372 L
.23545 .16068 L
.24507 .1676 L
.25469 .1744 L
.26431 .18088 L
.27393 .1875 L
.28355 .19431 L
.29317 .20099 L
.30279 .20755 L
.31241 .2142 L
.32203 .22031 L
.33165 .22694 L
.34127 .23301 L
.35089 .23921 L
.36051 .24529 L
.37013 .25136 L
.37975 .25694 L
.38937 .2617 L
.39899 .26698 L
.40861 .27074 L
.41823 .27455 L
.42785 .27654 L
.43747 .27811 L
.44709 .27821 L
.45671 .27681 L
.46633 .27446 L
.47595 .27074 L
.48557 .26592 L
.49519 .26076 L
Mistroke
.50481 .25514 L
.51443 .24858 L
.52405 .24241 L
.53367 .23569 L
.54329 .22829 L
.55291 .22237 L
.56253 .21588 L
.57215 .20971 L
.58177 .20405 L
.59139 .19808 L
.60101 .19239 L
.61063 .18683 L
.62025 .18153 L
.62987 .17678 L
.63949 .17155 L
.64911 .16707 L
.65873 .16235 L
.66835 .15797 L
.67797 .15361 L
.68759 .1494 L
.69721 .14523 L
.70683 .14081 L
.71645 .13669 L
.72607 .13266 L
.73569 .12825 L
.74531 .12408 L
.75493 .11958 L
.76455 .11511 L
.77417 .11066 L
.78379 .10634 L
.79341 .10155 L
.80303 .09684 L
.81265 .09207 L
.82227 .08771 L
.83189 .0843 L
.84151 .08171 L
.85113 .07899 L
.86075 .07493 L
.87037 .0702 L
.87999 .06485 L
.88961 .05969 L
.89923 .05453 L
.90885 .04918 L
.91847 .04346 L
.92809 .03761 L
.93771 .03196 L
.94733 .02645 L
.95695 .02042 L
.96657 .01474 L
.97619 .00932 L
Mistroke
Mfstroke
MathSubEnd
P
% End of sub-graphic
% Start of sub-graphic
p
0.0238095 0.0178571 0.97619 0.357143 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
-10.9913 1.2239 0.410872 0.000578887 [
[.02381 -0.0125 -17 -12.875 ]
[.02381 -0.0125 17 0 ]
[.23933 -0.0125 -17 -12.875 ]
[.23933 -0.0125 17 0 ]
[.39224 -0.0125 -17 -12.875 ]
[.39224 -0.0125 17 0 ]
[.60776 -0.0125 -17 -12.875 ]
[.60776 -0.0125 17 0 ]
[.87928 -0.0125 -17 -12.875 ]
[.87928 -0.0125 17 0 ]
[.5 -0.0125 -29 -25.75 ]
[.5 -0.0125 29 -12.875 ]
[-0.0125 .00565 -24 -4.5 ]
[-0.0125 .00565 0 4.5 ]
[-0.0125 .06354 -24 -4.5 ]
[-0.0125 .06354 0 4.5 ]
[-0.0125 .12143 -24 -4.5 ]
[-0.0125 .12143 0 4.5 ]
[-0.0125 .17932 -24 -4.5 ]
[-0.0125 .17932 0 4.5 ]
[-0.0125 .23721 -24 -4.5 ]
[-0.0125 .23721 0 4.5 ]
[-0.01875 .1425 -36.875 -35 ]
[-0.01875 .1425 -24 35 ]
[ -0.0025 -0.0025 0 0 ]
[ 1.0025 .2875 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 .5 r
.25 Mabswid
[ ] 0 setdash
.02381 0 m
.02381 .285 L
s
.23933 0 m
.23933 .285 L
s
.39224 0 m
.39224 .285 L
s
.60776 0 m
.60776 .285 L
s
.87928 0 m
.87928 .285 L
s
.07447 0 m
.07447 .285 L
s
.12072 0 m
.12072 .285 L
s
.16327 0 m
.16327 .285 L
s
.20266 0 m
.20266 .285 L
s
.27363 0 m
.27363 .285 L
s
.30586 0 m
.30586 .285 L
s
.33624 0 m
.33624 .285 L
s
.36498 0 m
.36498 .285 L
s
.76067 0 m
.76067 .285 L
s
.97619 0 m
.97619 .285 L
s
0 .06354 m
1 .06354 L
s
0 .12143 m
1 .12143 L
s
0 .17932 m
1 .17932 L
s
0 .23721 m
1 .23721 L
s
0 g
.02381 0 m
.02381 .00625 L
s
gsave
.02381 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.23933 0 m
.23933 .00625 L
s
gsave
.23933 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(1.5) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.39224 0 m
.39224 .00625 L
s
gsave
.39224 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(2.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.60776 0 m
.60776 .00625 L
s
gsave
.60776 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(3.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.87928 0 m
.87928 .00625 L
s
gsave
.87928 -0.0125 -78 -16.875 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(5.0) show
81.000 13.000 moveto
(E9) show
93.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.001 w
.07447 0 m
.07447 .00375 L
s
.12072 0 m
.12072 .00375 L
s
.16327 0 m
.16327 .00375 L
s
.20266 0 m
.20266 .00375 L
s
.27363 0 m
.27363 .00375 L
s
.30586 0 m
.30586 .00375 L
s
.33624 0 m
.33624 .00375 L
s
.36498 0 m
.36498 .00375 L
s
.76067 0 m
.76067 .00375 L
s
.97619 0 m
.97619 .00375 L
s
.005 w
0 0 m
1 0 L
s
gsave
.5 -0.0125 -90 -29.75 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Frequency) show
117.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
0 .00565 m
.00625 .00565 L
s
[(-700)] -0.0125 .00565 1 0 Mshowa
0 .06354 m
.00625 .06354 L
s
[(-600)] -0.0125 .06354 1 0 Mshowa
0 .12143 m
.00625 .12143 L
s
[(-500)] -0.0125 .12143 1 0 Mshowa
0 .17932 m
.00625 .17932 L
s
[(-400)] -0.0125 .17932 1 0 Mshowa
0 .23721 m
.00625 .23721 L
s
[(-300)] -0.0125 .23721 1 0 Mshowa
.125 Mabswid
0 .01723 m
.00375 .01723 L
s
0 .02881 m
.00375 .02881 L
s
0 .04038 m
.00375 .04038 L
s
0 .05196 m
.00375 .05196 L
s
0 .07512 m
.00375 .07512 L
s
0 .0867 m
.00375 .0867 L
s
0 .09827 m
.00375 .09827 L
s
0 .10985 m
.00375 .10985 L
s
0 .13301 m
.00375 .13301 L
s
0 .14458 m
.00375 .14458 L
s
0 .15616 m
.00375 .15616 L
s
0 .16774 m
.00375 .16774 L
s
0 .19089 m
.00375 .19089 L
s
0 .20247 m
.00375 .20247 L
s
0 .21405 m
.00375 .21405 L
s
0 .22563 m
.00375 .22563 L
s
0 .24878 m
.00375 .24878 L
s
0 .26036 m
.00375 .26036 L
s
0 .27194 m
.00375 .27194 L
s
0 .28352 m
.00375 .28352 L
s
.005 w
0 0 m
0 .285 L
s
gsave
-0.01875 .1425 -126.438 -10.4375 Mabsadd m
1 1 Mabs scale
currentpoint translate
96 10.4375 translate
90 rotate
-96 -10.4375 translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(Phase) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
99.000 13.000 moveto
(H) show
105.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(deg) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
123.000 13.000 moveto
(L) show
129.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
1.000 setlinewidth
grestore
.25 Mabswid
.02381 .27875 m
.02381 .285 L
s
.23933 .27875 m
.23933 .285 L
s
.39224 .27875 m
.39224 .285 L
s
.60776 .27875 m
.60776 .285 L
s
.87928 .27875 m
.87928 .285 L
s
.001 w
.07447 .28125 m
.07447 .285 L
s
.12072 .28125 m
.12072 .285 L
s
.16327 .28125 m
.16327 .285 L
s
.20266 .28125 m
.20266 .285 L
s
.27363 .28125 m
.27363 .285 L
s
.30586 .28125 m
.30586 .285 L
s
.33624 .28125 m
.33624 .285 L
s
.36498 .28125 m
.36498 .285 L
s
.76067 .28125 m
.76067 .285 L
s
.97619 .28125 m
.97619 .285 L
s
.005 w
0 .285 m
1 .285 L
s
1 0 m
1 .285 L
s
0 0 m
1 0 L
1 .285 L
0 .285 L
closepath
clip
newpath
1 0 0 r
.02381 .27821 m
.03343 .27759 L
.04305 .27689 L
.05267 .27618 L
.06229 .27557 L
.07191 .27465 L
.08153 .27375 L
.09115 .27269 L
.10077 .27152 L
.11039 .2705 L
.12001 .26931 L
.12963 .26781 L
.13925 .26641 L
.14887 .26493 L
.15849 .26336 L
.16811 .26176 L
.17773 .26005 L
.18735 .25825 L
.19697 .25636 L
.20659 .25435 L
.21621 .25234 L
.22583 .2502 L
.23545 .24792 L
.24507 .24555 L
.25469 .24318 L
.26431 .24061 L
.27393 .23803 L
.28355 .23531 L
.29317 .23252 L
.30279 .22966 L
.31241 .22663 L
.32203 .2235 L
.33165 .22014 L
.34127 .21677 L
.35089 .21313 L
.36051 .20933 L
.37013 .20534 L
.37975 .20119 L
.38937 .19669 L
.39899 .19205 L
.40861 .18719 L
.41823 .18198 L
.42785 .1767 L
.43747 .17121 L
.44709 .16548 L
.45671 .15992 L
.46633 .15442 L
.47595 .14907 L
.48557 .14392 L
.49519 .13916 L
Mistroke
.50481 .13463 L
.51443 .13037 L
.52405 .12651 L
.53367 .1226 L
.54329 .11923 L
.55291 .11613 L
.56253 .11302 L
.57215 .11022 L
.58177 .10738 L
.59139 .10468 L
.60101 .10211 L
.61063 .09955 L
.62025 .09718 L
.62987 .09464 L
.63949 .09233 L
.64911 .09 L
.65873 .08764 L
.66835 .08531 L
.67797 .08294 L
.68759 .08061 L
.69721 .07817 L
.70683 .07594 L
.71645 .07348 L
.72607 .07109 L
.73569 .06866 L
.74531 .06629 L
.75493 .06387 L
.76455 .06147 L
.77417 .05911 L
.78379 .05682 L
.79341 .05452 L
.80303 .05218 L
.81265 .04995 L
.82227 .04793 L
.83189 .04596 L
.84151 .04365 L
.85113 .04085 L
.86075 .03798 L
.87037 .0351 L
.87999 .0323 L
.88961 .02948 L
.89923 .02685 L
.90885 .02422 L
.91847 .02166 L
.92809 .01912 L
.93771 .0165 L
.94733 .01402 L
.95695 .01155 L
.96657 .00919 L
.97619 .00679 L
Mistroke
Mfstroke
MathSubEnd
P
% End of sub-graphic
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{500, 375}],

Cell[BoxData[
    TagBox[\(\[SkeletonIndicator]  Graphics  \[SkeletonIndicator]\),
      False,
      Editable->False]], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(SmithChart[
      spHMC287MS8, {"\<S11\>"[f], "\<S11\>"[f], "\<S22\>"[f]}, {f, 
        1. \ 10\^9, 6. \ 10\^9}, PlotPoints \[Rule] 100, 
      DataConversion \[Rule] False, GridResolution \[Rule] High]\)], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: 1.175 
%%ImageSize: 500 587.5 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.47619 0.670833 0.47619 [
[ 0 0 0 0 ]
[ 1 1.175 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
% Start of sub-graphic
p
0.0238095 0.194643 0.97619 1.14702 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.454545 0.5 0.454545 [
[ 0 0 0 0 ]
[ 1 1 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 1 L
0 1 L
closepath
clip
newpath
.7 g
.5 Mabswid
[ ] 0 setdash
newpath
.54132 .5 .41322 95.4526 264.547 arc
s
newpath
.57576 .5 .37879 43.6028 316.397 arc
s
newpath
.6049 .5 .34965 104.863 255.137 arc
s
newpath
.62987 .5 .32468 108.925 251.075 arc
s
newpath
.65152 .5 .30303 33.3985 326.602 arc
s
newpath
.67045 .5 .28409 115.989 244.011 arc
s
newpath
.70202 .5 .25253 121.891 238.109 arc
s
newpath
.74793 .5 .20661 95.4526 264.547 arc
s
newpath
.77273 .5 .18182 79.6111 280.389 arc
s
newpath
.80303 .5 .15152 33.3985 326.602 arc
s
newpath
.84091 .5 .11364 43.6028 316.397 arc
s
newpath
.87879 .5 .07576 0 360 arc
s
newpath
.91322 .5 .04132 0 360 arc
s
newpath
.9329 .5 .02165 0 360 arc
s
newpath
.95455 .45455 .04545 90 258.579 arc
s
newpath
.95455 .40909 .09091 116.785 247.38 arc
s
newpath
.95455 .34848 .15152 120.51 233.13 arc
s
newpath
.95455 .27273 .22727 126.87 216.87 arc
s
newpath
.95455 .12121 .37879 133.603 190.389 arc
s
newpath
.95455 .19697 .30303 131.112 202.62 arc
s
newpath
.95455 -0.00505 .50505 138.455 173.974 arc
s
newpath
.95455 -0.06818 .56818 133.603 167.32 arc
s
newpath
.95455 -0.14935 .64935 116.268 159.984 arc
s
newpath
.95455 -0.25758 .75758 123.398 151.928 arc
s
newpath
.95455 -0.40909 .90909 99.5273 143.13 arc
s
newpath
.95455 -0.63636 1.13636 112.62 133.603 arc
s
newpath
.95455 -1.01515 1.51515 107.062 123.398 arc
s
newpath
.95455 -1.77273 2.27273 95.7248 112.62 arc
s
newpath
.95455 -4.04545 4.54545 95.7248 101.421 arc
s
newpath
.95455 5.04545 4.54545 258.579 264.275 arc
s
newpath
.95455 2.77273 2.27273 247.38 264.275 arc
s
newpath
.95455 2.01515 1.51515 236.602 252.938 arc
s
newpath
.95455 1.63636 1.13636 226.397 247.38 arc
s
newpath
.95455 1.40909 .90909 216.87 260.473 arc
s
newpath
.95455 1.25758 .75758 208.072 236.602 arc
s
newpath
.95455 1.14935 .64935 200.016 243.732 arc
s
newpath
.95455 1.06818 .56818 192.68 226.397 arc
s
newpath
.95455 1.00505 .50505 186.026 221.545 arc
s
newpath
.95455 .87879 .37879 169.611 226.397 arc
s
newpath
.95455 .80303 .30303 157.38 228.888 arc
s
newpath
.95455 .72727 .22727 143.13 233.13 arc
s
newpath
.95455 .65152 .15152 126.87 239.49 arc
s
newpath
.95455 .59091 .09091 112.62 243.215 arc
s
newpath
.95455 .54545 .04545 101.421 270 arc
s
.5 g
.004 w
newpath
.5 .5 .45455 0 360 arc
s
newpath
.72727 .5 .22727 0 360 arc
s
newpath
.95455 .04545 .45455 100.389 180 arc
s
.04545 .5 m
.95455 .5 L
s
newpath
.95455 .95455 .45455 180 259.611 arc
s
1 g
.5 .5 m
.5 .5 .00909 0 365.73 arc
F
.5 g
newpath
.5 .5 .00909 0 365.73 arc
s
0 g
[(0.1)] .15083 .48636 0 0 Mshowa
[(0.2)] .2197 .48636 0 0 Mshowa
[(0.3)] .27797 .48636 0 0 Mshowa
[(0.4)] .32792 .48636 0 0 Mshowa
[(0.5)] .37121 .48636 0 0 Mshowa
[(0.6)] .40909 .48636 0 0 Mshowa
[(0.8)] .47222 .48636 0 0 Mshowa
[(1.2)] .56405 .48636 0 0 Mshowa
[(1.5)] .61364 .48636 0 0 Mshowa
[(2.)] .67424 .48636 0 0 Mshowa
[(3.)] .75 .48636 0 0 Mshowa
[(5.)] .82576 .48636 0 0 Mshowa
[(10.)] .89463 .48636 0 0 Mshowa
[(20.)] .93398 .48636 0 0 Mshowa
[(-10.)] .96782 .40549 0 0 Mshowa
[(-5.)] .94056 .31643 0 0 Mshowa
[(-3.)] .88182 .21364 0 0 Mshowa
[(-2.)] .78636 .11818 0 0 Mshowa
[(-1.2)] .58607 .03055 0 0 Mshowa
[(-1.5)] .68357 .05944 0 0 Mshowa
[(-0.9)] .4499 .02536 0 0 Mshowa
[(-0.8)] .39523 .03437 0 0 Mshowa
[(-0.7)] .33664 .05156 0 0 Mshowa
[(-0.6)] .2754 .07888 0 0 Mshowa
[(-0.5)] .21364 .11818 0 0 Mshowa
[(-0.4)] .15439 .17085 0 0 Mshowa
[(-0.3)] .10154 .23728 0 0 Mshowa
[(-0.2)] .05944 .31643 0 0 Mshowa
[(-0.1)] .03218 .40549 0 0 Mshowa
[(0.1)] .03218 .59451 0 0 Mshowa
[(0.2)] .05944 .68357 0 0 Mshowa
[(0.3)] .10154 .76272 0 0 Mshowa
[(0.4)] .15439 .82915 0 0 Mshowa
[(0.5)] .21364 .88182 0 0 Mshowa
[(0.6)] .2754 .92112 0 0 Mshowa
[(0.7)] .33664 .94844 0 0 Mshowa
[(0.8)] .39523 .96563 0 0 Mshowa
[(0.9)] .4499 .97464 0 0 Mshowa
[(1.2)] .58607 .96945 0 0 Mshowa
[(1.5)] .68357 .94056 0 0 Mshowa
[(2.)] .78636 .88182 0 0 Mshowa
[(3.)] .88182 .78636 0 0 Mshowa
[(5.)] .94056 .68357 0 0 Mshowa
[(10.)] .96782 .59451 0 0 Mshowa
[(0.)] .06818 .48636 0 0 Mshowa
[(1.)] .52273 .48636 0 0 Mshowa
[(-1.)] .5 .02273 0 0 Mshowa
[(0.)] .02273 .5 0 0 Mshowa
[(1.)] .5 .97727 0 0 Mshowa
1 0 0 r
.005 w
.85052 .27333 m
.84643 .2703 L
.84266 .26786 L
.83942 .26534 L
.83698 .26184 L
.83506 .2598 L
.8321 .25637 L
.82834 .25323 L
.82448 .25048 L
.82148 .24674 L
.81879 .24464 L
.81427 .24339 L
.81099 .24141 L
.80842 .23922 L
.80504 .23594 L
.8009 .23156 L
.79703 .22816 L
.79323 .2255 L
.78847 .22171 L
.78439 .21842 L
.78075 .21472 L
.77608 .21022 L
.77138 .20657 L
.76616 .20183 L
.76114 .19654 L
.75402 .19093 L
.74672 .18635 L
.73858 .181 L
.73008 .17327 L
.72048 .16572 L
.70973 .1584 L
.69712 .15099 L
.68147 .14457 L
.66401 .13705 L
.6444 .13189 L
.62106 .12545 L
.59434 .1198 L
.56563 .12067 L
.53063 .1255 L
.4944 .13546 L
.45679 .15251 L
.41956 .17808 L
.38646 .21294 L
.35787 .25601 L
.33968 .30547 L
.33244 .35857 L
.33536 .40939 L
.34922 .45632 L
.36979 .49753 L
.39412 .53186 L
Mistroke
.42181 .55825 L
.44944 .57877 L
.47612 .59446 L
.50027 .60279 L
.52096 .61129 L
.54129 .6186 L
.56005 .62459 L
.57748 .62731 L
.59353 .62971 L
.60782 .63134 L
.62105 .6326 L
.63321 .63282 L
.64468 .635 L
.65527 .63432 L
.66642 .63487 L
.67649 .63513 L
.68556 .63269 L
.69474 .6327 L
.70347 .63106 L
.71102 .6299 L
.71841 .62705 L
.72596 .62748 L
.73287 .62421 L
.74139 .62258 L
.74879 .6175 L
.7553 .61407 L
.76084 .60846 L
.76731 .60406 L
.77301 .59687 L
.7783 .59029 L
.78481 .58317 L
.78764 .57544 L
.79224 .56429 L
.79436 .55393 L
.79827 .54283 L
.79877 .53183 L
.79892 .52042 L
.80023 .50942 L
.80318 .4965 L
.80393 .48112 L
.80288 .46522 L
.80167 .44948 L
.80044 .43267 L
.79707 .41783 L
.7931 .40138 L
.78885 .38464 L
.7839 .37015 L
.77733 .35408 L
.77154 .34046 L
.76577 .32787 L
Mistroke
Mfstroke
.02 w
.85052 .27333 Mdot
0 .8 0 r
.005 w
[ .03 .02 ] 0 setdash
.85052 .27333 m
.84643 .2703 L
.84266 .26786 L
.83942 .26534 L
.83698 .26184 L
.83506 .2598 L
.8321 .25637 L
.82834 .25323 L
.82448 .25048 L
.82148 .24674 L
.81879 .24464 L
.81427 .24339 L
.81099 .24141 L
.80842 .23922 L
.80504 .23594 L
.8009 .23156 L
.79703 .22816 L
.79323 .2255 L
.78847 .22171 L
.78439 .21842 L
.78075 .21472 L
.77608 .21022 L
.77138 .20657 L
.76616 .20183 L
.76114 .19654 L
.75402 .19093 L
.74672 .18635 L
.73858 .181 L
.73008 .17327 L
.72048 .16572 L
.70973 .1584 L
.69712 .15099 L
.68147 .14457 L
.66401 .13705 L
.6444 .13189 L
.62106 .12545 L
.59434 .1198 L
.56563 .12067 L
.53063 .1255 L
.4944 .13546 L
.45679 .15251 L
.41956 .17808 L
.38646 .21294 L
.35787 .25601 L
.33968 .30547 L
.33244 .35857 L
.33536 .40939 L
.34922 .45632 L
.36979 .49753 L
.39412 .53186 L
Mistroke
.42181 .55825 L
.44944 .57877 L
.47612 .59446 L
.50027 .60279 L
.52096 .61129 L
.54129 .6186 L
.56005 .62459 L
.57748 .62731 L
.59353 .62971 L
.60782 .63134 L
.62105 .6326 L
.63321 .63282 L
.64468 .635 L
.65527 .63432 L
.66642 .63487 L
.67649 .63513 L
.68556 .63269 L
.69474 .6327 L
.70347 .63106 L
.71102 .6299 L
.71841 .62705 L
.72596 .62748 L
.73287 .62421 L
.74139 .62258 L
.74879 .6175 L
.7553 .61407 L
.76084 .60846 L
.76731 .60406 L
.77301 .59687 L
.7783 .59029 L
.78481 .58317 L
.78764 .57544 L
.79224 .56429 L
.79436 .55393 L
.79827 .54283 L
.79877 .53183 L
.79892 .52042 L
.80023 .50942 L
.80318 .4965 L
.80393 .48112 L
.80288 .46522 L
.80167 .44948 L
.80044 .43267 L
.79707 .41783 L
.7931 .40138 L
.78885 .38464 L
.7839 .37015 L
.77733 .35408 L
.77154 .34046 L
.76577 .32787 L
Mistroke
Mfstroke
.02 w
.85052 .27333 Mdot
0 0 1 r
.005 w
[ .03 .02 .01 .02 ] 0 setdash
.72632 .16231 m
.71838 .15838 L
.71055 .156 L
.70329 .15501 L
.6972 .15517 L
.68609 .15554 L
.67744 .15567 L
.66815 .1545 L
.65817 .15347 L
.65055 .15617 L
.64167 .15919 L
.62973 .1583 L
.61848 .16116 L
.60702 .16593 L
.59728 .17026 L
.58974 .17501 L
.58121 .18105 L
.5711 .18837 L
.56194 .19591 L
.55317 .20374 L
.54575 .21394 L
.5394 .22436 L
.53244 .23492 L
.52646 .24632 L
.52214 .25865 L
.51952 .27098 L
.51818 .28483 L
.51728 .29719 L
.5182 .31037 L
.52148 .3229 L
.52602 .3352 L
.53168 .34808 L
.538 .35916 L
.54665 .36925 L
.55729 .37718 L
.56991 .38513 L
.58221 .39095 L
.59488 .39243 L
.61038 .39059 L
.62469 .38811 L
.63571 .38034 L
.64544 .36725 L
.65284 .35337 L
.6556 .33922 L
.64856 .32199 L
.64227 .30608 L
.63045 .29761 L
.61132 .2895 L
.596 .28458 L
.58318 .28717 L
Mistroke
.56378 .29062 L
.55066 .29456 L
.54143 .30536 L
.52704 .31319 L
.51917 .31862 L
.51034 .33026 L
.49771 .33973 L
.49479 .34875 L
.48663 .36333 L
.47979 .37135 L
.47826 .38405 L
.47084 .39546 L
.47033 .40434 L
.46672 .41849 L
.46429 .42611 L
.46487 .43817 L
.46157 .44698 L
.46489 .45665 L
.46305 .46741 L
.46667 .47306 L
.46746 .48267 L
.47089 .4858 L
.47325 .4941 L
.47555 .49478 L
.47796 .50072 L
.481 .50003 L
.48209 .50401 L
.48566 .50186 L
.48477 .50282 L
.48906 .50128 L
.48781 .49846 L
.48991 .49773 L
.49129 .49246 L
.49139 .48893 L
.49381 .48389 L
.4932 .47343 L
.48737 .46599 L
.48419 .46153 L
.47992 .45427 L
.47449 .45022 L
.47186 .44715 L
.46863 .44153 L
.46392 .43734 L
.46039 .43507 L
.4574 .43129 L
.45321 .42963 L
.45015 .4292 L
.44801 .42769 L
.44418 .42727 L
.43881 .42966 L
Mistroke
Mfstroke
.02 w
.72632 .16231 Mdot
MathSubEnd
P
% End of sub-graphic
0 g
.14286 .02798 m
.14286 .12321 L
.95238 .12321 L
.95238 .02798 L
F
1 g
.11905 .05179 m
.11905 .14702 L
.92857 .14702 L
.92857 .05179 L
F
0 g
.001 w
[ ] 0 setdash
.11905 .05179 m
.92857 .05179 L
.92857 .14702 L
.11905 .14702 L
.11905 .05179 L
s
% Start of sub-graphic
p
0.119048 0.0517857 0.928571 0.147024 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0271739 0.271739 0.00498504 0.0498504 [
[ 0 0 0 0 ]
[ 1 .11765 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .11765 L
0 .11765 L
closepath
clip
newpath
% Start of sub-graphic
p
0.048913 0.00897308 0.320652 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
1 0 0 r
.005 w
[ ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.18478 .06281 -81 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(S11) show
81.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
81.000 13.000 moveto
(@) show
87.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(f) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
93.000 13.000 moveto
(D) show
1.000 setlinewidth
grestore
% Start of sub-graphic
p
0.36413 0.00897308 0.63587 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
0 .8 0 r
.005 w
[ .03 .02 ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.5 .06281 -81 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(S11) show
81.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
81.000 13.000 moveto
(@) show
87.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(f) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
93.000 13.000 moveto
(D) show
1.000 setlinewidth
grestore
% Start of sub-graphic
p
0.679348 0.00897308 0.951087 0.0588235 MathSubStart
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.0238095 0.952381 0.0147151 0.588604 [
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
0 0 1 r
.005 w
[ .03 .02 .01 .02 ] 0 setdash
.02381 .30902 m
.97619 .30902 L
s
MathSubEnd
P
% End of sub-graphic
0 g
gsave
.81522 .06281 -81 -4 Mabsadd m
1 1 Mabs scale
currentpoint translate
/MISOfy
{
    /newfontname exch def
    /oldfontname exch def

    oldfontname findfont
    dup length dict begin
        {1 index /FID ne {def} {pop pop} ifelse} forall
        /Encoding ISOLatin1Encoding def
        currentdict
    end

    newfontname exch definefont pop
} def

0 20.875 translate 1 -1 scale
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
63.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(S22) show
81.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
0.000 0.000 rmoveto
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
81.000 13.000 moveto
(@) show
87.000 13.000 moveto
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(f) show
%%IncludeResource: font Math2Mono
%%IncludeFont: Math2Mono
/Math2Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
93.000 13.000 moveto
(D) show
1.000 setlinewidth
grestore
MathSubEnd
P
% End of sub-graphic
0 0 m
1 0 L
1 1.175 L
0 1.175 L
closepath
clip
newpath
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
  ImageSize->{500, 587.5}],

Cell[BoxData[
    TagBox[\(\[SkeletonIndicator]  Graphics  \[SkeletonIndicator]\),
      False,
      Editable->False]], "Output"]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["Copyright Notice", "Section"],

Cell[CellGroupData[{

Cell["\<\
Copyright \[Copyright] 2003 by Dr.-Ing. Eckhard Hennig \
<eckhard@kaninkolo.de>\
\>", "Subsection"],

Cell["\<\
$Id: TouchestoneReaderDemo.nb,v 1.1 2003/01/31 09:35:12 hennig Exp $

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, \
USA.\
\>", "Copyright"]
}, Open  ]]
}, Open  ]]
},
FrontEndVersion->"4.0 for X",
ScreenRectangle->{{0, 1280}, {0, 1024}},
WindowSize->{704, 798},
WindowMargins->{{125, Automatic}, {Automatic, 37}},
PrintingPageRange->{Automatic, Automatic},
PrintingOptions->{"PaperSize"->{597.562, 842.375},
"PaperOrientation"->"Portrait",
"PostScriptOutputFile":>FrontEnd`FileName[{"home", "hennig"}, \
"Untitled-1.ps", CharacterEncoding -> "ISO8859-1"],
"Magnification"->1},
StyleDefinitions -> "Classroom.nb"
]


(***********************************************************************
End of Mathematica Notebook file.
***********************************************************************)

