(* Content-type: application/vnd.wolfram.mathematica *)

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

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[     20502,        529]
NotebookOptionsPosition[     15647,        447]
NotebookOutlinePosition[     16156,        466]
CellTagsIndexPosition[     16113,        463]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["\:6570\:7406\:30d5\:30a1\:30a4\:30ca\:30f3\:30b92", "Title",ExpressionUUID->"1849c283-293d-4fb6-8664-823b2b2956c9"],

Cell["2. Time Discounting", "Subtitle",ExpressionUUID->"39c33d74-cbcb-49de-adf6-a08affd5c90f"],

Cell["2.4  Yield Curve ", "Subsubtitle",
 FontWeight->"Bold",
 FontColor->RGBColor[
  0, 0.501961, 1],ExpressionUUID->"74ca9f70-2a9a-4afe-8ec0-1651eb50d544"],

Cell["\<\
\:3000 \:5272\:5f15\:50b5\:4fa1\:683c\:304b\:3089\:ff0c\:5272\:5f15\:73fe\
\:5728\:4fa1\:5024\:306e\:8a08\:7b97\:306b\:4f7f\:3046\:5272\:5f15\:7387(\
\:63db\:7b97\:6bd4\:7387)\:304c\:5f97\:3089\:308c\:305f\:3002\:5272\:5f15\
\:50b5\:4fa1\:683c\:5206\:306e\:8cc7\:91d1\:304c\:6e80\:671f\:307e\:3067\:304b\
\:304b\:3063\:3066\:5897\:3048\:3066\:3044\:3063\:3066\:984d\:9762(100\:5186)\
\:306b\:306a\:308b\:3068\:307f\:306a\:3059\:3068\:304d\:ff0c\:5272\:5f15\:50b5\
\:4fa1\:683c\:306b\:5bfe\:3057\:3066\:3069\:308c\:304f\:3089\:3044\:306e\:5272\
\:5408\:3067\:5897\:3048\:3066\:3044\:304f\:306e\:304b\:ff0c\:3053\:308c\:3092\
\:300c\:5229\:5b50\:7387\:300d\:306e\:3088\:3046\:306b\:307f\:306a\:3059\:3082\
\:306e\:3092\:ff0c\:30a4\:30fc\:30eb\:30c9\:3068\:547c\:3093\:3060\:3002\
\>", "Text",ExpressionUUID->"71457eb5-f50a-477a-9e1e-a985ded08192"],

Cell[BoxData[
 RowBox[{"    ", 
  RowBox[{
   RowBox[{
   "\:5272\:5f15\:50b5\:306e\:6e80\:671f\:307e\:3067\:306e\:671f\:9593\:3092\
T", 
    RowBox[{"(", "\:5e74", ")"}], "\:3068"}], ",", 
   SubscriptBox["\:5272\:5f15\:7387\:3092\[Rho]", "T"], ",", "\:30a4", 
   "\:30fc", 
   RowBox[{"\:30eb\:30c9\:3092", " ", "r", " ", "\:3068\:66f8\:304f\:3068"}], 
   ","}]}]], "Text",
 CellChangeTimes->{
  3.6507112577519817`*^9},ExpressionUUID->"115231a2-1292-4e1e-bcf7-\
a6ab6cd755d4"],

Cell[BoxData[
 RowBox[{
  SubscriptBox["\[Rho]", "T"], "=", 
  RowBox[{"1", "/", " ", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", "+", "r"}], ")"}], "^", "T"}]}]}]], "Text",
 TextAlignment->Center,
 FontSize->14,ExpressionUUID->"6c71ab58-c5c7-4634-aecd-69743d22da9a"],

Cell["\:3068\:3044\:3046\:95a2\:4fc2\:304c\:306a\:308a\:305f\:3064.", "Text",ExpressionUUID->"980bf1be-8871-49bb-b58b-4f9d00c5f448"],

Cell[TextData[{
 "\:3000\:3053\:306e \[CloseCurlyDoubleQuote]\:5229\:5b50\:7387\
\[CloseCurlyDoubleQuote] r \:306f\:ff0c\:6e80\:671f(\:511f\:9084\:6642\:671f)\
\:307e\:3067\:306e\:9577\:3055T\:5e74\:9593\:306e\:ff0c\:5e73\:5747\:53ce\
\:76ca\:7387\:3068\:8003\:3048\:308b\:3053\:3068\:304c\:3067\:304d\:308b\:3002\
\:ff52\:306e\:3053\:3068\:3092\:ff0c\:82f1\:8a9e\:3067\:306f\:ff0c",
 StyleBox["Yield to Maturity",
  FontColor->RGBColor[1, 0, 0]],
 " (YTM) \:3068\:547c\:3076\:3002"
}], "Text",ExpressionUUID->"fab94859-5801-41d9-86cc-912bca838d1f"],

Cell[" \:3000\:4f8b\:3048\:3070,\:3000T\:ff1d2\:3067\:ff0c\:5272\:5f15\:50b5\
\:73fe\:5728\:4fa1\:683c\:304c96\:5186\:3060\:3068\:ff0c", "Text",ExpressionUU\
ID->"9bb2c4ad-1d38-48b3-a33a-125b85a8aa87"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"NSolve", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"96", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "r"}], ")"}], "^", "2"}]}], "\[Equal]", "100"}], 
    "}"}], ",", 
   RowBox[{"{", "r", "}"}]}], "]"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"eb46194a-3ece-419a-8588-d513f759f1f1"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"r", "\[Rule]", 
     RowBox[{"-", "2.0206207261596574`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"r", "\[Rule]", "0.02062072615965754`"}], "}"}]}], 
  "}"}]], "Output",
 CellFrame->True,
 CellChangeTimes->{3.650621050394155*^9, 3.650711291323317*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"a75593eb-23ed-479d-a815-03d7a435708a"]
}, Open  ]],

Cell["\:6700\:521d\:306e96\:5186\:304c,1\:5e74\:9593\:30672.06207%\:5897\:3048\
\:3066", "Text",ExpressionUUID->"165f098c-be29-4d17-9ef9-a240e872c296"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"96", "*", " ", "1.0206207"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"a361b7d0-95bb-472e-bf17-de473c77189f"],

Cell[BoxData["97.9795872`"], "Output",
 CellFrame->True,
 CellChangeTimes->{3.650621055371745*^9, 3.65071129396032*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"d6b36d94-c6ff-45b6-91c8-10e475c7069f"]
}, Open  ]],

Cell["\:3068\:3044\:3046\:91d1\:984d\:306b\:306a\:308a,\:3055\:3089\:306b\
\:3082\:3046\:4e00\:5e74\:540c\:3058\:6bd4\:7387\:3067\:5897\:3048\:3066", \
"Text",ExpressionUUID->"c09a24ed-30ba-41d1-a732-301c8a00e463"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"%", " ", "*", " ", "1.0206207"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"305ed1ec-8b7f-4ba5-878f-254ef24ced96"],

Cell[BoxData["99.99999487377504`"], "Output",
 CellFrame->True,
 CellChangeTimes->{3.650621058195447*^9, 3.650711298590159*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"b45207e0-e9e5-49f3-b493-6143b13fb599"]
}, Open  ]],

Cell["100 \:5186\:306b\:306a\:308b.", "Text",ExpressionUUID->"73f94a57-9298-40fe-a5e1-6db139216197"],

Cell["\<\

 \:3055\:3066\:6e80\:671f\:304c\:7570\:306a\:308b\:30a4\:30fc\:30eb\:30c9\
\:3092\:8003\:3048\:3066,\:6a2a\:8ef8\:306bT,\:7e26\:8ef8\:306bYTM\:3092\:30d7\
\:30ed\:30c3\:30c8\:3057\:305f\:3082\:306e\:3092\:ff0c\:30a4\:30fc\:30eb\:30c9\
\:30ab\:30fc\:30d6\:3068\:547c\:3076\:3002\
\>", "Text",
 CellChangeTimes->{
  3.650711309451316*^9},ExpressionUUID->"b47da5fc-6b40-490d-b6f0-\
e381cdd6bae3"],

Cell["\<\

\:3000T=1\:306e\:5272\:5f15\:50b5\:4fa1\:683c\:304c98\:5186\:3060\:3068\:3057\
\:3066,\:30a4\:30fc\:30eb\:30c9\:30ab\:30fc\:30d6\:3092\:63cf\:3044\:3066\
\:307f\:308b.
\
\>", "Text",
 CellChangeTimes->{{3.650711312683175*^9, 
  3.6507113148994713`*^9}},ExpressionUUID->"96071d79-dab1-4625-8b47-\
3a09df87ca64"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"NSolve", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"98", " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", "r1"}], ")"}]}], "\[Equal]", "100"}], "}"}], ",", 
   RowBox[{"{", "r1", "}"}]}], "]"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"29caf24c-81e0-44be-b9da-24c8e1fa0ffa"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"r1", "\[Rule]", "0.02040816326530612`"}], "}"}], "}"}]], "Output",
 CellFrame->True,
 CellChangeTimes->{3.6506210652277412`*^9, 3.650711324993536*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"8b640bdb-9fef-4954-8384-26c4850ab00c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Part", "[", 
  RowBox[{"%", ",", "1"}], "]"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"360edd42-4a7f-4576-980e-699691f22fb7"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"r1", "\[Rule]", "0.02040816326530612`"}], "}"}]], "Output",
 CellFrame->True,
 CellChangeTimes->{3.650621070114561*^9, 3.65071133331464*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"8796d418-0e07-4a13-ba85-3a427aa3a7a2"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"NSolve", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"96", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "r2"}], ")"}], "^", "2"}]}], "\[Equal]", "100"}], 
    "}"}], ",", 
   RowBox[{"{", "r2", "}"}]}], "]"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"72a3cc56-c2e3-4cfa-a1d5-91a4ea08ae56"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"r2", "\[Rule]", 
     RowBox[{"-", "2.0206207261596574`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"r2", "\[Rule]", "0.02062072615965754`"}], "}"}]}], 
  "}"}]], "Output",
 CellFrame->True,
 CellChangeTimes->{3.650621074529347*^9, 3.6507113366072063`*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"2a88ff93-7121-4d45-b6bc-5cbc8ff4abd0"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Part", "[", 
  RowBox[{"%", ",", "2"}], "]"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"ea60899f-4bde-497b-91ba-8ffb3d131f4e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"r2", "\[Rule]", "0.02062072615965754`"}], "}"}]], "Output",
 CellFrame->True,
 CellChangeTimes->{3.6506210777238417`*^9, 3.650711340686026*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"6bc99cf2-a4b6-489a-b12c-391322518f3a"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"yields", " ", "=", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"1", ",", "r1"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"2", ",", "r2"}], "}"}]}], "}"}], " ", "/.", " ", "%%%"}], 
   "  ", "/.", "%"}]}]], "Input",
 CellChangeTimes->{{3.650621100784624*^9, 3.650621107604858*^9}},
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"4b044826-2488-4712-adc0-1a1476a4010b"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"1", ",", "0.02040816326530612`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2", ",", "0.02062072615965754`"}], "}"}]}], "}"}]], "Output",
 CellFrame->True,
 CellChangeTimes->{3.650621108340789*^9, 3.650711345686181*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"3f21f5b0-0edc-458e-b7c2-0d6b0503f8af"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["yields"], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"72eccf74-e7e1-401c-a10d-dc89b4f1b973"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"1", ",", "0.02040816326530612`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2", ",", "0.02062072615965754`"}], "}"}]}], "}"}]], "Output",
 CellFrame->True,
 CellChangeTimes->{3.650621112950222*^9, 3.65071134896437*^9},
 Background->GrayLevel[
  0.833326],ExpressionUUID->"6198649a-1448-4963-85cc-154a1eaa7b7b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", 
  RowBox[{"yields", ",", 
   RowBox[{"Joined", "\[Rule]", "True"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"0.5`", ",", "2.5`"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0.0202`", ",", "0.0208`"}], "}"}]}], "}"}]}], ",", 
   RowBox[{"AxesOrigin", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0.5`", ",", "0.0202`"}], "}"}]}], ",", 
   RowBox[{"AxesLabel", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Maturity", ",", "Yield"}], "}"}]}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"RGBColor", "[", 
       RowBox[{"0", ",", "0.8`", ",", "0.5`"}], "]"}], ",", 
      RowBox[{"AbsoluteThickness", "[", "2", "]"}]}], "}"}]}]}], 
  "]"}]], "Input",
 FontColor->RGBColor[
  0, 0, 1],ExpressionUUID->"9024ed04-d14b-4753-969a-5203d14bedbd"],

Cell[BoxData[
 GraphicsBox[{{}, {{}, {}, 
    {RGBColor[0, 0.8, 0.5], PointSize[0.012833333333333334`], 
     AbsoluteThickness[2], 
     LineBox[{{1., 0.02040816326530612}, {2., 0.02062072615965754}}]}}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{
    FormBox["Maturity", TraditionalForm], 
    FormBox["Yield", TraditionalForm]},
  AxesOrigin->{0.5, 0.0202},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  Method->{},
  PlotRange->{{0.5, 2.5}, {0.0202, 0.0208}},
  PlotRangeClipping->True,
  PlotRangePadding->{{0, 0}, {0, 0}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.650621117473556*^9, 
  3.650711354223702*^9},ExpressionUUID->"f829486e-c0b9-4a24-b5c0-\
bf2f4c0d9fe9"]
}, Open  ]],

Cell["\<\
\:3000
\:3000\:4eca\:56de\:65b0\:305f\:306b\:4f7f\:3063\:305f\:30b3\:30de\:30f3\:30c9\
\:306f,\:30ea\:30b9\:30c8\:304b\:3089\:ff4e\:756a\:76ee\:306e\:8981\:7d20\
\:3092\:53d6\:308a\:51fa\:3059\:6b21\:306e\:30b3\:30de\:30f3\:30c9\:3068\
\>", "Text",ExpressionUUID->"261c4c37-87fa-4ab4-a488-84ac4779229a"],

Cell["Part[ list, n ]", "Text",
 TextAlignment->Center,
 FontSize->14,ExpressionUUID->"f1469124-5a48-4530-a65a-f14cdc118756"],

Cell["\:30ea\:30b9\:30c8\:3067\:4e0e\:3048\:305f\:300c\:5ea7\:6a19\:300d\:3092\
\:3064\:306a\:3044\:3067\:30b0\:30e9\:30d5\:3092\:63cf\:304f", "Text",Expressi\
onUUID->"ddf0949a-3664-467d-9d78-6e57171ca81a"],

Cell["ListPlot[ list ]", "Text",
 TextAlignment->Center,
 FontSize->14,ExpressionUUID->"3101d8b7-d2c9-4f8c-aff5-39c2174dd05b"],

Cell["\<\
\:3067\:3042\:308b\:3002\:5f8c\:8005\:306b\:3064\:3044\:3066\:306f\:ff0c\:30aa\
\:30d7\:30b7\:30e7\:30f3\:3092\:3044\:304f\:3064\:304b\:6307\:5b9a\:3057\:3066\
\:3044\:308b\:3002\:3069\:3093\:306a\:30aa\:30d7\:30b7\:30e7\:30f3\:304c\:3042\
\:308b\:306e\:304b\:306f\:ff0c\:5f8c\:3067\:30d8\:30eb\:30d7\:3092\:898b\:3066\
\:307b\:3057\:3044\:3002\:307e\:305f\:ff0c\:30aa\:30d7\:30b7\:30e7\:30f3\:3067\
\:4e0e\:3048\:3066\:3044\:308b\:6570\:5024\:3092\:3044\:308d\:3044\:308d\:5909\
\:3048\:3066\:30b0\:30e9\:30d5\:3092\:63cf\:3044\:3066\:307f\:308b\:3068\:ff0c\
\:610f\:5473\:304c\:63a8\:5bdf\:3067\:304d\:308b\:3067\:3042\:308d\:3046\:3002\
\>", "Text",
 CellChangeTimes->{
  3.779023186491887*^9},ExpressionUUID->"71453b12-a5a9-401a-ac54-\
38b2f1620891"],

Cell["\:3000\:307e\:305f,\:3000\:7f6e\:304d\:63db\:3048\:30eb\:30fc\:30eb\
\:3092\:9069\:7528\:3059\:308b ReplaceAll[ \:7f6e\:304d\:63db\:3048\:5bfe\
\:8c61,\:3000\:7f6e\:304d\:63db\:3048\:30eb\:30fc\:30eb]\:306e\:304b\:308f\
\:308a\:306b", "Text",ExpressionUUID->"05751033-874d-41df-978d-030374e57afe"],

Cell["\:7f6e\:304d\:63db\:3048\:5bfe\:8c61 /. \:7f6e\:304d\:63db\:3048\:30eb-\
\:30eb", "Text",
 TextAlignment->Center,
 FontSize->14,ExpressionUUID->"d4ae3c6f-2425-43f2-a176-80d7c4261d4f"],

Cell["\:3068\:3044\:3046\:5f62\:3067,\:7565\:53f7\:300c\:3000/\:ff0e\:300d\
\:3092\:4f7f\:3063\:3066\:3044\:308b\:3002\:3053\:308c\:3092\:4e8c\:5ea6\:4f7f\
\:3063\:3066\:3044\:308b\:306e\:3067\:ff0c", "Text",ExpressionUUID->"dfe64242-\
9a84-4812-8e06-7921c901260b"],

Cell[TextData[{
 StyleBox["(",
  FontSize->14,
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0, 0]],
 " \:7f6e\:304d\:63db\:3048\:305f\:5bfe\:8c61\:306e\:30ea\:30b9\:30c8\:3000/\
\:ff0e\:7f6e\:304d\:63db\:3048\:30eb\:30fc\:30eb\:ff11 ",
 StyleBox["\:ff09",
  FontSize->14,
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0, 0]],
 " / \:ff0e\:7f6e\:304d\:63db\:3048\:30eb\:30fc\:30eb\:ff12"
}], "Text",ExpressionUUID->"480a7a43-517c-418a-99fa-db6b1cfabe72"],

Cell["\<\
\:3068\:3044\:3046\:3088\:3046\:306b\:4e38\:62ec\:5f27\:3092\:4f7f\:3063\:305f\
\:65b9\:304c\:6b63\:78ba\:3067\:3042\:308b\:3002\:30eb\:30fc\:30eb\:3092\:9069\
\:7528\:3057\:3066\:3067\:304d\:305f\:30ea\:30b9\:30c8\:306b yields \:3068\
\:3044\:3046\:30b7\:30f3\:30dc\:30eb\:3092\:4e0e\:3048\:ff0c\:5f8c\:3067\:ff0c\
\:51fa\:6765\:4e0a\:304c\:3063\:305f\:30ea\:30b9\:30c8\:3092\:7e70\:308a\:8fd4\
\:3057\:66f8\:304f\:304b\:308f\:308a\:306b\:ff0c yields \:3068\:66f8\:3044\
\:305f\:3002yields \
\:3068\:66f8\:3044\:305f\:3068\:3053\:308d\:306f\:ff0c{{1,0.0204082},{2,0.\
0206207}}\:3068\:66f8\:3044\:305f\:306e\:3068\:540c\:3058\:3053\:3068\:3068\
\:306a\:308b\:3002\
\>", "Text",ExpressionUUID->"60ffe0dc-fd3a-4d4c-b4fe-0f169cf16da7"]
}, Open  ]]
},
WindowSize->{1345, 754},
WindowMargins->{{12, Automatic}, {Automatic, 0}},
PrintingCopies->1,
PrintingPageRange->{1, Automatic},
PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}},
Magnification:>2. Inherited,
FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (2019\:5e745\:67083\:65e5)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 121, 0, 194, "Title",ExpressionUUID->"1849c283-293d-4fb6-8664-823b2b2956c9"],
Cell[703, 24, 94, 0, 106, "Subtitle",ExpressionUUID->"39c33d74-cbcb-49de-adf6-a08affd5c90f"],
Cell[800, 26, 157, 3, 61, "Subsubtitle",ExpressionUUID->"74ca9f70-2a9a-4afe-8ec0-1651eb50d544"],
Cell[960, 31, 855, 11, 204, "Text",ExpressionUUID->"71457eb5-f50a-477a-9e1e-a985ded08192"],
Cell[1818, 44, 479, 13, 73, "Text",ExpressionUUID->"115231a2-1292-4e1e-bcf7-a6ab6cd755d4"],
Cell[2300, 59, 272, 8, 67, "Text",ExpressionUUID->"6c71ab58-c5c7-4634-aecd-69743d22da9a"],
Cell[2575, 69, 132, 0, 69, "Text",ExpressionUUID->"980bf1be-8871-49bb-b58b-4f9d00c5f448"],
Cell[2710, 71, 549, 9, 114, "Text",ExpressionUUID->"fab94859-5801-41d9-86cc-912bca838d1f"],
Cell[3262, 82, 201, 2, 69, "Text",ExpressionUUID->"9bb2c4ad-1d38-48b3-a33a-125b85a8aa87"],
Cell[CellGroupData[{
Cell[3488, 88, 369, 12, 86, "Input",ExpressionUUID->"eb46194a-3ece-419a-8588-d513f759f1f1"],
Cell[3860, 102, 418, 12, 101, "Output",ExpressionUUID->"a75593eb-23ed-479d-a815-03d7a435708a"]
}, Open  ]],
Cell[4293, 117, 151, 1, 69, "Text",ExpressionUUID->"165f098c-be29-4d17-9ef9-a240e872c296"],
Cell[CellGroupData[{
Cell[4469, 122, 152, 3, 59, "Input",ExpressionUUID->"a361b7d0-95bb-472e-bf17-de473c77189f"],
Cell[4624, 127, 211, 4, 101, "Output",ExpressionUUID->"d6b36d94-c6ff-45b6-91c8-10e475c7069f"]
}, Open  ]],
Cell[4850, 134, 214, 2, 69, "Text",ExpressionUUID->"c09a24ed-30ba-41d1-a732-301c8a00e463"],
Cell[CellGroupData[{
Cell[5089, 140, 156, 3, 59, "Input",ExpressionUUID->"305ed1ec-8b7f-4ba5-878f-254ef24ced96"],
Cell[5248, 145, 219, 4, 101, "Output",ExpressionUUID->"b45207e0-e9e5-49f3-b493-6143b13fb599"]
}, Open  ]],
Cell[5482, 152, 100, 0, 69, "Text",ExpressionUUID->"73f94a57-9298-40fe-a5e1-6db139216197"],
Cell[5585, 154, 404, 9, 159, "Text",ExpressionUUID->"b47da5fc-6b40-490d-b6f0-e381cdd6bae3"],
Cell[5992, 165, 321, 9, 159, "Text",ExpressionUUID->"96071d79-dab1-4625-8b47-3a09df87ca64"],
Cell[CellGroupData[{
Cell[6338, 178, 337, 10, 86, "Input",ExpressionUUID->"29caf24c-81e0-44be-b9da-24c8e1fa0ffa"],
Cell[6678, 190, 299, 7, 101, "Output",ExpressionUUID->"8b640bdb-9fef-4954-8384-26c4850ab00c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[7014, 202, 169, 4, 86, "Input",ExpressionUUID->"360edd42-4a7f-4576-980e-699691f22fb7"],
Cell[7186, 208, 272, 6, 101, "Output",ExpressionUUID->"8796d418-0e07-4a13-ba85-3a427aa3a7a2"]
}, Open  ]],
Cell[CellGroupData[{
Cell[7495, 219, 371, 12, 86, "Input",ExpressionUUID->"72a3cc56-c2e3-4cfa-a1d5-91a4ea08ae56"],
Cell[7869, 233, 422, 12, 101, "Output",ExpressionUUID->"2a88ff93-7121-4d45-b6bc-5cbc8ff4abd0"]
}, Open  ]],
Cell[CellGroupData[{
Cell[8328, 250, 169, 4, 86, "Input",ExpressionUUID->"ea60899f-4bde-497b-91ba-8ffb3d131f4e"],
Cell[8500, 256, 275, 6, 101, "Output",ExpressionUUID->"6bc99cf2-a4b6-489a-b12c-391322518f3a"]
}, Open  ]],
Cell[CellGroupData[{
Cell[8812, 267, 448, 13, 59, "Input",ExpressionUUID->"4b044826-2488-4712-adc0-1a1476a4010b"],
Cell[9263, 282, 383, 10, 101, "Output",ExpressionUUID->"3f21f5b0-0edc-458e-b7c2-0d6b0503f8af"]
}, Open  ]],
Cell[CellGroupData[{
Cell[9683, 297, 121, 2, 59, "Input",ExpressionUUID->"72eccf74-e7e1-401c-a10d-dc89b4f1b973"],
Cell[9807, 301, 382, 10, 101, "Output",ExpressionUUID->"6198649a-1448-4963-85cc-154a1eaa7b7b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[10226, 316, 895, 25, 299, "Input",ExpressionUUID->"9024ed04-d14b-4753-969a-5203d14bedbd"],
Cell[11124, 343, 974, 25, 450, "Output",ExpressionUUID->"f829486e-c0b9-4a24-b5c0-bf2f4c0d9fe9"]
}, Open  ]],
Cell[12113, 371, 313, 5, 159, "Text",ExpressionUUID->"261c4c37-87fa-4ab4-a488-84ac4779229a"],
Cell[12429, 378, 125, 2, 66, "Text",ExpressionUUID->"f1469124-5a48-4530-a65a-f14cdc118756"],
Cell[12557, 382, 207, 2, 69, "Text",ExpressionUUID->"ddf0949a-3664-467d-9d78-6e57171ca81a"],
Cell[12767, 386, 126, 2, 66, "Text",ExpressionUUID->"3101d8b7-d2c9-4f8c-aff5-39c2174dd05b"],
Cell[12896, 390, 764, 12, 159, "Text",ExpressionUUID->"71453b12-a5a9-401a-ac54-38b2f1620891"],
Cell[13663, 404, 303, 3, 114, "Text",ExpressionUUID->"05751033-874d-41df-978d-030374e57afe"],
Cell[13969, 409, 189, 3, 66, "Text",ExpressionUUID->"d4ae3c6f-2425-43f2-a176-80d7c4261d4f"],
Cell[14161, 414, 265, 3, 69, "Text",ExpressionUUID->"dfe64242-9a84-4812-8e06-7921c901260b"],
Cell[14429, 419, 456, 12, 69, "Text",ExpressionUUID->"480a7a43-517c-418a-99fa-db6b1cfabe72"],
Cell[14888, 433, 743, 11, 204, "Text",ExpressionUUID->"60ffe0dc-fd3a-4d4c-b4fe-0f169cf16da7"]
}, Open  ]]
}
]
*)