Diagnostics/Basic/BasicScheme/tools/Slinky.nb

(* Content-type: application/mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 6.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[     67328,       4050]
NotebookOptionsPosition[     65150,       3968]
NotebookOutlinePosition[     65509,       3984]
CellTagsIndexPosition[     65466,       3981]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Slinky", "Title"],

Cell[CellGroupData[{

Cell["Author", "Subsection"],

Cell["\<\
Eric W. Weisstein
March 16, 2008\
\>", "Text"],

Cell[TextData[{
 "This notebook downloaded from ",
 ButtonBox["http://mathworld.wolfram.com/notebooks/SpaceCurves/Slinky.nb",
  BaseStyle->"Hyperlink",
  ButtonData:>{
    URL["http://mathworld.wolfram.com/notebooks/SpaceCurves/Slinky.nb"], 
    None}],
 "."
}], "Text"],

Cell[TextData[{
 "For more information, see Eric's ",
 StyleBox["MathWorld",
  FontSlant->"Italic"],
 " entry ",
 ButtonBox["http://mathworld.wolfram.com/Slinky.html",
  BaseStyle->"Hyperlink",
  ButtonData:>{
    URL["http://mathworld.wolfram.com/Slinky.html"], None}],
 "."
}], "Text"],

Cell[TextData[{
 "For a list of Eric's math packages that may be needed to evaluate this \
notebook, see ",
 StyleBox["Mathematica Information Center",
  FontSlant->Italic],
 "'s ",
 ButtonBox["MathSource item 4775",
  BaseStyle->"Hyperlink",
  ButtonData:>{
    URL["http://library.wolfram.com/infocenter/MathSource/4775/"], None}],
 ".  A list of Eric's utility packages that may be needed to evaluate this \
notebook may be downloaded from ",
 ButtonBox["MathSource item 5087",
  BaseStyle->"Hyperlink",
  ButtonData:>{
    URL["http://library.wolfram.com/infocenter/MathSource/5087/"], None}],
 "."
}], "Text"],

Cell["\<\
\[Copyright]2008 Wolfram Research, Inc. except for portions noted otherwise\
\>", "Text"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Inititalization", "Subsection"],

Cell[BoxData[
 RowBox[{"<<", "MathWorld`Curves`"}]], "Input",
 InitializationCell->True]
}, Open  ]],

Cell[CellGroupData[{

Cell["Code", "Subsection"],

Cell[BoxData[
 RowBox[{
  RowBox[{"Slinky", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"a_", ",", "w_", ",", "h_"}], "}"}], ",", "t_"}], "]"}], ":=", 
  RowBox[{"{", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Cos", "[", "t", "]"}], 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"a", " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"w", " ", "t"}], "]"}]}]}], ")"}]}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Sin", "[", "t", "]"}], 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"a", " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"w", " ", "t"}], "]"}]}]}], ")"}]}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"h", " ", "t"}], "+", 
     RowBox[{"a", " ", 
      RowBox[{"Sin", "[", 
       RowBox[{"w", " ", "t"}], "]"}]}]}]}], "\[IndentingNewLine]", 
   "}"}]}]], "Input",
 InitializationCell->True]
}, Open  ]],

Cell[CellGroupData[{

Cell["Plot", "Section"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"g", "=", 
  RowBox[{"ParametricPlot3D", "[", 
   RowBox[{
    RowBox[{"Evaluate", "[", 
     RowBox[{"Append", "[", 
      RowBox[{
       RowBox[{"Slinky", "[", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{".4", ",", "40", ",", ".3"}], "}"}], ",", "t"}], "]"}], ",",
        "Red"}], "]"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"t", ",", "0", ",", 
      RowBox[{"5", "\[Pi]"}]}], "}"}], ",", 
    RowBox[{"PlotPoints", "\[Rule]", "1000"}], ",", 
    RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}]], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: 1.58785 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics3D
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
-0.283433 1.59395 -0.00609667 1.59395 [
[ 0 0 0 0 ]
[ 1 1.58785 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 g
.25 Mabswid
[ ] 0 setdash
.08442 .22216 m
0 1.29193 L
s
0 1.29193 m
.37686 1.58785 L
s
.37686 1.58785 m
.39725 .5728 L
s
.39725 .5728 m
.08442 .22216 L
s
.64917 0 m
.92359 .3908 L
s
.92359 .3908 m
1 1.43558 L
s
1 1.43558 m
.67775 1.09881 L
s
.67775 1.09881 m
.64917 0 L
s
.08442 .22216 m
0 1.29193 L
s
0 1.29193 m
.67775 1.09881 L
s
.67775 1.09881 m
.64917 0 L
s
.64917 0 m
.08442 .22216 L
s
.39725 .5728 m
.92359 .3908 L
s
.92359 .3908 m
1 1.43558 L
s
1 1.43558 m
.37686 1.58785 L
s
.37686 1.58785 m
.39725 .5728 L
s
0 0 m
1 0 L
1 1.58785 L
0 1.58785 L
closepath
clip
newpath
1 0 0 r
.5 Mabswid
.5668 .61816 m
.56493 .66563 L
s
.56301 .56745 m
.5668 .61816 L
s
.52393 .62941 m
.5199 .67652 L
s
.52618 .57856 m
.52393 .62941 L
s
.60834 .60277 m
.60878 .65044 L
s
.59854 .55274 m
.60834 .60277 L
s
.48064 .63646 m
.47462 .68307 L
s
.48883 .58601 m
.48064 .63646 L
s
.55556 .53171 m
.56301 .56745 L
s
.64769 .58337 m
.65051 .63105 L
s
.63198 .53457 m
.64769 .58337 L
s
.52645 .54229 m
.52618 .57856 L
s
.5835 .51828 m
.59854 .55274 L
s
.49682 .54994 m
.48883 .58601 L
s
.56493 .66563 m
.55773 .69265 L
s
.43783 .63934 m
.43003 .68533 L
s
.45175 .5898 m
.43783 .63934 L
s
.60967 .50212 m
.63198 .53457 L
s
.5199 .67652 m
.51524 .70278 L
s
.60878 .65044 m
.59926 .67847 L
s
.68397 .56016 m
.68922 .60765 L
s
.66261 .51315 m
.68397 .56016 L
s
.46732 .55466 m
.45175 .5898 L
s
.47462 .68307 m
.47269 .70887 L
s
.65051 .63105 m
.63896 .66035 L
s
.63346 .48341 m
.66261 .51315 L
s
.39642 .63814 m
.38707 .6834 L
s
.41577 .59 m
.39642 .63814 L
s
.43003 .68533 m
.43099 .71096 L
s
.71638 .53341 m
.72404 .58051 L
s
.68973 .48874 m
.71638 .53341 L
s
.68922 .60765 m
.67595 .63843 L
s
.43861 .55648 m
.41577 .59 L
s
.65433 .4624 m
.68973 .48874 L
s
.54832 .52427 m
.55556 .53171 L
s
.52578 .53422 m
.52645 .54229 L
s
.5699 .51212 m
.5835 .51828 L
s
.59004 .49787 m
.60967 .50212 L
s
.50279 .54189 m
.49682 .54994 L
s
.35732 .63302 m
.34667 .67749 L
s
.38167 .58674 m
.35732 .63302 L
s
.55773 .69265 m
.5474 .6888 L
s
.38707 .6834 m
.39101 .7092 L
s
.72404 .58051 m
.70939 .61295 L
s
.60827 .48167 m
.63346 .48341 L
s
.59926 .67847 m
.5828 .67615 L
s
.74415 .5035 m
.75416 .54997 L
s
.7127 .4617 m
.74415 .5035 L
s
.41135 .55552 m
.38167 .58674 L
s
.47988 .54729 m
.46732 .55466 L
s
.51524 .70278 m
.51131 .69801 L
s
.67181 .43939 m
.7127 .4617 L
s
.63896 .66035 m
.61675 .66012 L
s
.47269 .70887 m
.47533 .7038 L
s
.62418 .46371 m
.65433 .4624 L
s
.45756 .55044 m
.43861 .55648 L
s
.67595 .63843 m
.64848 .64085 L
s
.75416 .54997 m
.73851 .58422 L
s
.73095 .43243 m
.76659 .47086 L
s
.68545 .41471 m
.73095 .43243 L
s
.34667 .67749 m
.35363 .70378 L
s
.43099 .71096 m
.44021 .70622 L
s
.63739 .44423 m
.67181 .43939 L
s
.35024 .58022 m
.32139 .62424 L
s
.38617 .55194 m
.35024 .58022 L
s
.76659 .47086 m
.77882 .51646 L
s
.32139 .62424 m
.30975 .66786 L
s
.43635 .55142 m
.41135 .55552 L
s
.54584 .54833 m
.54832 .52427 L
s
.5647 .53678 m
.5699 .51212 L
s
.70939 .61295 m
.67728 .61852 L
s
.52617 .55797 m
.52578 .53422 L
s
.58231 .52339 m
.59004 .49787 L
s
.64757 .42352 m
.68545 .41471 L
s
.50614 .56565 m
.50279 .54189 L
s
.39101 .7092 m
.40675 .7054 L
s
.59827 .50829 m
.60827 .48167 L
s
.74402 .40139 m
.7831 .43601 L
s
.69492 .38875 m
.74402 .40139 L
s
.77882 .51646 m
.76255 .55264 L
s
.5474 .6888 m
.53713 .65503 L
s
.5828 .67615 m
.56489 .64392 L
s
.48621 .57135 m
.47988 .54729 L
s
.41676 .55038 m
.38617 .55194 L
s
.6122 .49166 m
.62418 .46371 L
s
.7831 .43601 m
.79734 .4805 L
s
.30975 .66786 m
.31969 .69497 L
s
.32223 .57073 m
.28949 .61209 L
s
.36368 .54596 m
.32223 .57073 L
s
.51131 .69801 m
.5089 .66342 L
s
.61675 .66012 m
.59157 .63015 L
s
.73851 .58422 m
.70244 .59341 L
s
.65448 .40188 m
.69492 .38875 L
s
.28949 .61209 m
.27716 .65484 L
s
.62376 .47369 m
.63739 .44423 L
s
.46683 .57513 m
.45756 .55044 L
s
.47533 .7038 m
.48085 .66911 L
s
.64848 .64085 m
.61657 .6138 L
s
.35363 .70378 m
.37566 .70154 L
s
.75151 .36913 m
.79318 .39953 L
s
.69996 .36196 m
.75151 .36913 L
s
.63266 .45464 m
.64757 .42352 L
s
.39926 .54749 m
.36368 .54596 L
s
.65793 .37966 m
.69996 .36196 L
s
.44846 .57706 m
.43635 .55142 L
s
.67728 .61852 m
.63928 .59505 L
s
.44021 .70622 m
.45359 .67216 L
s
.79734 .4805 m
.78087 .51867 L
s
.5722 .58242 m
.5647 .53678 L
s
.55136 .59453 m
.54584 .54833 L
s
.76255 .55264 m
.72333 .56584 L
s
.59171 .56829 m
.58231 .52339 L
s
.52967 .60454 m
.52617 .55797 L
s
.79318 .39953 m
.80916 .44269 L
s
.63867 .43476 m
.65448 .40188 L
s
.60945 .55227 m
.59827 .50829 L
s
.29835 .5586 m
.26242 .59699 L
s
.34446 .53785 m
.29835 .5586 L
s
.50764 .61241 m
.50614 .56565 L
s
.27716 .65484 m
.29 .68311 L
s
.56489 .64392 m
.55136 .59453 L
s
.53713 .65503 m
.52967 .60454 L
s
.59157 .63015 m
.5722 .58242 L
s
.62497 .53453 m
.6122 .49166 L
s
.43152 .57726 m
.41676 .55038 L
s
.70244 .59341 m
.65918 .57409 L
s
.70041 .3348 m
.75318 .33622 L
s
.65782 .35721 m
.70041 .3348 L
s
.75318 .33622 m
.79647 .36209 L
s
.40675 .7054 m
.42774 .67269 L
s
.5089 .66342 m
.50764 .61241 L
s
.48577 .61814 m
.48621 .57135 L
s
.26242 .59699 m
.24973 .63886 L
s
.61657 .6138 m
.59171 .56829 L
s
.64163 .41435 m
.65793 .37966 L
s
.31969 .69497 m
.34768 .6949 L
s
.63789 .51529 m
.62376 .47369 L
s
.3843 .54296 m
.34446 .53785 L
s
.48085 .66911 m
.48577 .61814 L
s
.63928 .59505 m
.60945 .55227 L
s
.46455 .62179 m
.46683 .57513 L
s
.78087 .51867 m
.73939 .53621 L
s
.80916 .44269 m
.79292 .48286 L
s
.64788 .4948 m
.63266 .45464 L
s
.64143 .39374 m
.65782 .35721 L
s
.69623 .30775 m
.7489 .30328 L
s
.65413 .33491 m
.69623 .30775 L
s
.41643 .57589 m
.39926 .54749 L
s
.72333 .56584 m
.67574 .5512 L
s
.79647 .36209 m
.81385 .40369 L
s
.45359 .67216 m
.46455 .62179 L
s
.65918 .57409 m
.62497 .53453 L
s
.37566 .70154 m
.40389 .67088 L
s
.44446 .62345 m
.44846 .57706 L
s
.65465 .47336 m
.63867 .43476 L
s
.7489 .30328 m
.79274 .3244 L
s
.27925 .54424 m
.24093 .5794 L
s
.32902 .52796 m
.27925 .54424 L
s
.63805 .37325 m
.65413 .33491 L
s
.67574 .5512 m
.63789 .51529 L
s
.24973 .63886 m
.2653 .66862 L
s
.68747 .28131 m
.7387 .27095 L
s
.64694 .31314 m
.68747 .28131 L
s
.37227 .53707 m
.32902 .52796 L
s
.658 .45129 m
.64163 .41435 L
s
.29 .68311 m
.32345 .68579 L
s
.42774 .67269 m
.44446 .62345 L
s
.40357 .57316 m
.3843 .54296 L
s
.42598 .62326 m
.43152 .57726 L
s
.73939 .53621 m
.68854 .52669 L
s
.63156 .35321 m
.64694 .31314 L
s
.24093 .5794 m
.22821 .62042 L
s
.68854 .52669 m
.64788 .4948 L
s
.79292 .48286 m
.75015 .50499 L
s
.6578 .42893 m
.64143 .39374 L
s
.81385 .40369 m
.79824 .44584 L
s
.79274 .3244 m
.81112 .36424 L
s
.7387 .27095 m
.78196 .28722 L
s
.34768 .6949 m
.38257 .66692 L
s
.6972 .50093 m
.65465 .47336 L
s
.40389 .67088 m
.42598 .62326 L
s
.65401 .40667 m
.63805 .37325 L
s
.40955 .62141 m
.41643 .57589 L
s
.39325 .56928 m
.37227 .53707 L
s
.75015 .50499 m
.6972 .50093 L
s
.2655 .52814 m
.22567 .55986 L
s
.31782 .51665 m
.2655 .52814 L
s
.36352 .5301 m
.31782 .51665 L
s
.70143 .47432 m
.658 .45129 L
s
.64667 .38487 m
.63156 .35321 L
s
.79824 .44584 m
.75521 .47269 L
s
.2653 .66862 m
.30359 .67458 L
s
.22821 .62042 m
.24626 .65199 L
s
.39554 .6181 m
.40357 .57316 L
s
.78196 .28722 m
.80088 .32515 L
s
.38257 .66692 m
.40955 .62141 L
s
.81112 .36424 m
.79656 .40829 L
s
.32345 .68579 m
.36432 .6611 L
s
.70104 .44733 m
.6578 .42893 L
s
.56796 .90493 m
.56968 .95953 L
s
.56126 .86096 m
.56796 .90493 L
s
.56968 .95953 m
.56531 1.00525 L
s
.52619 .91688 m
.52297 .97145 L
s
.52726 .87251 m
.52619 .91688 L
s
.22567 .55986 m
.21325 .60009 L
s
.52297 .97145 m
.51828 1.01668 L
s
.60832 .88929 m
.61504 .94354 L
s
.59396 .84639 m
.60832 .88929 L
s
.75521 .47269 m
.70143 .47432 L
s
.61504 .94354 m
.61118 .98978 L
s
.38577 .56453 m
.36352 .5301 L
s
.4839 .9251 m
.47588 .97927 L
s
.49269 .88096 m
.4839 .9251 L
s
.69596 .42042 m
.65401 .40667 L
s
.47588 .97927 m
.47106 1.02404 L
s
.64642 .87008 m
.6581 .9236 L
s
.62465 .82891 m
.64642 .87008 L
s
.6581 .9236 m
.65493 .97035 L
s
.38433 .61359 m
.39325 .56928 L
s
.31124 .50438 m
.25758 .51083 L
s
.35833 .5224 m
.31124 .50438 L
s
.36432 .6611 m
.39554 .6181 L
s
.44198 .92959 m
.42937 .98302 L
s
.45831 .88632 m
.44198 .92959 L
s
.25758 .51083 m
.21718 .539 L
s
.79656 .40829 m
.75434 .4399 L
s
.68623 .39409 m
.64667 .38487 L
s
.75434 .4399 m
.70104 .44733 L
s
.42937 .98302 m
.42462 1.0274 L
s
.68144 .8475 m
.69793 .89987 L
s
.65264 .80871 m
.68144 .8475 L
s
.80088 .32515 m
.78774 .37095 L
s
.30359 .67458 m
.34957 .65373 L
s
.69793 .89987 m
.69562 .94713 L
s
.55298 .84369 m
.56126 .86096 L
s
.38135 .5592 m
.35833 .5224 L
s
.52675 .85461 m
.52726 .87251 L
s
.24626 .65199 m
.28863 .6617 L
s
.57811 .83045 m
.59396 .84639 L
s
.56531 1.00525 m
.55605 1.02531 L
s
.3762 .60817 m
.38577 .56453 L
s
.51828 1.01668 m
.51351 1.03593 L
s
.61118 .98978 m
.5977 1.01105 L
s
.21325 .60009 m
.23345 .63375 L
s
.5 .86312 m
.49269 .88096 L
s
.40132 .93043 m
.38443 .9828 L
s
.42487 .88865 m
.40132 .93043 L
s
.60159 .81497 m
.62465 .82891 L
s
.74741 .40723 m
.69596 .42042 L
s
.34957 .65373 m
.38433 .61359 L
s
.71257 .82181 m
.73364 .87262 L
s
.6773 .78603 m
.71257 .82181 L
s
.38443 .9828 m
.37995 1.02687 L
s
.65493 .97035 m
.63756 .99322 L
s
.47106 1.02404 m
.47098 1.04291 L
s
.21718 .539 m
.2054 .57851 L
s
.30954 .49159 m
.25586 .4929 L
s
.35689 .51432 m
.30954 .49159 L
s
.47334 .86923 m
.45831 .88632 L
s
.73364 .87262 m
.73233 .92033 L
s
.62288 .79742 m
.65264 .80871 L
s
.78774 .37095 m
.74741 .40723 L
s
.38014 .55359 m
.35689 .51432 L
s
.78321 .28722 m
.77185 .33457 L
s
.73448 .37533 m
.68623 .39409 L
s
.37137 .60215 m
.38135 .5592 L
s
.69562 .94713 m
.67478 .97195 L
s
.25586 .4929 m
.21588 .51749 L
s
.42462 1.0274 m
.42936 1.04631 L
s
.36282 .92776 m
.34202 .97878 L
s
.39311 .88805 m
.36282 .92776 L
s
.64149 .77799 m
.6773 .78603 L
s
.28863 .6617 m
.33872 .64515 L
s
.44737 .87298 m
.42487 .88865 L
s
.33872 .64515 m
.3762 .60817 L
s
.7391 .79333 m
.76441 .84218 L
s
.69806 .76116 m
.7391 .79333 L
s
.34202 .97878 m
.338 1.02264 L
s
.76441 .84218 m
.76421 .89027 L
s
.23345 .63375 m
.279 .64764 L
s
.73233 .92033 m
.70851 .94743 L
s
.77185 .33457 m
.73448 .37533 L
s
.65699 .75694 m
.69806 .76116 L
s
.31291 .4788 m
.26056 .47498 L
s
.35933 .50626 m
.31291 .4788 L
s
.54783 .86002 m
.55298 .84369 L
s
.37995 1.02687 m
.38952 1.04628 L
s
.37002 .59585 m
.38014 .55359 L
s
.56833 .84768 m
.57811 .83045 L
s
.38221 .54802 m
.35933 .50626 L
s
.2054 .57851 m
.22734 .61453 L
s
.42267 .87445 m
.39311 .88805 L
s
.52643 .87046 m
.52675 .85461 L
s
.55605 1.02531 m
.54477 1.01161 L
s
.58746 .83353 m
.60159 .81497 L
s
.5977 1.01105 m
.57896 .99888 L
s
.33206 .63576 m
.37137 .60215 L
s
.76037 .76247 m
.78945 .80896 L
s
.7144 .73445 m
.76037 .76247 L
s
.50462 .87896 m
.5 .86312 L
s
.32733 .9218 m
.30309 .97121 L
s
.36378 .8847 m
.32733 .9218 L
s
.51351 1.03593 m
.50997 1.02134 L
s
.21588 .51749 m
.20505 .5564 L
s
.60479 .8177 m
.62288 .79742 L
s
.63756 .99322 m
.61179 .98322 L
s
.48288 .88551 m
.47334 .86923 L
s
.66901 .73454 m
.7144 .73445 L
s
.279 .64764 m
.33206 .63576 L
s
.47098 1.04291 m
.4753 1.02809 L
s
.26056 .47498 m
.22202 .49607 L
s
.78945 .80896 m
.79045 .85735 L
s
.30309 .97121 m
.2997 1.01498 L
s
.76421 .89027 m
.73794 .91994 L
s
.6199 .80035 m
.64149 .77799 L
s
.3722 .58963 m
.38221 .54802 L
s
.67478 .97195 m
.64251 .96471 L
s
.39984 .87378 m
.36378 .8847 L
s
.338 1.02264 m
.35234 1.043 L
s
.36567 .4986 m
.32139 .46653 L
s
.38758 .54283 m
.36567 .4986 L
s
.46172 .89016 m
.44737 .87298 L
s
.32139 .46653 m
.27173 .45775 L
s
.32983 .62597 m
.37002 .59585 L
s
.42936 1.04631 m
.44153 1.03194 L
s
.63243 .78169 m
.65699 .75694 L
s
.7758 .7297 m
.80809 .77346 L
s
.7259 .70632 m
.7758 .7297 L
s
.22734 .61453 m
.27503 .63292 L
s
.67723 .71113 m
.7259 .70632 L
s
.29571 .91283 m
.26854 .9604 L
s
.33757 .87883 m
.29571 .91283 L
s
.70851 .94743 m
.67043 .94352 L
s
.44163 .89297 m
.42267 .87445 L
s
.3779 .58383 m
.38758 .54283 L
s
.64209 .76195 m
.66901 .73454 L
s
.20505 .5564 m
.22823 .59498 L
s
.79045 .85735 m
.76235 .88982 L
s
.80809 .77346 m
.81034 .82203 L
s
.37581 .49175 m
.33489 .45531 L
s
.39615 .53834 m
.37581 .49175 L
s
.37942 .87115 m
.33757 .87883 L
s
.57067 .89149 m
.56833 .84768 L
s
.55007 .90391 m
.54783 .86002 L
s
.27503 .63292 m
.32983 .62597 L
s
.38952 1.04628 m
.40939 1.03299 L
s
.22202 .49607 m
.21244 .5345 L
s
.58995 .87726 m
.58746 .83353 L
s
.52862 .91444 m
.52643 .87046 L
s
.33212 .61622 m
.3722 .58963 L
s
.57896 .99888 m
.56124 .95761 L
s
.26854 .9604 m
.26596 1.0042 L
s
.27173 .45775 m
.23567 .47551 L
s
.54477 1.01161 m
.53484 .96896 L
s
.2997 1.01498 m
.31866 1.03672 L
s
.60746 .86134 m
.60479 .8177 L
s
.73224 .67722 m
.78494 .69555 L
s
.68144 .68707 m
.73224 .67722 L
s
.50681 .92305 m
.50462 .87896 L
s
.61179 .98322 m
.58663 .94397 L
s
.33489 .45531 m
.28929 .44187 L
s
.73794 .91994 m
.69486 .91988 L
s
.64861 .74139 m
.67723 .71113 L
s
.78494 .69555 m
.81975 .73623 L
s
.50997 1.02134 m
.50802 .97797 L
s
.42308 .89407 m
.39984 .87378 L
s
.62277 .84388 m
.6199 .80035 L
s
.38701 .5788 m
.39615 .53834 L
s
.64251 .96471 m
.61041 .92811 L
s
.48513 .92974 m
.48288 .88551 L
s
.4753 1.02809 m
.48138 .98466 L
s
.38959 .48608 m
.35316 .44566 L
s
.40774 .53487 m
.38959 .48608 L
s
.6355 .82508 m
.63243 .78169 L
s
.26874 .9012 m
.23926 .94674 L
s
.31516 .87074 m
.26874 .9012 L
s
.65183 .72032 m
.68144 .68707 L
s
.35234 1.043 m
.3796 1.03144 L
s
.22823 .59498 m
.27694 .61809 L
s
.81034 .82203 m
.78106 .85749 L
s
.33894 .60695 m
.3779 .58383 L
s
.46409 .93457 m
.46172 .89016 L
s
.67043 .94352 m
.63204 .91017 L
s
.81975 .73623 m
.82326 .78486 L
s
.73321 .64763 m
.78746 .6606 L
s
.68151 .66272 m
.73321 .64763 L
s
.36194 .8668 m
.31516 .87074 L
s
.27694 .61809 m
.33212 .61622 L
s
.64534 .80516 m
.64209 .76195 L
s
.76235 .88982 m
.71521 .89407 L
s
.44153 1.03194 m
.45552 .9891 L
s
.58663 .94397 m
.57067 .89149 L
s
.56124 .95761 m
.55007 .90391 L
s
.40653 .89362 m
.37942 .87115 L
s
.61041 .92811 m
.58995 .87726 L
s
.53484 .96896 m
.52862 .91444 L
s
.39935 .57487 m
.40774 .53487 L
s
.35316 .44566 m
.31292 .42802 L
s
.78746 .6606 m
.824 .69793 L
s
.65164 .69904 m
.68151 .66272 L
s
.63204 .91017 m
.60746 .86134 L
s
.28929 .44187 m
.25669 .45659 L
s
.44416 .93761 m
.44163 .89297 L
s
.21244 .5345 m
.23629 .57581 L
s
.50802 .97797 m
.50681 .92305 L
s
.26596 1.0042 m
.28927 1.02776 L
s
.69486 .91988 m
.65099 .89033 L
s
.65202 .78439 m
.64861 .74139 L
s
.4067 .48197 m
.37585 .43807 L
s
.42211 .53272 m
.4067 .48197 L
s
.23926 .94674 m
.23762 .9907 L
s
.23567 .47551 m
.2276 .51362 L
s
.65099 .89033 m
.62277 .84388 L
s
.35017 .59861 m
.38701 .5788 L
s
.48138 .98466 m
.48513 .92974 L
s
.72872 .61809 m
.78318 .62552 L
s
.67741 .63851 m
.72872 .61809 L
s
.40939 1.03299 m
.43101 .99138 L
s
.41462 .57235 m
.42211 .53272 L
s
.64803 .67788 m
.67741 .63851 L
s
.65533 .76306 m
.65183 .72032 L
s
.31866 1.03672 m
.35285 1.0275 L
s
.66679 .86881 m
.6355 .82508 L
s
.4258 .93899 m
.42308 .89407 L
s
.39237 .89179 m
.36194 .8668 L
s
.28477 .60374 m
.33894 .60695 L
s
.78106 .85749 m
.7309 .86643 L
s
.82326 .78486 m
.79351 .82343 L
s
.71521 .89407 m
.66679 .86881 L
s
.45552 .9891 m
.46409 .93457 L
s
.42676 .47976 m
.40243 .433 L
s
.43892 .53216 m
.42676 .47976 L
s
.824 .69793 m
.82873 .74647 L
s
.29715 .86077 m
.24718 .88732 L
s
.34787 .86101 m
.29715 .86077 L
s
.37585 .43807 m
.34214 .41685 L
s
.24718 .88732 m
.21604 .93069 L
s
.67902 .84589 m
.64534 .80516 L
s
.78318 .62552 m
.82058 .65925 L
s
.65515 .74149 m
.65164 .69904 L
s
.66923 .61484 m
.71883 .58913 L
s
.64105 .65718 m
.66923 .61484 L
s
.23629 .57581 m
.28477 .60374 L
s
.36558 .59163 m
.39935 .57487 L
s
.43245 .57152 m
.43892 .53216 L
s
.71883 .58913 m
.7721 .59095 L
s
.3796 1.03144 m
.40841 .99166 L
s
.43101 .99138 m
.44416 .93761 L
s
.31292 .42802 m
.28471 .44009 L
s
.40946 .93888 m
.40653 .89362 L
s
.68732 .82187 m
.65202 .78439 L
s
.65145 .71999 m
.64803 .67788 L
s
.44929 .47972 m
.43224 .43084 L
s
.45774 .53341 m
.44929 .47972 L
s
.7309 .86643 m
.67902 .84589 L
s
.65714 .5921 m
.70375 .5613 L
s
.63087 .63725 m
.65714 .5921 L
s
.23762 .9907 m
.26491 1.0165 L
s
.381 .88884 m
.34787 .86101 L
s
.40243 .433 m
.37627 .40892 L
s
.2276 .51362 m
.25148 .55773 L
s
.45239 .5726 m
.45774 .53341 L
s
.25669 .45659 m
.25034 .49455 L
s
.29844 .59046 m
.35017 .59861 L
s
.79351 .82343 m
.74149 .83737 L
s
.21604 .93069 m
.21546 .97497 L
s
.64427 .69892 m
.64105 .65718 L
s
.69143 .79713 m
.65533 .76306 L
s
.28927 1.02776 m
.32976 1.02148 L
s
.70375 .5613 m
.75439 .55761 L
s
.3848 .58641 m
.41462 .57235 L
s
.40841 .99166 m
.4258 .93899 L
s
.4737 .48209 m
.46454 .4319 L
s
.47812 .53665 m
.4737 .48209 L
s
.82873 .74647 m
.79924 .78821 L
s
.64143 .5707 m
.68381 .53513 L
s
.61773 .61842 m
.64143 .5707 L
s
.7721 .59095 m
.80938 .62096 L
s
.82058 .65925 m
.82643 .70755 L
s
.39553 .93747 m
.39237 .89179 L
s
.28407 .84932 m
.23167 .87168 L
s
.33761 .85408 m
.28407 .84932 L
s
.47392 .57579 m
.47812 .53665 L
s
.35285 1.0275 m
.38826 .99013 L
s
.63376 .6786 m
.63087 .63725 L
s
.74149 .83737 m
.68732 .82187 L
s
.49938 .48703 m
.49844 .43641 L
s
.49951 .54202 m
.49938 .48703 L
s
.69118 .77203 m
.65515 .74149 L
s
.62252 .55099 m
.65952 .51112 L
s
.60194 .60098 m
.62252 .55099 L
s
.43224 .43084 m
.41446 .40475 L
s
.23167 .87168 m
.19959 .91278 L
s
.34214 .41685 m
.31915 .42675 L
s
.62014 .65936 m
.61773 .61842 L
s
.68381 .53513 m
.73043 .52617 L
s
.49648 .5812 m
.49951 .54202 L
s
.40737 .58332 m
.43245 .57152 L
s
.52564 .49465 m
.53304 .44449 L
s
.52136 .54958 m
.52564 .49465 L
s
.60087 .53329 m
.6315 .48971 L
s
.58392 .58518 m
.60087 .53329 L
s
.38826 .99013 m
.40946 .93888 L
s
.25148 .55773 m
.29844 .59046 L
s
.57708 .51787 m
.60051 .47128 L
s
.56413 .57124 m
.57708 .51787 L
s
.55177 .50495 m
.56738 .45614 L
s
.54309 .55933 m
.55177 .50495 L
s
.37271 .885 m
.33761 .85408 L
s
.31769 .57882 m
.36558 .59163 L
s
.60375 .64152 m
.60194 .60098 L
s
.68648 .74699 m
.65145 .71999 L
s
.57259 1.28242 m
.57185 1.34013 L
s
.56732 1.23057 m
.57259 1.28242 L
s
.51947 .58889 m
.52136 .54958 L
s
.52582 1.29526 m
.52165 1.35279 L
s
.52787 1.24314 m
.52582 1.29526 L
s
.74661 .80734 m
.69143 .79713 L
s
.58498 .62534 m
.58392 .58518 L
s
.79924 .78821 m
.74661 .80734 L
s
.54229 .59887 m
.54309 .55933 L
s
.61789 1.26595 m
.62069 1.32364 L
s
.60534 1.21489 m
.61789 1.26595 L
s
.56432 .61107 m
.56413 .57124 L
s
.38437 .93498 m
.381 .88884 L
s
.75439 .55761 m
.79055 .58383 L
s
.46454 .4319 m
.4557 .40474 L
s
.65952 .51112 m
.70078 .4973 L
s
.4327 .58265 m
.45239 .5726 L
s
.47853 1.30443 m
.47111 1.3616 L
s
.48783 1.25256 m
.47853 1.30443 L
s
.28471 .44009 m
.28025 .47809 L
s
.67738 .72243 m
.64427 .69892 L
s
.82643 .70755 m
.79795 .75243 L
s
.26491 1.0165 m
.31091 1.01369 L
s
.21546 .97497 m
.24623 1.00339 L
s
.80938 .62096 m
.81623 .66886 L
s
.32976 1.02148 m
.37103 .98703 L
s
.66077 1.24594 m
.66717 1.3034 L
s
.6411 1.19621 m
.66077 1.24594 L
s
.25034 .49455 m
.27357 .54147 L
s
.57185 1.34013 m
.56491 1.38307 L
s
.37103 .98703 m
.39553 .93747 L
s
.49844 .43641 m
.49886 .40914 L
s
.6315 .48971 m
.66619 .47159 L
s
.52165 1.35279 m
.51646 1.39515 L
s
.37627 .40892 m
.35918 .41722 L
s
.62069 1.32364 m
.61224 1.36735 L
s
.746 .77683 m
.69118 .77203 L
s
.5587 1.20322 m
.56732 1.23057 L
s
.19959 .91278 m
.20016 .95753 L
s
.27639 .83684 m
.22276 .85482 L
s
.3315 .84636 m
.27639 .83684 L
s
.52784 1.21521 m
.52787 1.24314 L
s
.66404 .69879 m
.63376 .6786 L
s
.46012 .58464 m
.47392 .57579 L
s
.3421 .56938 m
.3848 .58641 L
s
.5883 1.18878 m
.60534 1.21489 L
s
.60051 .47128 m
.62759 .44956 L
s
.53304 .44449 m
.54272 .41812 L
s
.43172 1.30996 m
.42127 1.36661 L
s
.44804 1.25883 m
.43172 1.30996 L
s
.56738 .45614 m
.58604 .43164 L
s
.47111 1.3616 m
.46789 1.40358 L
s
.36778 .88058 m
.3315 .84636 L
s
.73043 .52617 m
.76442 .54867 L
s
.49641 1.22472 m
.48783 1.25256 L
s
.7003 1.22256 m
.71028 1.27956 L
s
.67384 1.1747 m
.7003 1.22256 L
s
.37627 .93167 m
.37271 .885 L
s
.66717 1.3034 m
.65747 1.34805 L
s
.27357 .54147 m
.31769 .57882 L
s
.64674 .67648 m
.62014 .65936 L
s
.616 1.17201 m
.6411 1.19621 L
s
.48891 .58947 m
.49648 .5812 L
s
.79795 .75243 m
.746 .77683 L
s
.22276 .85482 m
.19053 .89362 L
s
.73955 .7464 m
.68648 .74699 L
s
.62587 .6559 m
.60375 .64152 L
s
.51827 .59721 m
.51947 .58889 L
s
.35716 .98262 m
.38437 .93498 L
s
.46509 1.23172 m
.44804 1.25883 L
s
.60194 .63741 m
.58498 .62534 L
s
.41446 .40475 m
.40378 .4121 L
s
.54742 .60785 m
.54229 .59887 L
s
.42127 1.36661 m
.4202 1.40842 L
s
.57556 .62131 m
.56432 .61107 L
s
.64118 1.15304 m
.67384 1.1747 L
s
.38635 1.31192 m
.37315 1.36792 L
s
.40935 1.26201 m
.38635 1.31192 L
s
.79055 .58383 m
.79818 .63117 L
s
.37107 .56264 m
.40737 .58332 L
s
.71028 1.27956 m
.69962 1.32528 L
s
.31915 .42675 m
.31666 .46497 L
s
.31091 1.01369 m
.35716 .98262 L
s
.81623 .66886 m
.78949 .71677 L
s
.70078 .4973 m
.73157 .51623 L
s
.73561 1.19605 m
.74909 1.25233 L
s
.70281 1.15059 m
.73561 1.19605 L
s
.72731 .71659 m
.67738 .72243 L
s
.28025 .47809 m
.30211 .52774 L
s
.24623 1.00339 m
.29682 1.00451 L
s
.37147 .92783 m
.36778 .88058 L
s
.43458 1.23628 m
.40935 1.26201 L
s
.27443 .82385 m
.22089 .83736 L
s
.3298 .83826 m
.27443 .82385 L
s
.36638 .87587 m
.3298 .83826 L
s
.4557 .40474 m
.45174 .41181 L
s
.30211 .52774 m
.3421 .56938 L
s
.20016 .95753 m
.23382 .98892 L
s
.66326 1.13209 m
.70281 1.15059 L
s
.78949 .71677 m
.73955 .7464 L
s
.56491 1.38307 m
.55385 1.39514 L
s
.347 .97722 m
.37627 .93167 L
s
.40387 .55903 m
.4327 .58265 L
s
.66619 .47159 m
.69282 .48725 L
s
.61224 1.36735 m
.59508 1.38073 L
s
.51646 1.39515 m
.5118 1.4064 L
s
.37315 1.36792 m
.37437 1.40981 L
s
.70947 .68798 m
.66404 .69879 L
s
.74909 1.25233 m
.73777 1.29925 L
s
.55133 1.21085 m
.5587 1.20322 L
s
.19053 .89362 m
.19228 .93899 L
s
.57448 1.19751 m
.5883 1.18878 L
s
.52715 1.22228 m
.52784 1.21521 L
s
.3434 1.31049 m
.32779 1.36572 L
s
.37263 1.26223 m
.3434 1.31049 L
s
.49886 .40914 m
.5017 .41665 L
s
.76442 .54867 m
.7726 .5953 L
s
.65747 1.34805 m
.6346 1.36321 L
s
.62759 .44956 m
.64919 .46234 L
s
.76587 1.1667 m
.78267 1.22202 L
s
.72734 1.12415 m
.76587 1.1667 L
s
.46789 1.40358 m
.46982 1.41452 L
s
.59609 1.18236 m
.616 1.17201 L
s
.35918 .41722 m
.35868 .45586 L
s
.50249 1.23177 m
.49641 1.22472 L
s
.79818 .63117 m
.7739 .68193 L
s
.43962 .55889 m
.46012 .58464 L
s
.54272 .41812 m
.55224 .42675 L
s
.58604 .43164 m
.60188 .44205 L
s
.68639 .66114 m
.64674 .67648 L
s
.37012 .92375 m
.36638 .87587 L
s
.29682 1.00451 m
.347 .97722 L
s
.68174 1.1094 m
.72734 1.12415 L
s
.40556 1.23848 m
.37263 1.26223 L
s
.22089 .83736 m
.18929 .87387 L
s
.7739 .68193 m
.72731 .71659 L
s
.61565 1.16552 m
.64118 1.15304 L
s
.4779 1.23931 m
.46509 1.23172 L
s
.69962 1.32528 m
.67156 1.34268 L
s
.33643 .51717 m
.37107 .56264 L
s
.34085 .97115 m
.37147 .92783 L
s
.31666 .46497 m
.33643 .51717 L
s
.6586 .63659 m
.62587 .6559 L
s
.47735 .56248 m
.48891 .58947 L
s
.33264 .83016 m
.27842 .81086 L
s
.36862 .87119 m
.33264 .83016 L
s
.4202 1.40842 m
.42879 1.41957 L
s
.78267 1.22202 m
.77101 1.27021 L
s
.32779 1.36572 m
.3314 1.40792 L
s
.73157 .51623 m
.74002 .56204 L
s
.62679 .61482 m
.60194 .63741 L
s
.27842 .81086 m
.22632 .81993 L
s
.63273 1.14714 m
.66326 1.13209 L
s
.51601 .56991 m
.51827 .59721 L
s
.23382 .98892 m
.28788 .99438 L
s
.59178 .59625 m
.57556 .62131 L
s
.55451 .58121 m
.54742 .60785 L
s
.40378 .4121 m
.40522 .45133 L
s
.45393 1.24494 m
.43458 1.23628 L
s
.79033 1.1349 m
.8102 1.18898 L
s
.74682 1.09575 m
.79033 1.1349 L
s
.30382 1.30586 m
.28617 1.36022 L
s
.33871 1.25966 m
.30382 1.30586 L
s
.69615 1.08525 m
.74682 1.09575 L
s
.75144 .64862 m
.70947 .68798 L
s
.37231 .91975 m
.36862 .87119 L
s
.7726 .5953 m
.75144 .64862 L
s
.73777 1.29925 m
.70511 1.31931 L
s
.37871 1.23847 m
.33871 1.25966 L
s
.19228 .93899 m
.2281 .97365 L
s
.37569 .51035 m
.40387 .55903 L
s
.64691 1.12743 m
.68174 1.1094 L
s
.28788 .99438 m
.34085 .97115 L
s
.3389 .96479 m
.37012 .92375 L
s
.37437 1.40981 m
.38959 1.42168 L
s
.69282 .48725 m
.70122 .53212 L
s
.18929 .87387 m
.19224 .92002 L
s
.45174 .41181 m
.45499 .45179 L
s
.35868 .45586 m
.37569 .51035 L
s
.34007 .8225 m
.28841 .79843 L
s
.37449 .8669 m
.34007 .8225 L
s
.43115 1.24874 m
.40556 1.23848 L
s
.55385 1.39514 m
.54209 1.37102 L
s
.72256 .61754 m
.68639 .66114 L
s
.59508 1.38073 m
.57488 1.35806 L
s
.8102 1.18898 m
.7985 1.23851 L
s
.5118 1.4064 m
.50875 1.38146 L
s
.22632 .81993 m
.19618 .85426 L
s
.55019 1.25108 m
.55133 1.21085 L
s
.57134 1.23807 m
.57448 1.19751 L
s
.6346 1.36321 m
.60638 1.34261 L
s
.65786 1.10663 m
.69615 1.08525 L
s
.28617 1.36022 m
.29224 1.403 L
s
.64919 .46234 m
.6572 .50622 L
s
.76074 1.06579 m
.80832 1.10109 L
s
.70613 1.05999 m
.76074 1.06579 L
s
.41883 .50774 m
.43962 .55889 L
s
.52814 1.26236 m
.52715 1.22228 L
s
.59111 1.22343 m
.59609 1.18236 L
s
.37802 .91613 m
.37449 .8669 L
s
.5017 .41665 m
.50657 .4575 L
s
.74002 .56204 m
.72256 .61754 L
s
.77101 1.27021 m
.73447 1.29333 L
s
.80832 1.10109 m
.83091 1.15367 L
s
.28841 .79843 m
.23913 .80324 L
s
.5057 1.2719 m
.50249 1.23177 L
s
.60188 .44205 m
.60916 .4849 L
s
.46982 1.41452 m
.47557 1.38941 L
s
.68793 .58937 m
.6586 .63659 L
s
.60904 1.20724 m
.61565 1.16552 L
s
.55224 .42675 m
.55846 .46857 L
s
.34126 .95849 m
.37231 .91975 L
s
.67156 1.34268 m
.6359 1.32476 L
s
.26856 1.29831 m
.24928 1.35174 L
s
.30838 1.25455 m
.26856 1.29831 L
s
.35468 1.23643 m
.30838 1.25455 L
s
.2281 .97365 m
.2844 .98374 L
s
.2844 .98374 m
.3389 .96479 L
s
.41008 1.25082 m
.37871 1.23847 L
s
.46466 .50969 m
.47735 .56248 L
s
.3314 1.40792 m
.35307 1.42103 L
s
.40522 .45133 m
.41883 .50774 L
s
.62471 1.18965 m
.63273 1.14714 L
s
.48337 1.2797 m
.4779 1.23931 L
s
.66528 1.085 m
.70613 1.05999 L
s
.64843 .56472 m
.62679 .61482 L
s
.35201 .8157 m
.30433 .78714 L
s
.38393 .8633 m
.35201 .8157 L
s
.51189 .51639 m
.51601 .56991 L
s
.42879 1.41957 m
.4433 1.39492 L
s
.70122 .53212 m
.68793 .58937 L
s
.60511 .54409 m
.59178 .59625 L
s
.55916 .5279 m
.55451 .58121 L
s
.70511 1.31931 m
.66275 1.30463 L
s
.76869 1.03471 m
.8193 1.06578 L
s
.71141 1.03398 m
.76869 1.03471 L
s
.63773 1.17084 m
.64691 1.12743 L
s
.38716 .91322 m
.38393 .8633 L
s
.83091 1.15367 m
.8195 1.20456 L
s
.46167 1.2858 m
.45393 1.24494 L
s
.19224 .92002 m
.22938 .95817 L
s
.7985 1.23851 m
.75889 1.26501 L
s
.45499 .45179 m
.46466 .50969 L
s
.34791 .95265 m
.37802 .91613 L
s
.66899 1.06284 m
.71141 1.03398 L
s
.8193 1.06578 m
.84415 1.11661 L
s
.6572 .50622 m
.64843 .56472 L
s
.64778 1.15102 m
.65786 1.10663 L
s
.24928 1.35174 m
.2578 1.39534 L
s
.39124 1.25134 m
.35468 1.23643 L
s
.19618 .85426 m
.20026 .90133 L
s
.30433 .78714 m
.25923 .78797 L
s
.57488 1.35806 m
.55832 1.30799 L
s
.23913 .80324 m
.21127 .83554 L
s
.28656 .97308 m
.34126 .95849 L
s
.54209 1.37102 m
.53295 1.3198 L
s
.60638 1.34261 m
.58271 1.29423 L
s
.38959 1.42168 m
.41263 1.39811 L
s
.50657 .4575 m
.51189 .51639 L
s
.44108 1.29028 m
.43115 1.24874 L
s
.58271 1.29423 m
.57134 1.23807 L
s
.55832 1.30799 m
.55019 1.25108 L
s
.73447 1.29333 m
.68629 1.28241 L
s
.28243 1.24719 m
.23849 1.2882 L
s
.33409 1.23262 m
.28243 1.24719 L
s
.36824 .81018 m
.32589 .77754 L
s
.39675 .86072 m
.36824 .81018 L
s
.60916 .4849 m
.60511 .54409 L
s
.60556 1.27859 m
.59111 1.22343 L
s
.29224 1.403 m
.32007 1.41784 L
s
.53295 1.3198 m
.52814 1.26236 L
s
.50875 1.38146 m
.50717 1.32964 L
s
.55846 .46857 m
.55916 .5279 L
s
.39954 .91132 m
.39675 .86072 L
s
.6546 1.13043 m
.66528 1.085 L
s
.6359 1.32476 m
.60556 1.27859 L
s
.23849 1.2882 m
.21804 1.34065 L
s
.62635 1.26117 m
.60904 1.20724 L
s
.77039 1.00304 m
.82285 1.02956 L
s
.71182 1.00762 m
.77039 1.00304 L
s
.50717 1.32964 m
.5057 1.2719 L
s
.66887 1.04045 m
.71182 1.00762 L
s
.22938 .95817 m
.28656 .97308 L
s
.35875 .94763 m
.38716 .91322 L
s
.47557 1.38941 m
.48157 1.33751 L
s
.64456 1.24214 m
.62471 1.18965 L
s
.66275 1.30463 m
.62635 1.26117 L
s
.4221 1.29324 m
.41008 1.25082 L
s
.48157 1.33751 m
.48337 1.2797 L
s
.8195 1.20456 m
.77771 1.23472 L
s
.84415 1.11661 m
.83336 1.16884 L
s
.65797 1.10932 m
.66899 1.06284 L
s
.65975 1.22167 m
.63773 1.17084 L
s
.3751 1.25049 m
.33409 1.23262 L
s
.75889 1.26501 m
.70591 1.25834 L
s
.82285 1.02956 m
.84944 1.0784 L
s
.35307 1.42103 m
.38425 1.39913 L
s
.41268 .85947 m
.38845 .80633 L
s
.41487 .91069 m
.41268 .85947 L
s
.29441 .9629 m
.34791 .95265 L
s
.38845 .80633 m
.35268 .77016 L
s
.4433 1.39492 m
.45672 1.34348 L
s
.32589 .77754 m
.28627 .77482 L
s
.45672 1.34348 m
.46167 1.2858 L
s
.70731 .98135 m
.76572 .9713 L
s
.66489 1.01817 m
.70731 .98135 L
s
.68629 1.28241 m
.64456 1.24214 L
s
.67151 1.2 m
.64778 1.15102 L
s
.6578 1.088 m
.66887 1.04045 L
s
.20026 .90133 m
.2378 .9431 L
s
.76572 .9713 m
.81874 .99305 L
s
.37354 .94382 m
.39954 .91132 L
s
.25923 .78797 m
.23441 .81847 L
s
.40517 1.29484 m
.39124 1.25134 L
s
.2578 1.39534 m
.29135 1.41241 L
s
.21127 .83554 m
.21638 .88366 L
s
.43134 .85982 m
.41215 .80452 L
s
.43278 .9116 m
.43134 .85982 L
s
.43318 1.34763 m
.44108 1.29028 L
s
.67952 1.17741 m
.6546 1.13043 L
s
.41263 1.39811 m
.43318 1.34763 L
s
.65403 1.06676 m
.66489 1.01817 L
s
.69795 .95559 m
.75469 .94008 L
s
.65714 .99634 m
.69795 .95559 L
s
.70591 1.25834 m
.65975 1.22167 L
s
.41215 .80452 m
.38406 .7655 L
s
.77771 1.23472 m
.72111 1.23269 L
s
.83336 1.16884 m
.79035 1.20288 L
s
.2378 .9431 m
.29441 .9629 L
s
.30784 .9537 m
.35875 .94763 L
s
.39194 .94153 m
.41487 .91069 L
s
.84944 1.0784 m
.83955 1.13192 L
s
.32007 1.41784 m
.35882 1.3982 L
s
.68352 1.15418 m
.65797 1.10932 L
s
.81874 .99305 m
.84643 1.0397 L
s
.35268 .77016 m
.3197 .76445 L
s
.75469 .94008 m
.8069 .95696 L
s
.64674 1.04589 m
.65714 .99634 L
s
.45229 .86199 m
.43879 .80505 L
s
.45284 .91426 m
.45229 .86199 L
s
.72111 1.23269 m
.67151 1.2 L
s
.41149 1.35011 m
.4221 1.29324 L
s
.39071 1.29526 m
.3751 1.25049 L
s
.68394 .93077 m
.73751 .90995 L
s
.64577 .97528 m
.68394 .93077 L
s
.43879 .80505 m
.41928 .76396 L
s
.38425 1.39913 m
.41149 1.35011 L
s
.68334 1.13064 m
.6578 1.088 L
s
.63607 1.02573 m
.64577 .97528 L
s
.4135 .94109 m
.43278 .9116 L
s
.475 .86618 m
.46768 .80818 L
s
.47451 .91882 m
.475 .86618 L
s
.73142 1.20582 m
.67952 1.17741 L
s
.28627 .77482 m
.2652 .80383 L
s
.66561 .90733 m
.71456 .88148 L
s
.63108 .95532 m
.66561 .90733 L
s
.79035 1.20288 m
.73142 1.20582 L
s
.32659 .94598 m
.37354 .94382 L
s
.62226 1.00655 m
.63108 .95532 L
s
.21638 .88366 m
.25331 .92909 L
s
.39215 1.35107 m
.40517 1.29484 L
s
.67892 1.10714 m
.65403 1.06676 L
s
.46768 .80818 m
.45741 .76589 L
s
.73751 .90995 m
.7875 .92196 L
s
.49887 .87252 m
.49807 .81408 L
s
.49725 .92541 m
.49887 .87252 L
s
.38406 .7655 m
.35876 .75747 L
s
.25331 .92909 m
.30784 .9537 L
s
.83955 1.13192 m
.79637 1.16995 L
s
.23441 .81847 m
.2404 .86774 L
s
.61343 .93676 m
.64343 .88566 L
s
.60565 .98864 m
.61343 .93676 L
s
.43765 .94273 m
.45284 .91426 L
s
.64343 .88566 m
.68639 .85521 L
s
.8069 .95696 m
.83499 1.00125 L
s
.29135 1.41241 m
.33693 1.39556 L
s
.52328 .88108 m
.52914 .82286 L
s
.52044 .93408 m
.52328 .88108 L
s
.7365 1.17809 m
.68352 1.15418 L
s
.84643 1.0397 m
.83772 1.09441 L
s
.49807 .81408 m
.49741 .77152 L
s
.67031 1.08405 m
.64674 1.04589 L
s
.59326 .91985 m
.61798 .86611 L
s
.58664 .97225 m
.59326 .91985 L
s
.35882 1.3982 m
.39215 1.35107 L
s
.54758 .89187 m
.56004 .83452 L
s
.54347 .94482 m
.54758 .89187 L
s
.57111 .90483 m
.58993 .84899 L
s
.56574 .95759 m
.57111 .90483 L
s
.61798 .86611 m
.65374 .83165 L
s
.52914 .82286 m
.53819 .78097 L
s
.46378 .94666 m
.47451 .91882 L
s
.58993 .84899 m
.61747 .81121 L
s
.35025 .9402 m
.39194 .94153 L
s
.37564 1.35072 m
.39071 1.29526 L
s
.65766 1.06173 m
.63607 1.02573 L
s
.56004 .83452 m
.57859 .79424 L
s
.71456 .88148 m
.76091 .88879 L
s
.7361 1.14994 m
.68334 1.13064 L
s
.41928 .76396 m
.40243 .75439 L
s
.79637 1.16995 m
.7365 1.17809 L
s
.64123 1.04053 m
.62226 1.00655 L
s
.49118 .95302 m
.49725 .92541 L
s
.3197 .76445 m
.30301 .79233 L
s
.6214 1.02078 m
.60565 .98864 L
s
.27566 .91677 m
.32659 .94598 L
s
.51912 .96185 m
.52044 .93408 L
s
.7875 .92196 m
.81521 .96379 L
s
.68639 .85521 m
.72774 .85812 L
s
.73013 1.12181 m
.67892 1.10714 L
s
.83772 1.09441 m
.79544 1.13649 L
s
.33693 1.39556 m
.37564 1.35072 L
s
.59866 1.00281 m
.58664 .97225 L
s
.54684 .97316 m
.54347 .94482 L
s
.37822 .93677 m
.4135 .94109 L
s
.57359 .98686 m
.56574 .95759 L
s
.45741 .76589 m
.44956 .75561 L
s
.2404 .86774 m
.27566 .91677 L
s
.83499 1.00125 m
.82769 1.05702 L
s
.2652 .80383 m
.27186 .85433 L
s
.79544 1.13649 m
.7361 1.14994 L
s
.65374 .83165 m
.68882 .83059 L
s
.71861 1.09418 m
.67031 1.08405 L
s
.49741 .77152 m
.49882 .76141 L
s
.40981 .93606 m
.43765 .94273 L
s
.61747 .81121 m
.6452 .80676 L
s
.35876 .75747 m
.34691 .78464 L
s
.53819 .78097 m
.54881 .77192 L
s
.57859 .79424 m
.59808 .78709 L
s
.76091 .88879 m
.78743 .92811 L
s
.30439 .90676 m
.35025 .9402 L
s
.70173 1.06753 m
.65766 1.06173 L
s
.78741 1.10306 m
.73013 1.12181 L
s
.44416 .93836 m
.46378 .94666 L
s
.82769 1.05702 m
.78741 1.10306 L
s
.81521 .96379 m
.80952 1.02045 L
s
.67983 1.04235 m
.64123 1.04053 L
s
.27186 .85433 m
.30439 .90676 L
s
.48034 .94384 m
.49118 .95302 L
s
.30301 .79233 m
.31007 .84409 L
s
.40243 .75439 m
.39577 .78129 L
s
.72774 .85812 m
.75224 .89497 L
s
.65341 1.01909 m
.6214 1.02078 L
s
.33882 .89964 m
.37822 .93677 L
s
.51735 .95262 m
.51912 .96185 L
s
.77231 1.07028 m
.71861 1.09418 L
s
.62312 .99816 m
.59866 1.00281 L
s
.55415 .96469 m
.54684 .97316 L
s
.58973 .97993 m
.57359 .98686 L
s
.44956 .75561 m
.44824 .78272 L
s
.68882 .83059 m
.71051 .86508 L
s
.80952 1.02045 m
.77231 1.07028 L
s
.78743 .92811 m
.78348 .98545 L
s
.75038 1.03878 m
.70173 1.06753 L
s
.3781 .89588 m
.40981 .93606 L
s
.34691 .78464 m
.35409 .83765 L
s
.6452 .80676 m
.66331 .8391 L
s
.49882 .76141 m
.50284 .7892 L
s
.31007 .84409 m
.33882 .89964 L
s
.59808 .78709 m
.61197 .81755 L
s
.54881 .77192 m
.55795 .80084 L
s
.72205 1.00919 m
.67983 1.04235 L
s
.42116 .8959 m
.44416 .93836 L
s
.75224 .89497 m
.75011 .95275 L
s
.78348 .98545 m
.75038 1.03878 L
s
.68798 .98209 m
.65341 1.01909 L
s
.39577 .78129 m
.40275 .8355 L
s
.46681 .89999 m
.48034 .94384 L
s
.35409 .83765 m
.3781 .89588 L
s
.64901 .95804 m
.62312 .99816 L
s
.51376 .90829 m
.51735 .95262 L
s
.71051 .86508 m
.7102 .92307 L
s
.60618 .9375 m
.58973 .97993 L
s
.56067 .92083 m
.55415 .96469 L
s
.75011 .95275 m
.72205 1.00919 L
s
.44824 .78272 m
.4547 .83804 L
s
.66331 .8391 m
.66475 .89702 L
s
.40275 .8355 m
.42116 .8959 L
s
.50284 .7892 m
.50844 .84548 L
s
.7102 .92307 m
.68798 .98209 L
s
.61197 .81755 m
.61502 .87516 L
s
.55795 .80084 m
.56241 .85789 L
s
.4547 .83804 m
.46681 .89999 L
s
.66475 .89702 m
.64901 .95804 L
s
.50844 .84548 m
.51376 .90829 L
s
.61502 .87516 m
.60618 .9375 L
s
.56241 .85789 m
.56067 .92083 L
s
0 g
.25 Mabswid
.64917 0 m
.92359 .3908 L
s
.92359 .3908 m
1 1.43558 L
s
1 1.43558 m
.67775 1.09881 L
s
.67775 1.09881 m
.64917 0 L
s
.08442 .22216 m
0 1.29193 L
s
0 1.29193 m
.67775 1.09881 L
s
.67775 1.09881 m
.64917 0 L
s
.64917 0 m
.08442 .22216 L
s
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
 ImageSize->{159, 252.438},
 ImageMargins->{{43, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 ImageCache->GraphicsData["CompressedBitmap", "\<\
eJzNXfuzXMVxHt2z96mrFxJCIIyuEWBi80wsA44xJsEQygG/icupOMEuV9k/
pJJy/P/kH03ViXZe3dP9dc/M3hW2qrR77px5dH/T06+Zc/azL//8h9//55d/
/uPvvrz45E9f/vcf/vi7/7n4+L/+9LhouRJC+N/H///vImyv18eX+eP36+N/
B9vrd7dXIfx2+7XEm8uaikL8eif98R+1waZe5Vv/VpsexYKltI29fSdd/Gtt
dWpX+lXt6Wos2NRKueKj9P3LWu96LDhs6pVOv50ufl5HviVG3v51AMreTg1/
Uke5Pdfw8zriXVBpAWVvpYY/qiPeA5U2oOzN1PDTOuL9uYYf1xG/BiodgrI3
UsOP6ogXoJIUhO1fr6eGH9YRX5xr+EEd8WVQ6RiUvZYafq+O+A1Q6QSUfSs1
fK82/OZcw3cqqW8MNkwDJJGNd94CleTK2f71N6nh39YR/w5UOgNlr6aGb9YR
H801fL2O+C6odBWUJfQTq/HOd0Glc1D2Smr4ah3x/bmGL9cRPwCVroGyJGHh
YR3xH0Cl66DspdTwoo740VzDF+qIn4BKN0DZw9Twfh3xU1DpJihLyy9pmnjn
n+ca3q2k/hhUQrr266nh7TriT0Glp0BZUjGpzzjiL0AlpKQfpIbX64hfzDVE
svEvoOwOKHthrounQdnXWBeR71/t0FCYWjQ2MlPP8y6UIUY4PgPK7vNesJn+
5S5d9W3xz0AZsqrPpW6R+kB2E4nss2YZ7BZZ1Z+AsmgnNhbPexhgUweIV8v2
Cinue/ZQyF7/OHcuJpu6P9heIdPyjD0Qsu+fo4FC1Vlrx+betUdD1T+TZYE8
yksMhYx6o4mzHx67Pdr+ubgYPm0Phar/CJTFAQ63vcTpjezlqKBQg7q6Y4+M
pKrYqTXFJPGvg8pa0TtrO7eT46Kyf4qfh3zc0nsysBtrHdyeG6hY8MLCVtlF
3m4g3jLfaNyn7HGRZvhYdp8YjWv8WitAk6Mhx+UjBieDsnCbByq98YVyAMrQ
/KZFBmlF7sk/xs/jhv30Reu2wMbqKNlDI0EikKvzoSRCElKJOJVioAjf1kWz
4ZCEnKgfxM8j1D2EpCiCA7D8ETk3bHKQh/UD1Hcofx1XOTVJQuKDBr9u04Xc
tg+2n1zllemKg0YzFIV94xJir9U5QjaZEGWcDtqFnMjhJDBNM0wGciUbPJSX
sVRQDH2GVui5TQHyRL9PXLYzEmX5tBDDxZrMSabggEQcjosczvetcZeKPTlP
SLctVZksJNllCA8F5Kc+U6kpPhcf77k6HnIvIpmHkp2C0kmlEDm8V20ykd97
s46iVm/gNBzKu2UVNExkCokJf9VtKifIXXQ4eQ6URVN0SEMpXwRRQEbEZ/Va
vStka8PKVi5vm0EiSuvIDDKnDgwoeXhcKUXq2Bxe2r7CTq5D80g45Shdy3Ac
JHLuqL6Q3bmA7XfmGgHyPCijgIjo27RX3JS23AnmBDzXLDaPajO6aixwzxVz
eETZ3aXKDyk0QStxsoyybMipANQ3sFDIgOiHIHUZ8sXObFhe4GWcDGNtFxUm
SWHzNAIUXDCKv1QsPOvcZCPvZQZCojCTeQjWx8o9XeQnOnDFlbKptJFe8jAz
ygTtDV9D8IwOd5Q7Di2Mx9THpkBX/iOttgte94mAtfkXKCLbEB14qm21e0kI
Gx21kX3JqD805ptMjGkA0Vwgb7CHHwsFMJKrb5/AQrosWpi/IiRF1ug/HySL
WC47kVItv1Ho5CAWXTKszgsEirtEoweSweras/JjQCarzvFqOmq0a9X5LVfO
lEwCeE92UcSuLLkA8DHjZGW5+lgjMzyq6lLbE9Qv/278iWr1hDFN84I5OthB
MhWwxuI7lIMG0wFnsJ+2fGLe94AtWO7kQSFHAjn/yngTyTAT4KAao0I/CuWm
j9n/YYP6laBrG27CNBiaCEFs2oJd8BX9XM2yW+eawyfya+L2VwvnOaSFwdnc
b/SYiWmUGpQnckC8S6y36xqNwpbThleuxdPSi1QyghXbqdi6KKUgGzUGn/4d
S/pZh7J4NzgXh+e8T4SUqIphMENHkvJybWZ2uhBC1wh0mDkN5BcjyTHpcLBE
O20kmgvErYj9kYTFXNz7hU6YFOmUU3MdcOZ2nrEZsnMrTk8PgWqsVWT3r0rJ
pO8pKzS6vqu3LhaDIX5Ui+sAGfZb2ROUXj7tAGi5jWqMJth/CnGzy7cXYqbA
rxsyVonFCoCNYy7xXtmKtwwcbJ+W2KaqIqFxjkQjcz+82BGEgXApuzu+VnFC
xNxXrIYT1Ybc7Iqa3lTtrbKV54vOwOyN47jhPLf3jJiB++ZcLRQTQ5iprPuK
/apdUPNyE1zkVNReRGUjZVHCZ0z7QV1/yGKYmMFUS75u6xg+mJn7RPtFDnrF
6uC1h2yIyEJfp8K6tBrJUP4YXFAJf5akAN8I6dXJXK95vneBxFCMUxkIlb3R
xiKH/9o8hqqIDQcXW1QPbLT+ZAyQcWD5UpA4QBt503iuq5auFXtG5ro+zdQL
d5ekqut8WOh2vD82keV2ikZMMzOJmTKghpEJuMxeePl0kmBQYWH7GsJnM+wR
l6sgwCVFbOzz7EuFkbIXDhLepQ84L2aEeSFvo6HJJkxYoG3qErX6yFwZEhDb
ofMLkyhRZ0Kpm4EvAoM2eTajsCAthNRNMYHNAndOWaA+JsOCOxh3TwVYy4AL
X6OBGTvQ23bC8sIeaoHqEQXsbghqCR+RzLXwOd6YfQgXZIjM1ClzqoGtuUQK
sGP0HAOq4obQTivdVuZDaZAVn/jqQSg8a53PMo3ioayfKuBgiVHpeRtTsthR
d8JEErrKNy836YA0Wssnw0gisYw3zgEXEI4dzywYzqkN6LnCyPsufrGx04Pp
RevagTIiLzQKwoIZ97Mu4Q2mRqBjnNhQCto/IsGUTBvqB40xkmm1f5/+xfHQ
8naQjHabdjvLRgfERDk1ewcLrVPo4gGrFXs5tiQP5TN7sJD2NQUMKVhDdbE+
9oGXUsRcXM5ksVyhzQiUUBRYT4L2bG2IHCEm9J7Kx3khU964P2QEKI68LYIw
nO0KyhFCaqZzVGUSyxihUR4NxaBG9mEcpHTLACkVeydoTH49l5AvW+SEmVH4
siuIOmmtvLBGupxcUfrXV3zAwPXhBM5TL0ciF7JWTvvD8n5t6EezLjDenpSx
ZTQOGV4UreZoD5mbMeWRpCg1QudfHMjiCVxSGpvKlO8EwihyfDdP1ZewUdLB
zoGr7W0iHm2YIjrQudweWHpGzR1LbfxaVabWhq+ep4QtgPUWgrYPgeDBx5yF
JYpX6MCpg1s8z0yGQqzGZk1w0e9GAohpZSRbIBkwbgquzFhZmggZdIyeiHMw
Qo+BvLj9FI9wQaEIdQtGKrSRHEIYUHNGlNWuxUxDUkN0ttvzm5BqOrYReVh7
hs6CEkq1PCBfs4j4WtzQRDSPh9aYk2B8ox2S9KNexn6e2QSBmDqv9XSmVfkb
6X8kmVY4kiCkax2G42tVKMdWHG+QVxpiNl6hR9TOKttCsGPZKWhhBJrOsnfY
fB131qAXkBW1fBLF9G2Cr+2SXnqAFBly1tA5+R5vRI0QD6LQfEowVo4yUKyK
Ow/zFH4blCHGH0gMi5CQy7HUMZjq3jtxL0NC1pyjETbVC7QmxdSkBU3beb1h
bMnsa3A0I8dVoJESQorviUERsMYx5eMvMFVxPzgR6fuek0Sg1329UjsTU3ZW
b9BDeEMKFb3m5c22CzEfWN2t+Rky5YQGeuWfAId8WNERIvfIJje+KM1M2hxw
gogFLDkmb3fqGGLwWHYiAMP2BLkrPbZc50NFQPN8obLzcqd1FbcDpekih2yh
fnFMNcnzS9vPk1Z4xS6xfQhplL8ojo28iAnNHCLRNOKpSTYfSsSoJ5U50Dol
L60RNEzXJGKQ1qo+PZIHQIrXdOUvjcmD7edZO+FoNRUNZAchw/If1DPgnafk
uFKbQAcThpz5Hj5iadgeLYlFpTn9gRIaPmzKAWEdmYmsdEOcrGPXmTPy/Trh
YUswymk60EXDRPE1dh4AdIXgDKF1O3+PoOil90znoXlIsdIj21OUzyOxMilI
l00u0OcrL3EUpkDxFoTno/mGcgTJgZdQ6GzHQmu+aV4tmymF5o422od1QIzp
dXrXG7lANijeMu8+ZCwTYf0wnOJMLkJF6ypNiHox5M3TsJMwUrjrTxta5bIs
tLyNQTqvQbGDWsYWoShawqaaNNfM5AJ/tgwDFL29edoCFCAxAmJv1fvr2sc5
zeyJR18dCEVydMPI5mBxm4QZPYdunC/AJ7s828qCgY7q3RFos8NEFX6WwdwV
3tAlzZZ5fgmdHspAH4Jb92gEgCy5UoskIn1zWX3ysOK3963AZqnuSKPyGLfv
cPikopO+CWUItnqcuqCOJiDSls7RjzwfdCmwcdqBiayQPhAWsW9PD0BHOY+C
Tpc7aN4tFbQmS4PGsW5JMWUoqCXEPLP94KamFNwt6SkzO7NIRoke+PRCD7MD
Z+6a9R6v0hFMcXScyI6XO8ihaRLFIYHOoXUunjLJI/bpd4HK0w3CLzUyKyp5
wHAbgQ0Eytrn1Kj5s1vEj+tC5AbahyJasib1ID0YiJdK4Jkzcq3oqryIBqp6
23NsEDOhRH4l1IJlwFM+YHOt8TVO9qhi9C7CIUQ7T+qtpjI0NBp68AaVGe98
6KCsj5yvzL5gzz1QN91DZq0soFcd9kA1DMxBS5/MvwIFjvy7AQUAHxrAom7k
NKzgmbEqdvXsH8NxcJoJ9kZCzlqm3sNUWcUPiswiRlqTYmI2XNAqFvXSvEtx
EDPDqcbTVf8ZQXjbx/YTPU9oqMNRwGj2Eu3HaNx2kfDDFO23mqj0PYkkc2kE
NW23MtfAjLZSemZqRzvCG0cS/XQGlDZaCa3eYUpvdK0pXTCp/tQDYwFrN3Op
4yCgWU6C8zMJJqPeX37CaWWrZxLHDSR6xS9J3ptY2k/NjarKMyye3YzDAKJ2
/FluGwscTXEsQwYmiVaVMH6LXv4tTAiyvXRVEiehRdQLa0cSNLwMpZ6kKRHB
CTBoK09S2j9hN4fNAq5s84qRYFBdDpOlLhMV+a5WuIMEvSAlylDmoIeZYXxt
ZYp9W0TOVSD3WOcZEMKUn3pbCkJRM+SnxJFWG5I206f3XeFYD+GDQmXGySxK
aVrMn/tAZpd0xs7w0KNyxkOnwpFEVvoIc2XIYHcwWludiGvUv5EDCAiUOkn/
0PzZv/Jpg4scKS0W3BVAr12iu1b2z9l+UYqj7wi6kwdCjTgEOjxBkeRO4OFD
82zBDHnCRlbIcxRGYnUxE6aeGUeZOymtroxl9sv2cdZvEvJklPydQMprIaCV
ltoP0OY2ir2R1rf+gU8QQtYQsFgfvT3AQfa52tDaFgP+LMR2IH710zM2ygNv
i/OcUDNsZHMvHNt444SDxklDpwccjJMbihUGGUnzTasgoAlcv/pnyAxIew/y
9b1YJdur+l1Obobp/RaIsklEn5ddFIKPBZHiiXXswRBRUxbMDMeNvawRl6ud
8qDpRVsjSERj72gD20E1hpLmqxWh0tE5AnN1XxpEMxHRICqXDFrYA/iR7zAp
mi/YrK0qb2tYpcqhWE0KbAdTbKSoLzh8UYxmSieXFQs1haZeXfaP2lfw+K2L
7ecZ3cU6jLjnzYMpwGY0zwIv3Cit4KstBS01zXcIwJyXeM2ADcufA9KLYACD
CSGMRnrPQwCliqx9OVMx2G5dCNw2qt65wrw8cA+3n6cQDWIFZr69teiE8AE8
I1dDgjbAQfYcCdPqpotXfHbMweQVzBk7IWz+JNGYm0FXyLDJ51zwMyKRPPS0
oUrvFBWLznM7KMQHeSm8IIJS36e8suTV5bk8eKTVLD5jhR5tRbjFvyaZfM0C
SxmEYN3QrCLibtJA+mQF98bOiVT/ANEkp29jxIYkkt5rFdSPoQy5Zq2T3SKN
nkNz+HjH4kOUXUgImZYtSp7yyfTDiPumUysWFJKBI7LxxlnBE2l/VTyp5xCJ
cdVvAE0RSeMpUU2L8zDeLgTxFdrkCSJB7C0z2Hw9STLomVAhL8JS7hUPlPcj
syFt9E4/kpaawgwtIiu+BaGRm4xPnBylwoHK5/eeCEH5xkld70iQR1f+JDX8
MdNA/8vP0/SUJ/LWkf6fpCoLdRAtMtunjGb2DwekDK5YYQ/URdc02hs+H6Fk
3tSrg2kBkF6nOd0DQRcVrsNEmmzL6WOuUitNxkNOqmwPUvd8RfDYogZ1takY
9sgMe0b4XiWYHh82XryOVkVFFwd9yPLugeh8EiuIX2BmRMONBYMBct+bkL62
XLEjP0nzrQo0c0zVzq9OvIR2Fszfe3pCZF+vUCcL0X0KKSnTVk8FIrS4DV0L
iaLqSdqjro8I3k1XnljCVSryzLm+8RRVnoM9EJ51RwjsWR/TVspAfJBmpFxW
nCC/wnmsk/keqJnTVaEciRl1oylpLwaJ9em50sg/2nkaIzEU1+QFOZ5Uzko8
4MsgQk0dGT9KjDcgMbHvJpoe/3lRWe390hLy7/pzrMQwgIM+BZFxtOPbZbj3
UG6k06FjP/KK/C6ZP+xz4yWFxmckBvDkfSBTr2ap/Zbq3ArQ7VliT03UO7i3
cb7iy7fiRJmvQTZnYOTXAtl6sJSk9t+cB8owF99MQ4X8Uro5Lnqnb4ytLvAD
C42mWuZYeKVOxA3QRv14Rvo3Mg2GPPFlbh5V0XzhA46YpRcrSyiiTCz5r5My
TMSCih2lYeQrVyvnOc7ig+1nrIh0Y5lJvZRH2Pb22A0Xe+SNEVYSknM2hUGs
Sd7shkuUcsFojthsjaABBNiAQkkHQ+iqtWTRSUHMbtStS8uuOAewgKuOHdtl
jxuJOspf2HlD0KngNuJyZfvnlXSFIMlvDnv8561KtXLjin4/arkjWfCkvgsS
VAlOFIewU6/KTv8oqyfk456FDa90K3URgv6hqELGAlhZeoike6eS2L2iJ96v
xWwFzvSiV/w9MwLSte0nRWeOKSplSH6VyQp6GRm2ZF7qxvxtZ4dGeQ+sK+dX
d3pQnlYoldtjQGnCW9yjMAJNQtPcv/F09aibYsat6ESr+eN/PQCz4gpBn/ia
AFAZNuCq7KDwlLTSLbWcnX3wntGwpaK86RL4cj1g81QFekRwd2CH1qSL4aWg
3SHWNmBG9a7lsimEQyTk8cfXB4G0J/2vCtxuS+VjFD5ilyiYug2xjOA9vDR4
+rHeGtxyMA2MvXfZ4HvQg6bRCAnjoJTeTOE8IfieSqAp+HTNC9AjGmU0IVmC
HJYukPy68NpRQ3PPBNM/WGW+xBlFv7cgiAuoOaosJ5R4FFMHRIHHSOjR3ugd
wZI2Hc8G2rK4CXEzTxYPCNUobkWzNbh1DnHPI7eDZSk8bBxyzOyEgjJPTQhP
BsBLZayeHHZaAmMBygpch7Ch0OcyDri5whOA/jPp4zh5AEJT7uREaX7RmwoE
bM5vFe5R5JCaduPAnTUaNMNU23dS0Cszrkm8UECj3kj3VePlBS9jkGGvBh+j
Zd4tR+FcQpUzjRPphNEytJPxxAAiEIxzFS8BMK5KMNCOCFpnu8hIybIoVbEv
CHo7E6WsnO3kTJ5JJFBchVbQXwSJSxgvU7W/Chg+lahcB5Uus2z4EmlQWapM
7wMIZoZMf/01wNqJ5P9G6u2SysI+N2jIgh+xQRR2DQ5bShEoxxIU9OL+26Cz
KV265MUdWsad+H/NNti2S4N8Py5DP3hzJPlGx/4Q3730c1tPP0sclJj0+yck
xsynaI74P5T8o1BVPTHi8jompGP8DxlIbRa/B5jYSE7vpF4CeCJmVK6REAb5
EJuHx+Ly1d79PmBqkUyhhxujfluc5eW85RGK3EB6BCV0EAMHkgEUp0ZdBF9z
1OzvHbd6pSVtnPRPXDLx0Zq4ajYOhcIIdNJURsyFQP0k1xesZ1rzr5iHguvI
z50iE9aWITo+B6hkItBBAvVujUqNP8wXlbkrjE0UbqKyf69w5ORGvEY1f7P9
XFLNByb9bdmvt58bAq1mP5HjHSRTdE4cxzhoYfysNkx7MunADZvvtvpn28+4
m5eyujB8QDm3T+s46W76nTjDSvKyH9aGiW/opiOT+2FtmGanPHcTsIV+v1ZP
mOcHPvBhHF72Xm2YsEgHyUQl5CA/qg2Tjx2+BSqheOPt2jD5Yekrcoaqx7tx
zt5K1d8Alc5A2at1nEep4ZugEkopvFQbphOzeWDgRIuyi9rw/dTw7coZqk5P
R3yYqqPfAkRnLekphR+mhsixQQlhOqXyaWr4CFRaQNnN2vCz1PA7lTNUPS7G
OGc/TdXfzSRxJR0C26n/IpWgI8qHtdKvU9F369jZYIdQ3jz1+OM3qeTva6Xf
5ipX/h+HFL4Q\
\>"],
 ImageRangeCache->{{{0, 158}, {251.438, 0}} -> {0.177815, 0.00271365, \
0.00397075, 0.00397075}}],

Cell[BoxData[
 TagBox[
  RowBox[{"\[SkeletonIndicator]", "Graphics3D", "\[SkeletonIndicator]"}],
  False,
  Editable->False]], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell["LiveGraphics3D", "Subsection"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"<<", "Utilities`LiveGraphics3D`"}]], "Input"],

Cell[BoxData["\<\"LiveGraphics3D.m version 1.16 by Martin Kraus and Eric W. \
Weisstein.\"\>"], "Print"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WriteLiveForm", "[", 
  RowBox[{"\"\<slinky.m\>\"", ",", "g"}], "]"}]], "Input"],

Cell[BoxData["\<\"/Volumes/Data/Troves/MathOzTeX/newlive/slinky.m\"\>"], \
"Output"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Properties", "Section"],

Cell[CellGroupData[{

Cell["Arc Length", "Subsection"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ArcLength", "[", 
  RowBox[{
   RowBox[{"Slinky", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"a", ",", "\[Omega]", ",", "h"}], "}"}], ",", "t"}], "]"}], ",",
    "t", ",", 
   RowBox[{"Assumptions", "->", 
    RowBox[{
     RowBox[{"a", ">", "0"}], "&&", 
     RowBox[{"\[Omega]", ">", "0"}], "&&", 
     RowBox[{"h", ">", "0"}]}]}]}], "]"}]], "Input"],

Cell[BoxData["$Aborted"], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ArcLength", "[", 
  RowBox[{
   RowBox[{"Slinky", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"a", ",", "\[Omega]", ",", "h"}], "}"}], ",", "t"}], "]"}], ",",
    "t", ",", 
   RowBox[{"Assumptions", "->", 
    RowBox[{
     RowBox[{"a", ">", "0"}], "&&", 
     RowBox[{"\[Omega]", ">", "0"}], "&&", 
     RowBox[{"h", ">", "0"}]}]}]}], "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"Integrate", "[", 
  RowBox[{
   RowBox[{"\[Sqrt]", 
    RowBox[{"(", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"h", "+", 
         RowBox[{"a", " ", "\[Omega]", " ", 
          RowBox[{"Cos", "[", 
           RowBox[{"t", " ", "\[Omega]"}], "]"}]}]}], ")"}], "2"], "+", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          RowBox[{"-", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"a", " ", 
              RowBox[{"Cos", "[", 
               RowBox[{"t", " ", "\[Omega]"}], "]"}]}]}], ")"}]}], " ", 
          RowBox[{"Sin", "[", "t", "]"}]}], "-", 
         RowBox[{"a", " ", "\[Omega]", " ", 
          RowBox[{"Cos", "[", "t", "]"}], " ", 
          RowBox[{"Sin", "[", 
           RowBox[{"t", " ", "\[Omega]"}], "]"}]}]}], ")"}], "2"], "+", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          RowBox[{"Cos", "[", "t", "]"}], " ", 
          RowBox[{"(", 
           RowBox[{"1", "+", 
            RowBox[{"a", " ", 
             RowBox[{"Cos", "[", 
              RowBox[{"t", " ", "\[Omega]"}], "]"}]}]}], ")"}]}], "-", 
         RowBox[{"a", " ", "\[Omega]", " ", 
          RowBox[{"Sin", "[", "t", "]"}], " ", 
          RowBox[{"Sin", "[", 
           RowBox[{"t", " ", "\[Omega]"}], "]"}]}]}], ")"}], "2"]}], ")"}]}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "0", ",", "t"}], "}"}], ",", 
   RowBox[{"Assumptions", "\[Rule]", 
    RowBox[{
     RowBox[{"a", ">", "0"}], "&&", 
     RowBox[{"\[Omega]", ">", "0"}], "&&", 
     RowBox[{"h", ">", "0"}]}]}]}], "]"}]], "Output"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Curvature", "Subsection"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FullSimplify", "[", 
  RowBox[{
   RowBox[{"Curvature", "[", 
    RowBox[{
     RowBox[{"Slinky", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"a", ",", "\[Omega]", ",", "h"}], "}"}], ",", "t"}], "]"}], 
     ",", "t"}], "]"}], ",", 
   RowBox[{
    RowBox[{"a", ">", "0"}], "&&", 
    RowBox[{"\[Omega]", ">", "0"}], "&&", 
    RowBox[{"h", ">", "0"}], "&&", 
    RowBox[{"t", ">", "0"}]}]}], "]"}]], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "8"}], " ", 
     SuperscriptBox["a", "2"], " ", "\[Omega]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SuperscriptBox["\[Omega]", "4"]}], ")"}]}], "+", 
    RowBox[{"4", " ", "h", " ", 
     RowBox[{"(", 
      RowBox[{"2", "+", 
       RowBox[{
        SuperscriptBox["a", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"5", " ", 
           SuperscriptBox["\[Omega]", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"2", "+", 
             SuperscriptBox["\[Omega]", "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}],
     "+", 
    RowBox[{"2", " ", "a", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"8", " ", "h", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", 
           SuperscriptBox["\[Omega]", "2"]}]}], ")"}]}], "+", 
       RowBox[{"\[Omega]", " ", 
        RowBox[{"(", 
         RowBox[{"4", "-", 
          RowBox[{"4", " ", 
           SuperscriptBox["\[Omega]", "2"]}], "+", 
          RowBox[{
           SuperscriptBox["a", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"3", "+", 
             RowBox[{"13", " ", 
              SuperscriptBox["\[Omega]", "2"]}], "+", 
             RowBox[{"8", " ", 
              SuperscriptBox["\[Omega]", "4"]}]}], ")"}]}]}], ")"}]}]}], 
      ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"t", " ", "\[Omega]"}], "]"}]}], "+", 
    RowBox[{"4", " ", 
     SuperscriptBox["a", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"h", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[Omega]", "2"]}], ")"}], "2"]}], "+", 
       RowBox[{"2", " ", 
        RowBox[{"(", 
         RowBox[{"\[Omega]", "+", 
          RowBox[{"2", " ", 
           SuperscriptBox["\[Omega]", "3"]}]}], ")"}]}]}], ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"2", " ", "t", " ", "\[Omega]"}], "]"}]}], "-", 
    RowBox[{"2", " ", 
     SuperscriptBox["a", "3"], " ", "\[Omega]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SuperscriptBox["\[Omega]", "2"]}], ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"3", " ", "t", " ", "\[Omega]"}], "]"}]}]}], ")"}], "/", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"8", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       SuperscriptBox["h", "2"]}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["a", "4"], " ", 
     RowBox[{"(", 
      RowBox[{"3", "+", 
       SuperscriptBox["\[Omega]", "2"]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"4", " ", 
        SuperscriptBox["\[Omega]", "2"]}], "+", 
       RowBox[{"8", " ", 
        SuperscriptBox["\[Omega]", "4"]}]}], ")"}]}], "+", 
    RowBox[{"4", " ", 
     SuperscriptBox["a", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"6", "+", 
       RowBox[{"11", " ", 
        SuperscriptBox["\[Omega]", "2"]}], "+", 
       RowBox[{"2", " ", 
        SuperscriptBox["\[Omega]", "4"]}], "+", 
       RowBox[{"2", " ", "h", " ", "\[Omega]", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          SuperscriptBox["\[Omega]", "2"]}], ")"}]}], "+", 
       RowBox[{
        SuperscriptBox["h", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"6", " ", 
           SuperscriptBox["\[Omega]", "2"]}], "+", 
          SuperscriptBox["\[Omega]", "4"]}], ")"}]}]}], ")"}]}], "+", 
    RowBox[{"4", " ", "a", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          RowBox[{"h", " ", "\[Omega]"}], "+", 
          SuperscriptBox["\[Omega]", "2"], "+", 
          RowBox[{
           SuperscriptBox["h", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             SuperscriptBox["\[Omega]", "2"]}], ")"}]}]}], ")"}]}], "+", 
       RowBox[{
        SuperscriptBox["a", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"6", "+", 
          RowBox[{"8", " ", 
           SuperscriptBox["\[Omega]", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"2", "+", 
             SuperscriptBox["\[Omega]", "2"]}], ")"}]}], "+", 
          RowBox[{"h", " ", "\[Omega]", " ", 
           RowBox[{"(", 
            RowBox[{"3", "+", 
             RowBox[{"9", " ", 
              SuperscriptBox["\[Omega]", "2"]}], "+", 
             RowBox[{"4", " ", 
              SuperscriptBox["\[Omega]", "4"]}]}], ")"}]}]}], ")"}]}]}], 
      ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"t", " ", "\[Omega]"}], "]"}]}], "+", 
    RowBox[{
     SuperscriptBox["a", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", 
        RowBox[{"(", 
         RowBox[{"6", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"h", "+", "\[Omega]"}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{"h", "+", 
             RowBox[{"3", " ", "\[Omega]"}]}], ")"}]}], "+", 
          RowBox[{
           SuperscriptBox["a", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"3", " ", 
              SuperscriptBox["\[Omega]", "2"]}], "-", 
             SuperscriptBox["\[Omega]", "4"]}], ")"}]}], "+", 
          RowBox[{"h", " ", 
           SuperscriptBox["\[Omega]", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"6", " ", "\[Omega]"}], "+", 
             RowBox[{"h", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "2"}], "+", 
                SuperscriptBox["\[Omega]", "2"]}], ")"}]}]}], ")"}]}]}], 
         ")"}], " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"2", " ", "t", " ", "\[Omega]"}], "]"}]}], "+", 
       RowBox[{"4", " ", "a", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          RowBox[{"h", " ", 
           RowBox[{"(", 
            RowBox[{"\[Omega]", "-", 
             SuperscriptBox["\[Omega]", "3"]}], ")"}]}]}], ")"}], " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"3", " ", "t", " ", "\[Omega]"}], "]"}]}], "-", 
       RowBox[{
        SuperscriptBox["a", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          SuperscriptBox["\[Omega]", "2"]}], ")"}], " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"4", " ", "t", " ", "\[Omega]"}], "]"}]}]}], ")"}]}]}], 
   ")"}]}]], "Output"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Torsion", "Subsection"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FullSimplify", "[", 
  RowBox[{
   RowBox[{"Torsion", "[", 
    RowBox[{
     RowBox[{"Slinky", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"a", ",", "\[Omega]", ",", "h"}], "}"}], ",", "t"}], "]"}], 
     ",", "t"}], "]"}], ",", 
   RowBox[{
    RowBox[{"a", ">", "0"}], "&&", 
    RowBox[{"\[Omega]", ">", "0"}], "&&", 
    RowBox[{"h", ">", "0"}]}]}], "]"}]], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "8"}], " ", 
     SuperscriptBox["a", "2"], " ", "\[Omega]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SuperscriptBox["\[Omega]", "4"]}], ")"}]}], "+", 
    RowBox[{"4", " ", "h", " ", 
     RowBox[{"(", 
      RowBox[{"2", "+", 
       RowBox[{
        SuperscriptBox["a", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"5", " ", 
           SuperscriptBox["\[Omega]", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"2", "+", 
             SuperscriptBox["\[Omega]", "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}],
     "+", 
    RowBox[{"2", " ", "a", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"8", " ", "h", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", 
           SuperscriptBox["\[Omega]", "2"]}]}], ")"}]}], "+", 
       RowBox[{"\[Omega]", " ", 
        RowBox[{"(", 
         RowBox[{"4", "-", 
          RowBox[{"4", " ", 
           SuperscriptBox["\[Omega]", "2"]}], "+", 
          RowBox[{
           SuperscriptBox["a", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"3", "+", 
             RowBox[{"13", " ", 
              SuperscriptBox["\[Omega]", "2"]}], "+", 
             RowBox[{"8", " ", 
              SuperscriptBox["\[Omega]", "4"]}]}], ")"}]}]}], ")"}]}]}], 
      ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"t", " ", "\[Omega]"}], "]"}]}], "+", 
    RowBox[{"4", " ", 
     SuperscriptBox["a", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"h", "+", 
       RowBox[{"2", " ", "\[Omega]"}], "-", 
       RowBox[{"2", " ", "h", " ", 
        SuperscriptBox["\[Omega]", "2"]}], "+", 
       RowBox[{"4", " ", 
        SuperscriptBox["\[Omega]", "3"]}], "+", 
       RowBox[{"h", " ", 
        SuperscriptBox["\[Omega]", "4"]}]}], ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"2", " ", "t", " ", "\[Omega]"}], "]"}]}], "-", 
    RowBox[{"2", " ", 
     SuperscriptBox["a", "3"], " ", "\[Omega]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SuperscriptBox["\[Omega]", "2"]}], ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"3", " ", "t", " ", "\[Omega]"}], "]"}]}]}], ")"}], "/", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"8", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       SuperscriptBox["h", "2"]}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["a", "4"], " ", 
     RowBox[{"(", 
      RowBox[{"3", "+", 
       SuperscriptBox["\[Omega]", "2"]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"4", " ", 
        SuperscriptBox["\[Omega]", "2"]}], "+", 
       RowBox[{"8", " ", 
        SuperscriptBox["\[Omega]", "4"]}]}], ")"}]}], "+", 
    RowBox[{"4", " ", 
     SuperscriptBox["a", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"6", "+", 
       RowBox[{"11", " ", 
        SuperscriptBox["\[Omega]", "2"]}], "+", 
       RowBox[{"2", " ", 
        SuperscriptBox["\[Omega]", "4"]}], "+", 
       RowBox[{"2", " ", "h", " ", "\[Omega]", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          SuperscriptBox["\[Omega]", "2"]}], ")"}]}], "+", 
       RowBox[{
        SuperscriptBox["h", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"6", " ", 
           SuperscriptBox["\[Omega]", "2"]}], "+", 
          SuperscriptBox["\[Omega]", "4"]}], ")"}]}]}], ")"}]}], "+", 
    RowBox[{"4", " ", "a", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          RowBox[{"h", " ", "\[Omega]"}], "+", 
          SuperscriptBox["\[Omega]", "2"], "+", 
          RowBox[{
           SuperscriptBox["h", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             SuperscriptBox["\[Omega]", "2"]}], ")"}]}]}], ")"}]}], "+", 
       RowBox[{
        SuperscriptBox["a", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"6", "+", 
          RowBox[{"8", " ", 
           SuperscriptBox["\[Omega]", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"2", "+", 
             SuperscriptBox["\[Omega]", "2"]}], ")"}]}], "+", 
          RowBox[{"h", " ", "\[Omega]", " ", 
           RowBox[{"(", 
            RowBox[{"3", "+", 
             RowBox[{"9", " ", 
              SuperscriptBox["\[Omega]", "2"]}], "+", 
             RowBox[{"4", " ", 
              SuperscriptBox["\[Omega]", "4"]}]}], ")"}]}]}], ")"}]}]}], 
      ")"}], " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"t", " ", "\[Omega]"}], "]"}]}], "+", 
    RowBox[{
     SuperscriptBox["a", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", 
        RowBox[{"(", 
         RowBox[{"6", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"h", "+", "\[Omega]"}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{"h", "+", 
             RowBox[{"3", " ", "\[Omega]"}]}], ")"}]}], "+", 
          RowBox[{
           SuperscriptBox["a", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"3", " ", 
              SuperscriptBox["\[Omega]", "2"]}], "-", 
             SuperscriptBox["\[Omega]", "4"]}], ")"}]}], "+", 
          RowBox[{"h", " ", 
           SuperscriptBox["\[Omega]", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"6", " ", "\[Omega]"}], "+", 
             RowBox[{"h", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "2"}], "+", 
                SuperscriptBox["\[Omega]", "2"]}], ")"}]}]}], ")"}]}]}], 
         ")"}], " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"2", " ", "t", " ", "\[Omega]"}], "]"}]}], "+", 
       RowBox[{"4", " ", "a", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          RowBox[{"h", " ", 
           RowBox[{"(", 
            RowBox[{"\[Omega]", "-", 
             SuperscriptBox["\[Omega]", "3"]}], ")"}]}]}], ")"}], " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"3", " ", "t", " ", "\[Omega]"}], "]"}]}], "-", 
       RowBox[{
        SuperscriptBox["a", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          SuperscriptBox["\[Omega]", "2"]}], ")"}], " ", 
        RowBox[{"Cos", "[", 
         RowBox[{"4", " ", "t", " ", "\[Omega]"}], "]"}]}]}], ")"}]}]}], 
   ")"}]}]], "Output"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
WindowSize->{520, 716},
WindowMargins->{{132, Automatic}, {16, Automatic}},
ShowSelection->True,
FrontEndVersion->"6.1 for Mac OS X x86 (32-bit) (March 13, 2008)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[567, 22, 23, 0, 76, "Title"],
Cell[CellGroupData[{
Cell[615, 26, 28, 0, 34, "Subsection"],
Cell[646, 28, 56, 3, 41, "Text"],
Cell[705, 33, 270, 8, 41, "Text"],
Cell[978, 43, 287, 10, 41, "Text"],
Cell[1268, 55, 614, 17, 71, "Text"],
Cell[1885, 74, 99, 2, 26, "Text"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2021, 81, 37, 0, 34, "Subsection"],
Cell[2061, 83, 88, 2, 27, "Input",
 InitializationCell->True]
}, Open  ]],
Cell[CellGroupData[{
Cell[2186, 90, 26, 0, 34, "Subsection"],
Cell[2215, 92, 901, 30, 88, "Input",
 InitializationCell->True]
}, Open  ]],
Cell[CellGroupData[{
Cell[3153, 127, 23, 0, 67, "Section"],
Cell[CellGroupData[{
Cell[3201, 131, 555, 16, 58, "Input"],
Cell[3759, 149, 44104, 3259, 261, 35362, 3112, "GraphicsData", "PostScript", \
"Graphics"],
Cell[47866, 3410, 136, 4, 27, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[48039, 3419, 36, 0, 34, "Subsection"],
Cell[CellGroupData[{
Cell[48100, 3423, 69, 1, 27, "Input"],
Cell[48172, 3426, 104, 1, 36, "Print"]
}, Open  ]],
Cell[CellGroupData[{
Cell[48313, 3432, 104, 2, 27, "Input"],
Cell[48420, 3436, 84, 1, 27, "Output"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[48565, 3444, 29, 0, 69, "Section"],
Cell[CellGroupData[{
Cell[48619, 3448, 32, 0, 38, "Subsection"],
Cell[CellGroupData[{
Cell[48676, 3452, 385, 12, 43, "Input"],
Cell[49064, 3466, 35, 0, 27, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[49136, 3471, 385, 12, 43, "Input"],
Cell[49524, 3485, 1655, 48, 99, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[51228, 3539, 31, 0, 38, "Subsection"],
Cell[CellGroupData[{
Cell[51284, 3543, 447, 14, 43, "Input"],
Cell[51734, 3559, 6465, 191, 217, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[58248, 3756, 29, 0, 38, "Subsection"],
Cell[CellGroupData[{
Cell[58302, 3760, 409, 13, 43, "Input"],
Cell[58714, 3775, 6384, 187, 210, "Output"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)