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

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

(* CreatedBy='Wolfram 14.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       154,          7]
NotebookDataLength[    299203,       7151]
NotebookOptionsPosition[    136426,       3768]
NotebookOutlinePosition[    298783,       7142]
CellTagsIndexPosition[    298740,       7139]
WindowTitle->Table of Laplace Transforms | Laplace Transforms in Theory and \
Practice
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Table of Laplace Transforms", "Section",
 CellID->276618326,ExpressionUUID->"5f7cd867-0349-4198-9610-32586dd43656"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"Flist", "=", 
    RowBox[{"Transpose", "[", " ", 
     RowBox[{"{", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"1", ",", "Null"}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", " ", 
        RowBox[{
         RowBox[{"1", "/", "s"}], ",", "Null"}], "}"}], ",", " ", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          SuperscriptBox["s", "2"]}], ",", "Null"}], "}"}], ",", " ", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"s", "-", "1"}], ")"}], "n"], 
          SuperscriptBox["s", 
           RowBox[{"n", "+", "1"}]]], ",", 
         RowBox[{"n", "\[Element]", "NonNegativeIntegers"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          RowBox[{"(", 
           RowBox[{"s", "-", "a"}], ")"}]}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"s", "-", "a"}], ")"}], 
            RowBox[{"(", 
             RowBox[{"s", "-", "b"}], ")"}]}], ")"}]}], ",", "Null"}], "}"}], 
       ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"a", "/", 
          RowBox[{"(", 
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["a", "2"]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"s", "/", 
          RowBox[{"(", 
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["a", "2"]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"a", "/", 
          RowBox[{"(", 
           RowBox[{
            SuperscriptBox["s", "2"], "-", 
            SuperscriptBox["a", "2"]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"s", "/", 
          RowBox[{"(", 
           RowBox[{
            SuperscriptBox["s", "2"], "-", 
            SuperscriptBox["a", "2"]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["s", "2"], "+", 
             SuperscriptBox["a", "2"]}], ")"}], "2"]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"s", "/", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["s", "2"], "+", 
             SuperscriptBox["a", "2"]}], ")"}], "2"]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["s", "2"], "-", 
             SuperscriptBox["a", "2"]}], ")"}], "2"]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"s", "/", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["s", "2"], "-", 
             SuperscriptBox["a", "2"]}], ")"}], "2"]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"a", " ", 
          RowBox[{"b", "/", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               SuperscriptBox["s", "2"], "+", 
               SuperscriptBox["a", "2"]}], ")"}], 
             RowBox[{"(", 
              RowBox[{
               SuperscriptBox["s", "2"], "+", 
               SuperscriptBox["b", "2"]}], ")"}]}], ")"}]}]}], ",", 
         RowBox[{
          RowBox[{"a", ">", "0"}], "&&", 
          RowBox[{"b", ">", "0"}]}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"s", "/", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              SuperscriptBox["s", "2"], "+", 
              SuperscriptBox["a", "2"]}], ")"}], 
            RowBox[{"(", 
             RowBox[{
              SuperscriptBox["s", "2"], "+", 
              SuperscriptBox["b", "2"]}], ")"}]}], ")"}]}], ",", 
         RowBox[{
          RowBox[{"a", ">", "0"}], "&&", 
          RowBox[{"b", ">", "0"}]}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"a", " ", 
          RowBox[{"b", "/", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               SuperscriptBox["s", "2"], "-", 
               SuperscriptBox["a", "2"]}], ")"}], 
             RowBox[{"(", 
              RowBox[{
               SuperscriptBox["s", "2"], "-", 
               SuperscriptBox["b", "2"]}], ")"}]}], ")"}]}]}], ",", 
         RowBox[{
          RowBox[{"a", ">", "0"}], "&&", 
          RowBox[{"b", ">", "0"}]}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"s", "/", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              SuperscriptBox["s", "2"], "-", 
              SuperscriptBox["a", "2"]}], ")"}], 
            RowBox[{"(", 
             RowBox[{
              SuperscriptBox["s", "2"], "-", 
              SuperscriptBox["b", "2"]}], ")"}]}], ")"}]}], ",", 
         RowBox[{
          RowBox[{"a", ">", "0"}], "&&", 
          RowBox[{"b", ">", "0"}]}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          RowBox[{"Sqrt", "[", "s", "]"}]}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          SuperscriptBox["s", "\[Nu]"]}], ",", 
         RowBox[{
          RowBox[{"Re", "[", "\[Nu]", "]"}], ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          RowBox[{"Sqrt", "[", 
           RowBox[{"s", "+", "a"}], "]"}]}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          RowBox[{"(", 
           RowBox[{"s", " ", 
            RowBox[{"Sqrt", "[", 
             RowBox[{"s", "+", "a"}], "]"}]}], ")"}]}], ",", "Null"}], "}"}], 
       ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1", "/", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"s", "-", "a"}], ")"}], " ", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{
           RowBox[{"Sqrt", "[", 
            RowBox[{"s", "-", "a"}], "]"}], "+", "b"}]], ",", "Null"}], "}"}],
        ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{
           RowBox[{"Sqrt", "[", 
            RowBox[{"s", "+", "a"}], "]"}], "+", 
           RowBox[{"Sqrt", "[", 
            RowBox[{"s", "+", "b"}], "]"}]}]], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"Sqrt", "[", 
           RowBox[{"s", "-", "a"}], "]"}], "-", 
          RowBox[{"Sqrt", "[", 
           RowBox[{"s", "-", "b"}], "]"}]}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{"Sqrt", "[", 
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["a", "2"]}], "]"}]], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{"Sqrt", "[", 
           RowBox[{
            SuperscriptBox["s", "2"], "-", 
            SuperscriptBox["a", "2"]}], "]"}]], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["s", "2"], "+", 
             SuperscriptBox["a", "2"]}], ")"}], "\[Nu]"]], ",", 
         RowBox[{"\[Nu]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["s", "2"], "-", 
             SuperscriptBox["a", "2"]}], ")"}], "\[Nu]"]], ",", 
         RowBox[{"\[Nu]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Sqrt", "[", 
              RowBox[{
               SuperscriptBox["s", "2"], "+", 
               SuperscriptBox["a", "2"]}], "]"}], "-", "s"}], ")"}], "\[Nu]"], 
          RowBox[{"Sqrt", "[", 
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["a", "2"]}], "]"}]], ",", 
         RowBox[{"\[Nu]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"s", "-", 
             RowBox[{"Sqrt", "[", 
              RowBox[{
               SuperscriptBox["s", "2"], "-", 
               SuperscriptBox["a", "2"]}], "]"}]}], ")"}], "\[Nu]"], 
          RowBox[{"Sqrt", "[", 
           RowBox[{
            SuperscriptBox["s", "2"], "-", 
            SuperscriptBox["a", "2"]}], "]"}]], ",", 
         RowBox[{"\[Nu]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            RowBox[{"Sqrt", "[", 
             RowBox[{
              SuperscriptBox["s", "2"], "+", 
              SuperscriptBox["a", "2"]}], "]"}], "-", "s"}], ")"}], "\[Nu]"], 
         ",", 
         RowBox[{"\[Nu]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"s", "-", 
            RowBox[{"Sqrt", "[", 
             RowBox[{
              SuperscriptBox["s", "2"], "-", 
              SuperscriptBox["a", "2"]}], "]"}]}], ")"}], "\[Nu]"], ",", 
         RowBox[{"\[Nu]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"-", "a"}], " ", "s"}], "]"}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "a"}], " ", "s"}], "]"}], "/", "s"}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "a"}], "/", "s"}], "]"}], 
          RowBox[{"Sqrt", "[", "s", "]"}]], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "a"}], "/", "s"}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"Sqrt", "[", "s", "]"}]}]], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "a"}], "/", "s"}], "]"}], 
          SuperscriptBox["s", 
           RowBox[{"\[Nu]", "+", "1"}]]], ",", 
         RowBox[{"\[Nu]", ">", 
          RowBox[{"-", "1"}]}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "a"}], " ", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{"Sqrt", "[", "s", "]"}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"-", "a"}], " ", 
           RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "a"}], " ", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], "s"], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "k"}], " ", 
            RowBox[{"Sqrt", "[", 
             RowBox[{
              SuperscriptBox["s", "2"], "+", 
              SuperscriptBox["a", "2"]}], "]"}]}], "]"}], 
          RowBox[{"Sqrt", "[", 
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["a", "2"]}], "]"}]], ",", 
         RowBox[{"k", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"-", "k"}], " ", 
            RowBox[{"Sqrt", "[", 
             RowBox[{
              SuperscriptBox["s", "2"], "-", 
              SuperscriptBox["a", "2"]}], "]"}]}], "]"}], 
          RowBox[{"Sqrt", "[", 
           RowBox[{
            SuperscriptBox["s", "2"], "-", 
            SuperscriptBox["a", "2"]}], "]"}]], ",", 
         RowBox[{"k", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{"s", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Exp", "[", 
              RowBox[{"a", " ", "s"}], "]"}], "-", "1"}], ")"}]}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{"s", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Exp", "[", "s", "]"}], "-", "a"}], ")"}]}]], ",", 
         "Null"}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{
           RowBox[{"Exp", "[", "s", "]"}], "-", "1"}], 
          RowBox[{"s", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Exp", "[", "s", "]"}], "-", "a"}], ")"}]}]], ",", 
         "Null"}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{"s", 
           RowBox[{"(", 
            RowBox[{"1", "-", 
             RowBox[{"Exp", "[", 
              RowBox[{
               RowBox[{"-", "a"}], "*", "s"}], "]"}]}], ")"}]}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{"s", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"Exp", "[", 
              RowBox[{
               RowBox[{"-", "a"}], "*", "s"}], "]"}]}], ")"}]}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          RowBox[{"s", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"Exp", "[", 
              RowBox[{"a", "*", "s"}], "]"}]}], ")"}]}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"1", "-", 
           RowBox[{"Exp", "[", 
            RowBox[{
             RowBox[{"-", "a"}], "*", "s"}], "]"}]}], 
          RowBox[{"s", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Exp", "[", 
              RowBox[{"a", "*", "s"}], "]"}], "+", 
             RowBox[{"Exp", "[", 
              RowBox[{
               RowBox[{"-", "a"}], "*", "s"}], "]"}]}], ")"}]}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Tanh", "[", 
           FractionBox[
            RowBox[{"a", "*", "s"}], "2"], "]"}], "s"], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["\[Omega]", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["s", "2"], "+", 
             SuperscriptBox["\[Omega]", "2"]}], ")"}], 
           RowBox[{"(", 
            RowBox[{"1", "-", 
             RowBox[{"Exp", "[", 
              RowBox[{
               RowBox[{"-", "Pi"}], " ", 
               RowBox[{"s", "/", "\[Omega]"}]}], "]"}]}], ")"}]}]], ",", 
         RowBox[{"\[Omega]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          FractionBox["\[Omega]", 
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["\[Omega]", "2"]}]], 
          RowBox[{"Coth", "[", 
           RowBox[{
            FractionBox["Pi", 
             RowBox[{"2", "\[Omega]"}]], "*", "s"}], "]"}]}], ",", 
         RowBox[{"\[Omega]", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{
           RowBox[{"Exp", "[", 
            RowBox[{"-", "s"}], "]"}], "+", 
           RowBox[{"Exp", "[", 
            RowBox[{
             RowBox[{"-", "2"}], "s"}], "]"}]}], 
          RowBox[{"s", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"1", "-", 
              RowBox[{"Exp", "[", 
               RowBox[{"-", "s"}], "]"}]}], ")"}], "2"]}]], ",", "Null"}], 
        "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"1", "-", 
           RowBox[{"Exp", "[", 
            RowBox[{
             RowBox[{"-", "a"}], "*", "s"}], "]"}]}], 
          RowBox[{"a", " ", 
           SuperscriptBox["s", "2"], 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"Exp", "[", 
              RowBox[{
               RowBox[{"-", "a"}], "*", "s"}], "]"}]}], ")"}]}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"1", "-", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"1", "+", 
              RowBox[{"a", " ", "s"}]}], ")"}], 
            RowBox[{"Exp", "[", 
             RowBox[{
              RowBox[{"-", "a"}], "*", "s"}], "]"}]}]}], 
          RowBox[{"a", " ", 
           SuperscriptBox["s", "2"], 
           RowBox[{"(", 
            RowBox[{"1", "-", 
             RowBox[{"Exp", "[", 
              RowBox[{
               RowBox[{"-", "2"}], "a", " ", "s"}], "]"}]}], ")"}]}]], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Log", "[", 
          FractionBox[
           RowBox[{"s", "+", "a"}], 
           RowBox[{"s", "+", "b"}]], "]"}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Log", "[", "s", "]"}], "s"], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Log", "[", 
          FractionBox[
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["a", "2"]}], 
           RowBox[{
            SuperscriptBox["s", "2"], "+", 
            SuperscriptBox["b", "2"]}]], "]"}], ",", 
         RowBox[{
          RowBox[{"a", ">", "0"}], "&&", 
          RowBox[{"b", ">", "0"}]}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          FractionBox["1", 
           RowBox[{"2", "s"}]], 
          RowBox[{"Log", "[", 
           FractionBox[
            RowBox[{
             SuperscriptBox["s", "2"], "+", 
             SuperscriptBox["a", "2"]}], 
            SuperscriptBox["a", "2"]], "]"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          FractionBox["1", "s"], 
          RowBox[{"Log", "[", 
           FractionBox[
            RowBox[{"s", "+", "a"}], "a"], "]"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          SuperscriptBox[
           RowBox[{"Log", "[", "s", "]"}], "2"], "s"], ",", "Null"}], "}"}], 
       ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"ArcTan", "[", 
          FractionBox["a", "s"], "]"}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          FractionBox[
           RowBox[{"Exp", "[", 
            FractionBox["a", "s"], "]"}], 
           RowBox[{"Sqrt", "[", "s", "]"}]], 
          RowBox[{"Erfc", "[", 
           RowBox[{"Sqrt", "[", 
            FractionBox["a", "s"], "]"}], "]"}]}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"Exp", "[", 
           FractionBox[
            SuperscriptBox["s", "2"], 
            RowBox[{"4", 
             SuperscriptBox["a", "2"]}]], "]"}], 
          RowBox[{"Erfc", "[", 
           FractionBox["s", 
            RowBox[{"2", "a"}]], "]"}]}], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{
           RowBox[{"Exp", "[", 
            FractionBox[
             SuperscriptBox["s", "2"], 
             RowBox[{"4", 
              SuperscriptBox["a", "2"]}]], "]"}], 
           RowBox[{"Erfc", "[", 
            FractionBox["s", 
             RowBox[{"2", "a"}]], "]"}]}], "s"], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{
           RowBox[{"Exp", "[", 
            RowBox[{"a", " ", "s"}], "]"}], 
           RowBox[{"Erfc", "[", 
            RowBox[{"Sqrt", "[", 
             RowBox[{"a", " ", "s"}], "]"}], "]"}]}], 
          RowBox[{"Sqrt", "[", "s", "]"}]], ",", "Null"}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"Exp", "[", 
           RowBox[{"a", " ", "s"}], "]"}], 
          RowBox[{"ExpIntegralEi", "[", 
           RowBox[{
            RowBox[{"-", "a"}], " ", "s"}], "]"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          FractionBox["1", "a"], 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"Cos", "[", 
              RowBox[{"a", "*", "s"}], "]"}], 
             RowBox[{"(", 
              RowBox[{
               FractionBox["Pi", "2"], "-", 
               RowBox[{"SinIntegral", "[", 
                RowBox[{"a", "*", "s"}], "]"}]}], ")"}]}], "+", 
            RowBox[{
             RowBox[{"Sin", "[", 
              RowBox[{"a", "*", "s"}], "]"}], 
             RowBox[{"CosIntegral", "[", 
              RowBox[{"a", "*", "s"}], "]"}]}]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{"Sin", "[", 
            RowBox[{"a", "*", "s"}], "]"}], 
           RowBox[{"(", 
            RowBox[{
             FractionBox["Pi", "2"], "-", 
             RowBox[{"SinIntegral", "[", 
              RowBox[{"a", "*", "s"}], "]"}]}], ")"}]}], "-", 
          RowBox[{
           RowBox[{"Cos", "[", 
            RowBox[{"a", "*", "s"}], "]"}], 
           RowBox[{"CosIntegral", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          FractionBox["1", "s"], 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"Cos", "[", 
              RowBox[{"a", "*", "s"}], "]"}], 
             RowBox[{"(", 
              RowBox[{
               FractionBox["Pi", "2"], "-", 
               RowBox[{"SinIntegral", "[", 
                RowBox[{"a", "*", "s"}], "]"}]}], ")"}]}], "+", 
            RowBox[{
             RowBox[{"Sin", "[", 
              RowBox[{"a", "*", "s"}], "]"}], 
             RowBox[{"CosIntegral", "[", 
              RowBox[{"a", "*", "s"}], "]"}]}]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          FractionBox["1", "s"], 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"Sin", "[", 
              RowBox[{"a", "*", "s"}], "]"}], 
             RowBox[{"(", 
              RowBox[{
               FractionBox["Pi", "2"], "-", 
               RowBox[{"SinIntegral", "[", 
                RowBox[{"a", "*", "s"}], "]"}]}], ")"}]}], "-", 
            RowBox[{
             RowBox[{"Cos", "[", 
              RowBox[{"a", "*", "s"}], "]"}], 
             RowBox[{"CosIntegral", "[", 
              RowBox[{"a", "*", "s"}], "]"}]}]}], ")"}]}], ",", 
         RowBox[{"a", ">", "0"}]}], "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"Sinh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"Sinh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{
           SuperscriptBox["s", "2"], " ", 
           RowBox[{"Sinh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{
           SuperscriptBox["s", "2"], " ", 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{
           SuperscriptBox["s", "2"], " ", 
           RowBox[{"Sinh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", "s"}], "]"}], 
          RowBox[{
           SuperscriptBox["s", "2"], " ", 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", "s"}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{"Sinh", "[", 
           RowBox[{"a", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{" ", 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{
           RowBox[{"Sqrt", "[", "s", "]"}], " ", 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{
           RowBox[{"Sqrt", "[", "s", "]"}], " ", 
           RowBox[{"Sinh", "[", 
            RowBox[{"a", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"Sinh", "[", 
            RowBox[{"a", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{
           SuperscriptBox["s", "2"], 
           RowBox[{"Sinh", "[", 
            RowBox[{"a", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"Cosh", "[", 
           RowBox[{"x", "*", 
            RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}], 
          RowBox[{
           SuperscriptBox["s", "2"], 
           RowBox[{"Cosh", "[", 
            RowBox[{"a", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"BesselJ", "[", 
           RowBox[{"0", ",", 
            RowBox[{"I", "*", "x", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}]}], "]"}], 
          RowBox[{"s", " ", 
           RowBox[{"BesselJ", "[", 
            RowBox[{"0", ",", 
             RowBox[{"I", "*", "a", "*", 
              RowBox[{"Sqrt", "[", "s", "]"}]}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         FractionBox[
          RowBox[{"BesselJ", "[", 
           RowBox[{"0", ",", 
            RowBox[{"I", "*", "x", "*", 
             RowBox[{"Sqrt", "[", "s", "]"}]}]}], "]"}], 
          RowBox[{
           SuperscriptBox["s", "2"], " ", 
           RowBox[{"BesselJ", "[", 
            RowBox[{"0", ",", 
             RowBox[{"I", "*", "a", "*", 
              RowBox[{"Sqrt", "[", "s", "]"}]}]}], "]"}]}]], ",", 
         RowBox[{"a", ">", "x", ">", "0"}]}], "}"}]}], "\[IndentingNewLine]", 
      "}"}], "]"}]}], ";"}], " "}], "\n", 
 RowBox[{
  RowBox[{"Grid", "[", 
   RowBox[{
    RowBox[{"Join", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"F", "[", "s", "]"}], ",", 
         RowBox[{"InverseLaplaceTransform", "[", 
          RowBox[{
           RowBox[{"F", "[", "s", "]"}], ",", "s", ",", "t"}], "]"}], ",", 
         "Assumptions"}], "}"}], "}"}], ",", 
      RowBox[{"Transpose", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Flist", "[", 
          RowBox[{"[", "1", "]"}], "]"}], ",", 
         RowBox[{"Simplify", "[", 
          RowBox[{"MapThread", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"InverseLaplaceTransform", "[", 
              RowBox[{"#1", ",", "s", ",", "t", ",", 
               RowBox[{"Assumptions", "\[Rule]", "#2"}]}], "]"}], "&"}], ",", 
            "Flist"}], "]"}], "]"}], ",", 
         RowBox[{"Flist", "[", 
          RowBox[{"[", "2", "]"}], "]"}]}], "}"}], "]"}]}], "]"}], ",", 
    RowBox[{"Background", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"None", ",", 
       RowBox[{"{", 
        RowBox[{"{", 
         RowBox[{"None", ",", 
          RowBox[{"GrayLevel", "[", ".9", "]"}]}], "}"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{"1", ",", "1"}], "}"}], "\[Rule]", 
          RowBox[{"Hue", "[", 
           RowBox[{".6", ",", ".4", ",", "1"}], "]"}]}], ",", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"1", ",", "2"}], "}"}], "\[Rule]", 
          RowBox[{"Hue", "[", 
           RowBox[{".6", ",", ".4", ",", "1"}], "]"}]}]}], "}"}]}], "}"}]}], 
    ",", 
    RowBox[{"BaseStyle", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"FontFamily", "\[Rule]", "Times"}], ",", 
       RowBox[{"FontSize", "\[Rule]", "12"}]}], "}"}]}], ",", 
    RowBox[{"Dividers", "\[Rule]", "All"}], ",", 
    RowBox[{"FrameStyle", "\[Rule]", 
     RowBox[{"Hue", "[", 
      RowBox[{".6", ",", ".4", ",", ".8"}], "]"}]}], ",", 
    RowBox[{"Spacings", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"2", ",", "1"}], "}"}]}]}], "]"}], "//", 
  "TraditionalForm"}]}], "Input",
 CellChangeTimes->{{3.912152643743758*^9, 3.912152671468533*^9}, {
   3.912152918933964*^9, 3.912152920434409*^9}, {3.912152968993751*^9, 
   3.912152977170094*^9}, {3.91215301989956*^9, 3.91215305742062*^9}, {
   3.912153374292477*^9, 3.912153374428904*^9}, 3.912155246951693*^9, 
   3.912155304721911*^9, {3.912155377626276*^9, 3.912155381474989*^9}, {
   3.912155435404224*^9, 3.912155457069644*^9}, {3.912156666837614*^9, 
   3.912156725321919*^9}, {3.912157022826618*^9, 3.9121570247561703`*^9}, {
   3.9121574142514544`*^9, 3.9121574572239017`*^9}, {3.9121574924175987`*^9, 
   3.912157512470459*^9}, 3.91215755731954*^9, {3.912157655611042*^9, 
   3.91215766578539*^9}, {3.912157736041754*^9, 3.912157764995716*^9}, {
   3.912157875895994*^9, 3.912157880082651*^9}, {3.912157932413247*^9, 
   3.912157935230055*^9}, {3.912157986414098*^9, 3.912157996393046*^9}, {
   3.9121580577413*^9, 3.912158064199747*^9}, {3.912158106031672*^9, 
   3.912158162905304*^9}, {3.912158195507468*^9, 3.9121582245578337`*^9}, {
   3.912158279831696*^9, 3.91215829750263*^9}, {3.912158336239386*^9, 
   3.912158405693636*^9}, {3.912158558483706*^9, 3.912158569631603*^9}, {
   3.912158601907102*^9, 3.912158624082288*^9}, {3.912158782612392*^9, 
   3.912158790707247*^9}, {3.912158824127028*^9, 3.912158853091559*^9}, {
   3.9121588884917393`*^9, 3.912158922464344*^9}, {3.912158982399187*^9, 
   3.9121590115900383`*^9}, {3.912159061342486*^9, 3.912159067130247*^9}, {
   3.912159166650789*^9, 3.912159358218302*^9}, {3.912159502338439*^9, 
   3.912159534499813*^9}, {3.91215958192378*^9, 3.9121597018252687`*^9}, {
   3.912159736571232*^9, 3.912159816952269*^9}, {3.912159876788866*^9, 
   3.91215993625549*^9}, {3.912159982159525*^9, 3.91216003074072*^9}, {
   3.912160087675801*^9, 3.9121600961707067`*^9}, {3.9121601569365263`*^9, 
   3.912160210896673*^9}, {3.912160276817627*^9, 3.912160377533614*^9}, {
   3.912160500503232*^9, 3.9121605081442623`*^9}, {3.912160563605317*^9, 
   3.912160642179586*^9}, {3.912160672854828*^9, 3.9121607787550592`*^9}, {
   3.912160839785385*^9, 3.912160850332152*^9}, {3.912245135488628*^9, 
   3.912245136078588*^9}, {3.91224518443321*^9, 3.912245188841392*^9}, {
   3.912245223519462*^9, 3.912245230701453*^9}, {3.912245264317418*^9, 
   3.912245264529299*^9}, 3.919718160985649*^9},
 CellID->722611148,ExpressionUUID->"0280bde2-462d-4130-8f53-fef4b6a5a0b9"],

Cell[BoxData[
 FormBox[
  TagBox[GridBox[{
     {
      RowBox[{"F", "(", "s", ")"}], 
      RowBox[{
       RowBox[{
        SubsuperscriptBox["\[ScriptCapitalL]", "s", 
         RowBox[{"-", "1"}]], "[", 
        RowBox[{"F", "(", "s", ")"}], "]"}], 
       RowBox[{"(", "t", ")"}]}], "Assumptions"},
     {"1", 
      TemplateBox[{
        RowBox[{"t"}]},
       "DiracDeltaSeq"], ""},
     {
      FractionBox["1", "s"], "1", ""},
     {
      FractionBox["1", 
       SuperscriptBox["s", "2"]], "t", ""},
     {
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"s", "-", "1"}], ")"}], "n"], " ", 
       SuperscriptBox["s", 
        RowBox[{
         RowBox[{"-", "n"}], "-", "1"}]]}], 
      TemplateBox[{"n", "t"},
       "LaguerreL"], 
      RowBox[{
       RowBox[{"n", "\[Element]", 
        TemplateBox[{},
         "Integers"]}], "\[And]", 
       RowBox[{"n", "\[GreaterEqual]", "0"}]}]},
     {
      FractionBox["1", 
       RowBox[{"s", "-", "a"}]], 
      SuperscriptBox["\[ExponentialE]", 
       RowBox[{"a", " ", "t"}]], ""},
     {
      FractionBox["1", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"s", "-", "a"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"s", "-", "b"}], ")"}]}]], 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"a", " ", "t"}]], "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"b", " ", "t"}]]}], 
       RowBox[{"a", "-", "b"}]], ""},
     {
      FractionBox["a", 
       RowBox[{
        SuperscriptBox["a", "2"], "+", 
        SuperscriptBox["s", "2"]}]], 
      RowBox[{"sin", "(", 
       RowBox[{"a", " ", "t"}], ")"}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["s", 
       RowBox[{
        SuperscriptBox["a", "2"], "+", 
        SuperscriptBox["s", "2"]}]], 
      RowBox[{"cos", "(", 
       RowBox[{"a", " ", "t"}], ")"}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["a", 
       RowBox[{
        SuperscriptBox["s", "2"], "-", 
        SuperscriptBox["a", "2"]}]], 
      RowBox[{"sinh", "(", 
       RowBox[{"a", " ", "t"}], ")"}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["s", 
       RowBox[{
        SuperscriptBox["s", "2"], "-", 
        SuperscriptBox["a", "2"]}]], 
      RowBox[{"cosh", "(", 
       RowBox[{"a", " ", "t"}], ")"}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["1", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["a", "2"], "+", 
          SuperscriptBox["s", "2"]}], ")"}], "2"]], 
      FractionBox[
       RowBox[{
        RowBox[{"sin", "(", 
         RowBox[{"a", " ", "t"}], ")"}], "-", 
        RowBox[{"a", " ", "t", " ", 
         RowBox[{"cos", "(", 
          RowBox[{"a", " ", "t"}], ")"}]}]}], 
       RowBox[{"2", " ", 
        SuperscriptBox["a", "3"]}]], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["s", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["a", "2"], "+", 
          SuperscriptBox["s", "2"]}], ")"}], "2"]], 
      FractionBox[
       RowBox[{"t", " ", 
        RowBox[{"sin", "(", 
         RowBox[{"a", " ", "t"}], ")"}]}], 
       RowBox[{"2", " ", "a"}]], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["1", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["s", "2"], "-", 
          SuperscriptBox["a", "2"]}], ")"}], "2"]], 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "a"}], " ", "t"}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"a", " ", "t"}], "+", 
          RowBox[{
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{"2", " ", "a", " ", "t"}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"a", " ", "t"}], "-", "1"}], ")"}]}], "+", "1"}], 
         ")"}]}], 
       RowBox[{"4", " ", 
        SuperscriptBox["a", "3"]}]], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["s", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["s", "2"], "-", 
          SuperscriptBox["a", "2"]}], ")"}], "2"]], 
      FractionBox[
       RowBox[{"t", " ", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "a"}], " ", "t"}]], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"2", " ", "a", " ", "t"}]], "-", "1"}], ")"}]}], 
       RowBox[{"4", " ", "a"}]], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{"a", " ", "b"}], 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["a", "2"], "+", 
          SuperscriptBox["s", "2"]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["b", "2"], "+", 
          SuperscriptBox["s", "2"]}], ")"}]}]], 
      FractionBox[
       RowBox[{
        RowBox[{"a", " ", 
         RowBox[{"sin", "(", 
          RowBox[{"b", " ", "t"}], ")"}]}], "-", 
        RowBox[{"b", " ", 
         RowBox[{"sin", "(", 
          RowBox[{"a", " ", "t"}], ")"}]}]}], 
       RowBox[{
        SuperscriptBox["a", "2"], "-", 
        SuperscriptBox["b", "2"]}]], 
      RowBox[{
       RowBox[{"a", ">", "0"}], "\[And]", 
       RowBox[{"b", ">", "0"}]}]},
     {
      FractionBox["s", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["a", "2"], "+", 
          SuperscriptBox["s", "2"]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["b", "2"], "+", 
          SuperscriptBox["s", "2"]}], ")"}]}]], 
      FractionBox[
       RowBox[{
        RowBox[{"cos", "(", 
         RowBox[{"b", " ", "t"}], ")"}], "-", 
        RowBox[{"cos", "(", 
         RowBox[{"a", " ", "t"}], ")"}]}], 
       RowBox[{
        SuperscriptBox["a", "2"], "-", 
        SuperscriptBox["b", "2"]}]], 
      RowBox[{
       RowBox[{"a", ">", "0"}], "\[And]", 
       RowBox[{"b", ">", "0"}]}]},
     {
      FractionBox[
       RowBox[{"a", " ", "b"}], 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["s", "2"], "-", 
          SuperscriptBox["a", "2"]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["s", "2"], "-", 
          SuperscriptBox["b", "2"]}], ")"}]}]], 
      RowBox[{"-", 
       FractionBox[
        RowBox[{
         RowBox[{"a", " ", 
          RowBox[{"(", 
           RowBox[{"-", 
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{
              RowBox[{"-", "b"}], " ", "t"}]]}], ")"}]}], "+", 
         RowBox[{"a", " ", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"b", " ", "t"}]]}], "+", 
         RowBox[{"b", " ", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "a"}], " ", "t"}]]}], "-", 
         RowBox[{"b", " ", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"a", " ", "t"}]]}]}], 
        RowBox[{
         RowBox[{"2", " ", 
          SuperscriptBox["a", "2"]}], "-", 
         RowBox[{"2", " ", 
          SuperscriptBox["b", "2"]}]}]]}], 
      RowBox[{
       RowBox[{"a", ">", "0"}], "\[And]", 
       RowBox[{"b", ">", "0"}]}]},
     {
      FractionBox["s", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["s", "2"], "-", 
          SuperscriptBox["a", "2"]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["s", "2"], "-", 
          SuperscriptBox["b", "2"]}], ")"}]}]], 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "a"}], " ", "t"}]], "+", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"a", " ", "t"}]], "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "b"}], " ", "t"}]], "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"b", " ", "t"}]]}], 
       RowBox[{
        RowBox[{"2", " ", 
         SuperscriptBox["a", "2"]}], "-", 
        RowBox[{"2", " ", 
         SuperscriptBox["b", "2"]}]}]], 
      RowBox[{
       RowBox[{"a", ">", "0"}], "\[And]", 
       RowBox[{"b", ">", "0"}]}]},
     {
      FractionBox["1", 
       SqrtBox["s"]], 
      FractionBox["1", 
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SqrtBox["t"]}]], ""},
     {
      SuperscriptBox["s", 
       RowBox[{"-", "\[Nu]"}]], 
      FractionBox[
       SuperscriptBox["t", 
        RowBox[{"\[Nu]", "-", "1"}]], 
       TemplateBox[{"\[Nu]"},
        "Gamma"]], 
      RowBox[{
       RowBox[{"Re", "(", "\[Nu]", ")"}], ">", "0"}]},
     {
      FractionBox["1", 
       SqrtBox[
        RowBox[{"a", "+", "s"}]]], 
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "a"}], " ", "t"}]], 
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SqrtBox["t"]}]], ""},
     {
      FractionBox["1", 
       RowBox[{"s", " ", 
        SqrtBox[
         RowBox[{"a", "+", "s"}]]}]], 
      FractionBox[
       RowBox[{"erf", "(", 
        SqrtBox[
         RowBox[{"a", " ", "t"}]], ")"}], 
       SqrtBox["a"]], ""},
     {
      FractionBox["1", 
       RowBox[{
        SqrtBox["s"], " ", 
        RowBox[{"(", 
         RowBox[{"s", "-", "a"}], ")"}]}]], 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"a", " ", "t"}]], " ", 
        RowBox[{"erf", "(", 
         SqrtBox[
          RowBox[{"a", " ", "t"}]], ")"}]}], 
       SqrtBox["a"]], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["1", 
       RowBox[{
        SqrtBox[
         RowBox[{"s", "-", "a"}]], "+", "b"}]], 
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"a", " ", "t"}]], " ", 
       RowBox[{"(", 
        RowBox[{
         FractionBox["1", 
          RowBox[{
           SqrtBox["\[Pi]"], " ", 
           SqrtBox["t"]}]], "-", 
         RowBox[{"b", " ", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            SuperscriptBox["b", "2"], " ", "t"}]], " ", 
          RowBox[{"erfc", "(", 
           RowBox[{"b", " ", 
            SqrtBox["t"]}], ")"}]}]}], ")"}]}], ""},
     {
      FractionBox["1", 
       RowBox[{
        SqrtBox[
         RowBox[{"a", "+", "s"}]], "+", 
        SqrtBox[
         RowBox[{"b", "+", "s"}]]}]], 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "b"}], " ", "t"}]], "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "a"}], " ", "t"}]]}], 
       RowBox[{"2", " ", 
        SqrtBox["\[Pi]"], " ", 
        SqrtBox[
         SuperscriptBox["t", "3"]], " ", 
        RowBox[{"(", 
         RowBox[{"a", "-", "b"}], ")"}]}]], ""},
     {
      RowBox[{
       SqrtBox[
        RowBox[{"s", "-", "a"}]], "-", 
       SqrtBox[
        RowBox[{"s", "-", "b"}]]}], 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"b", " ", "t"}]], "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"a", " ", "t"}]]}], 
       RowBox[{"2", " ", 
        SqrtBox["\[Pi]"], " ", 
        SuperscriptBox["t", 
         RowBox[{"3", "/", "2"}]]}]], ""},
     {
      FractionBox["1", 
       SqrtBox[
        RowBox[{
         SuperscriptBox["a", "2"], "+", 
         SuperscriptBox["s", "2"]}]]], 
      TemplateBox[{"0", 
        RowBox[{"a", " ", "t"}]},
       "BesselJ"], ""},
     {
      FractionBox["1", 
       SqrtBox[
        RowBox[{
         SuperscriptBox["s", "2"], "-", 
         SuperscriptBox["a", "2"]}]]], 
      TemplateBox[{"0", 
        RowBox[{"a", " ", "t"}]},
       "BesselI"], ""},
     {
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         SuperscriptBox["a", "2"], "+", 
         SuperscriptBox["s", "2"]}], ")"}], 
       RowBox[{"-", "\[Nu]"}]], 
      FractionBox[
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SuperscriptBox["2", 
         RowBox[{
          FractionBox["1", "2"], "-", "\[Nu]"}]], " ", 
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox["t", "a"], ")"}], 
         RowBox[{"\[Nu]", "-", 
          FractionBox["1", "2"]}]], " ", 
        TemplateBox[{
          RowBox[{"\[Nu]", "-", 
            FractionBox["1", "2"]}], 
          RowBox[{"a", " ", "t"}]},
         "BesselJ"]}], 
       TemplateBox[{"\[Nu]"},
        "Gamma"]], 
      RowBox[{"\[Nu]", ">", "0"}]},
     {
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         SuperscriptBox["s", "2"], "-", 
         SuperscriptBox["a", "2"]}], ")"}], 
       RowBox[{"-", "\[Nu]"}]], 
      FractionBox[
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SuperscriptBox["2", 
         RowBox[{
          FractionBox["1", "2"], "-", "\[Nu]"}]], " ", 
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox["t", "a"], ")"}], 
         RowBox[{"\[Nu]", "-", 
          FractionBox["1", "2"]}]], " ", 
        TemplateBox[{
          RowBox[{"\[Nu]", "-", 
            FractionBox["1", "2"]}], 
          RowBox[{"a", " ", "t"}]},
         "BesselI"]}], 
       TemplateBox[{"\[Nu]"},
        "Gamma"]], 
      RowBox[{"\[Nu]", ">", "0"}]},
     {
      FractionBox[
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SqrtBox[
           RowBox[{
            SuperscriptBox["a", "2"], "+", 
            SuperscriptBox["s", "2"]}]], "-", "s"}], ")"}], "\[Nu]"], 
       SqrtBox[
        RowBox[{
         SuperscriptBox["a", "2"], "+", 
         SuperscriptBox["s", "2"]}]]], 
      RowBox[{
       SuperscriptBox["a", "\[Nu]"], " ", 
       TemplateBox[{"\[Nu]", 
         RowBox[{"a", " ", "t"}]},
        "BesselJ"]}], 
      RowBox[{"\[Nu]", ">", "0"}]},
     {
      FractionBox[
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"s", "-", 
          SqrtBox[
           RowBox[{
            SuperscriptBox["s", "2"], "-", 
            SuperscriptBox["a", "2"]}]]}], ")"}], "\[Nu]"], 
       SqrtBox[
        RowBox[{
         SuperscriptBox["s", "2"], "-", 
         SuperscriptBox["a", "2"]}]]], 
      RowBox[{
       SuperscriptBox["a", "\[Nu]"], " ", 
       TemplateBox[{"\[Nu]", 
         RowBox[{"a", " ", "t"}]},
        "BesselI"]}], 
      RowBox[{"\[Nu]", ">", "0"}]},
     {
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         SqrtBox[
          RowBox[{
           SuperscriptBox["a", "2"], "+", 
           SuperscriptBox["s", "2"]}]], "-", "s"}], ")"}], "\[Nu]"], 
      FractionBox[
       RowBox[{"\[Nu]", " ", 
        SuperscriptBox["a", "\[Nu]"], " ", 
        TemplateBox[{"\[Nu]", 
          RowBox[{"a", " ", "t"}]},
         "BesselJ"]}], "t"], 
      RowBox[{"\[Nu]", ">", "0"}]},
     {
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"s", "-", 
         SqrtBox[
          RowBox[{
           SuperscriptBox["s", "2"], "-", 
           SuperscriptBox["a", "2"]}]]}], ")"}], "\[Nu]"], 
      FractionBox[
       RowBox[{"\[Nu]", " ", 
        SuperscriptBox["a", "\[Nu]"], " ", 
        TemplateBox[{"\[Nu]", 
          RowBox[{"a", " ", "t"}]},
         "BesselI"]}], "t"], 
      RowBox[{"\[Nu]", ">", "0"}]},
     {
      SuperscriptBox["\[ExponentialE]", 
       RowBox[{
        RowBox[{"-", "a"}], " ", "s"}]], 
      TemplateBox[{
        RowBox[{
          RowBox[{"t", "-", "a"}]}]},
       "DiracDeltaSeq"], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "a"}], " ", "s"}]], "s"], 
      TemplateBox[{
        RowBox[{
          RowBox[{"t", "-", "a"}]}]},
       "HeavisideThetaSeq"], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"-", 
         FractionBox["a", "s"]}]], 
       SqrtBox["s"]], 
      FractionBox[
       RowBox[{"cosh", "(", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"-", "a"}], " ", "t"}]]}], ")"}], 
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SqrtBox["t"]}]], ""},
     {
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"-", 
         FractionBox["a", "s"]}]], 
       SuperscriptBox["s", 
        RowBox[{"3", "/", "2"}]]], 
      FractionBox[
       RowBox[{"sinh", "(", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"-", "a"}], " ", "t"}]]}], ")"}], 
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SqrtBox[
         RowBox[{"-", "a"}]]}]], ""},
     {
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"-", 
         FractionBox["a", "s"]}]], " ", 
       SuperscriptBox["s", 
        RowBox[{
         RowBox[{"-", "\[Nu]"}], "-", "1"}]]}], 
      RowBox[{
       SuperscriptBox["a", 
        RowBox[{
         RowBox[{"-", "\[Nu]"}], "/", "2"}]], " ", 
       SuperscriptBox["t", 
        RowBox[{"\[Nu]", "/", "2"}]], " ", 
       TemplateBox[{"\[Nu]", 
         RowBox[{"2", " ", 
           SqrtBox["a"], " ", 
           SqrtBox["t"]}]},
        "BesselJ"]}], 
      RowBox[{"\[Nu]", ">", 
       RowBox[{"-", "1"}]}]},
     {
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "a"}], " ", 
         SqrtBox["s"]}]], 
       SqrtBox["s"]], 
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"-", 
         FractionBox[
          SuperscriptBox["a", "2"], 
          RowBox[{"4", " ", "t"}]]}]], 
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SqrtBox["t"]}]], 
      RowBox[{"a", ">", "0"}]},
     {
      SuperscriptBox["\[ExponentialE]", 
       RowBox[{
        RowBox[{"-", "a"}], " ", 
        SqrtBox["s"]}]], 
      FractionBox[
       RowBox[{"a", " ", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"-", 
          FractionBox[
           SuperscriptBox["a", "2"], 
           RowBox[{"4", " ", "t"}]]}]]}], 
       RowBox[{"2", " ", 
        SqrtBox["\[Pi]"], " ", 
        SuperscriptBox["t", 
         RowBox[{"3", "/", "2"}]]}]], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "a"}], " ", 
         SqrtBox["s"]}]], "s"], 
      RowBox[{"erfc", "(", 
       FractionBox["a", 
        RowBox[{"2", " ", 
         SqrtBox["t"]}]], ")"}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "k"}], " ", 
         SqrtBox[
          RowBox[{
           SuperscriptBox["a", "2"], "+", 
           SuperscriptBox["s", "2"]}]]}]], 
       SqrtBox[
        RowBox[{
         SuperscriptBox["a", "2"], "+", 
         SuperscriptBox["s", "2"]}]]], 
      TagBox[GridBox[{
         {"\[Piecewise]", GridBox[{
            {
             TemplateBox[{"0", 
               RowBox[{"a", " ", 
                 SqrtBox[
                  RowBox[{
                    SuperscriptBox["t", "2"], "-", 
                    SuperscriptBox["k", "2"]}]]}]},
              "BesselJ"], 
             RowBox[{"k", "\[LessEqual]", "t"}]},
            {"0", 
             TagBox["True",
              "PiecewiseDefault",
              AutoDelete->True]}
           },
           AllowedDimensions->{2, Automatic},
           Editable->True,
           GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
           GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{1.}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.84]}, 
               Offset[0.27999999999999997`]}, "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}},
           Selectable->True]}
        },
        GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{1.}}},
        GridBoxSpacings->{"Columns" -> {
            Offset[0.27999999999999997`], {
             Offset[0.35]}, 
            Offset[0.27999999999999997`]}, "Rows" -> {
            Offset[0.2], {
             Offset[0.4]}, 
            Offset[0.2]}}],
       "Piecewise",
       DeleteWithContents->True,
       Editable->False,
       SelectWithContents->True,
       Selectable->False,
       StripWrapperBoxes->True], 
      RowBox[{"k", ">", "0"}]},
     {
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "k"}], " ", 
         SqrtBox[
          RowBox[{
           SuperscriptBox["s", "2"], "-", 
           SuperscriptBox["a", "2"]}]]}]], 
       SqrtBox[
        RowBox[{
         SuperscriptBox["s", "2"], "-", 
         SuperscriptBox["a", "2"]}]]], 
      TagBox[GridBox[{
         {"\[Piecewise]", GridBox[{
            {
             TemplateBox[{"0", 
               RowBox[{"a", " ", 
                 SqrtBox[
                  RowBox[{
                    SuperscriptBox["t", "2"], "-", 
                    SuperscriptBox["k", "2"]}]]}]},
              "BesselI"], 
             RowBox[{"k", "\[LessEqual]", "t"}]},
            {"0", 
             TagBox["True",
              "PiecewiseDefault",
              AutoDelete->True]}
           },
           AllowedDimensions->{2, Automatic},
           Editable->True,
           GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
           GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{1.}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.84]}, 
               Offset[0.27999999999999997`]}, "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}},
           Selectable->True]}
        },
        GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{1.}}},
        GridBoxSpacings->{"Columns" -> {
            Offset[0.27999999999999997`], {
             Offset[0.35]}, 
            Offset[0.27999999999999997`]}, "Rows" -> {
            Offset[0.2], {
             Offset[0.4]}, 
            Offset[0.2]}}],
       "Piecewise",
       DeleteWithContents->True,
       Editable->False,
       SelectWithContents->True,
       Selectable->False,
       StripWrapperBoxes->True], 
      RowBox[{"k", ">", "0"}]},
     {
      FractionBox["1", 
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"a", " ", "s"}]], "-", "1"}], ")"}]}]], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  RowBox[{"-", 
                    FractionBox[
                    RowBox[{"\[ImaginaryI]", " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    FractionBox[
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[FormalN]", " ", 
                    "\[Pi]", " ", "t"}], "a"]]}], 
                    RowBox[{"2", " ", "\[FormalN]", " ", "\[Pi]"}]]}], 
                  RowBox[{"\[FormalN]", "\[NotEqual]", "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", 
       FractionBox["t", "a"], "-", 
       FractionBox["1", "2"]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["1", 
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", "s"], "-", "a"}], ")"}]}]], 
      RowBox[{
       FractionBox["1", 
        RowBox[{"1", "-", "a"}]], "+", 
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{
                    SuperscriptBox["a", 
                    RowBox[{"t", "-", "1"}]], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[FormalN]", " ", 
                    "\[Pi]", " ", "t"}]]}], 
                   RowBox[{
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[Pi]", " ", 
                    "\[FormalN]"}], "+", 
                    RowBox[{"log", "(", "a", ")"}]}]], 
                  RowBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]", " ", "\[Pi]"}], "-", 
                    RowBox[{"\[ImaginaryI]", " ", 
                    RowBox[{"log", "(", "a", ")"}]}]}], "\[NotEqual]", 
                    "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], ""},
     {
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", "s"], "-", "1"}], 
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", "s"], "-", "a"}], ")"}]}]], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{
                    SuperscriptBox["a", "t"], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[FormalN]", " ", 
                    "\[Pi]", " ", "t"}]]}], 
                   RowBox[{
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[Pi]", " ", 
                    "\[FormalN]"}], "+", 
                    RowBox[{"log", "(", "a", ")"}]}]], 
                  RowBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]", " ", "\[Pi]"}], "-", 
                    RowBox[{"\[ImaginaryI]", " ", 
                    RowBox[{"log", "(", "a", ")"}]}]}], "\[NotEqual]", 
                    "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "-", 
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{
                    SuperscriptBox["a", 
                    RowBox[{"t", "-", "1"}]], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[FormalN]", " ", 
                    "\[Pi]", " ", "t"}]]}], 
                   RowBox[{
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[Pi]", " ", 
                    "\[FormalN]"}], "+", 
                    RowBox[{"log", "(", "a", ")"}]}]], 
                  RowBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]", " ", "\[Pi]"}], "-", 
                    RowBox[{"\[ImaginaryI]", " ", 
                    RowBox[{"log", "(", "a", ")"}]}]}], "\[NotEqual]", 
                    "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], ""},
     {
      FractionBox["1", 
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{"1", "-", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "a"}], " ", "s"}]]}], ")"}]}]], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{"\[ImaginaryI]", " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    
                    RowBox[{
                    "2", " ", "\[ImaginaryI]", " ", "\[FormalN]", " ", 
                    "\[Pi]", " ", "t"}], "a"]}]]}], 
                   RowBox[{"2", " ", "\[FormalN]", " ", "\[Pi]"}]], 
                  RowBox[{"\[FormalN]", "\[NotEqual]", "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", 
       FractionBox["t", "a"], "+", 
       FractionBox["1", "2"]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["1", 
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "a"}], " ", "s"}]], "+", "1"}], ")"}]}]], 
      RowBox[{
       FractionBox["1", "2"], "+", 
       TemplateBox[{
         FractionBox[
          RowBox[{"\[ImaginaryI]", " ", 
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
               FractionBox[
                RowBox[{"\[ImaginaryI]", " ", 
                  RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                  "\[Pi]", " ", "t"}], "a"]}]]}], 
          RowBox[{
            RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", "\[Pi]"}]], 
         "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["1", 
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"a", " ", "s"}]], "+", "1"}], ")"}]}]], 
      RowBox[{
       FractionBox["1", "2"], "+", 
       TemplateBox[{
         FractionBox[
          RowBox[{"\[ImaginaryI]", " ", 
            SuperscriptBox["\[ExponentialE]", 
             FractionBox[
              RowBox[{"\[ImaginaryI]", " ", 
                RowBox[{"(", 
                  RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                "\[Pi]", " ", "t"}], "a"]]}], 
          RowBox[{
            RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", "\[Pi]"}]], 
         "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{"1", "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "a"}], " ", "s"}]]}], 
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "a"}], " ", "s"}]], "+", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"a", " ", "s"}]]}], ")"}]}]], 
      RowBox[{
       RowBox[{
        RowBox[{"-", 
         FractionBox["1", "2"]}], " ", 
        TemplateBox[{
          RowBox[{
            RowBox[{"t", "-", "a"}]}]},
         "HeavisideThetaSeq"], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", 
           TemplateBox[{
             FractionBox[
              RowBox[{"\[ImaginaryI]", " ", 
                SuperscriptBox["\[ExponentialE]", 
                 FractionBox[
                  RowBox[{"\[ImaginaryI]", " ", 
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                    "\[Pi]", " ", "t"}], 
                  RowBox[{"2", " ", "a"}]]]}], 
              RowBox[{
                RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                "\[Pi]"}]], "\[FormalN]", 
             RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
            "InactiveSum",
            DisplayFunction->(RowBox[{
               UnderoverscriptBox[
                StyleBox["\[Sum]", "InactiveTraditional"], 
                RowBox[{#2, "=", #3}], #4], #}]& ),
            InterpretationFunction->(RowBox[{
               RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
               RowBox[{#, ",", 
                 RowBox[{"{", 
                   RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}]}], 
         ")"}]}], "+", 
       TemplateBox[{
         RowBox[{"-", 
           FractionBox[
            RowBox[{
              SuperscriptBox[
               RowBox[{"(", 
                 RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
              SuperscriptBox["\[ExponentialE]", 
               FractionBox[
                RowBox[{"\[ImaginaryI]", " ", 
                  RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                  "\[Pi]", " ", "t"}], 
                RowBox[{"2", " ", "a"}]]]}], 
            RowBox[{
              RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
              "\[Pi]"}]]}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", 
       FractionBox["1", "2"]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{"tanh", "(", 
        FractionBox[
         RowBox[{"a", " ", "s"}], "2"], ")"}], "s"], 
      TemplateBox[{
        RowBox[{"-", 
          FractionBox[
           RowBox[{"2", " ", "\[ImaginaryI]", " ", 
             SuperscriptBox["\[ExponentialE]", 
              FractionBox[
               RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
                 RowBox[{"(", 
                   RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                 "t"}], "a"]]}], 
           RowBox[{
             RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
             "\[Pi]"}]]}], "\[FormalN]", 
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
       "InactiveSum",
       DisplayFunction->(RowBox[{
          UnderoverscriptBox[
           StyleBox["\[Sum]", "InactiveTraditional"], 
           RowBox[{#2, "=", #3}], #4], #}]& ),
       InterpretationFunction->(RowBox[{
          RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
          RowBox[{#, ",", 
            RowBox[{"{", 
              RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox["\[Omega]", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "-", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"-", 
            FractionBox[
             RowBox[{"\[Pi]", " ", "s"}], "\[Omega]"]}]]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["s", "2"], "+", 
          SuperscriptBox["\[Omega]", "2"]}], ")"}]}]], 
      RowBox[{
       RowBox[{
        FractionBox["1", "2"], " ", 
        RowBox[{"sin", "(", 
         RowBox[{"t", " ", "\[Omega]"}], ")"}]}], "+", 
       RowBox[{"\[Omega]", " ", 
        TemplateBox[{
          FractionBox[
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{
              RowBox[{"-", "2"}], " ", "\[ImaginaryI]", " ", "\[FormalN]", 
              " ", "t", " ", "\[Omega]"}]], 
           RowBox[{
             RowBox[{"\[Pi]", " ", "\[Omega]"}], "-", 
             RowBox[{"4", " ", 
               SuperscriptBox["\[FormalN]", "2"], " ", "\[Pi]", " ", 
               "\[Omega]"}]}]], "\[FormalN]", 
          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
         "InactiveSum",
         DisplayFunction->(RowBox[{
            UnderoverscriptBox[
             StyleBox["\[Sum]", "InactiveTraditional"], 
             RowBox[{#2, "=", #3}], #4], #}]& ),
         InterpretationFunction->(RowBox[{
            RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
            RowBox[{#, ",", 
              RowBox[{"{", 
                RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}]}], 
      RowBox[{"\[Omega]", ">", "0"}]},
     {
      FractionBox[
       RowBox[{"\[Omega]", " ", 
        RowBox[{"coth", "(", 
         FractionBox[
          RowBox[{"\[Pi]", " ", "s"}], 
          RowBox[{"2", " ", "\[Omega]"}]], ")"}]}], 
       RowBox[{
        SuperscriptBox["s", "2"], "+", 
        SuperscriptBox["\[Omega]", "2"]}]], 
      RowBox[{"\[Omega]", " ", 
       TemplateBox[{
         FractionBox[
          RowBox[{"2", " ", 
            SuperscriptBox["\[ExponentialE]", 
             
             RowBox[{"2", " ", "\[ImaginaryI]", " ", "\[FormalN]", " ", "t", 
               " ", "\[Omega]"}]]}], 
          RowBox[{
            RowBox[{"\[Pi]", " ", "\[Omega]"}], "-", 
            RowBox[{"4", " ", 
              SuperscriptBox["\[FormalN]", "2"], " ", "\[Pi]", " ", 
              "\[Omega]"}]}]], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"\[Omega]", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "2"}], " ", "s"}]], "+", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"-", "s"}]]}], 
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"1", "-", 
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{"-", "s"}]]}], ")"}], "2"], " ", "s"}]], 
      SuperscriptBox[
       TemplateBox[{"t"},
        "Floor"], "2"], ""},
     {
      FractionBox[
       RowBox[{"1", "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "a"}], " ", "s"}]]}], 
       RowBox[{"a", " ", 
        SuperscriptBox["s", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "a"}], " ", "s"}]], "+", "1"}], ")"}]}]], 
      RowBox[{
       FractionBox["1", "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"TriangleWave", "[", 
          RowBox[{
           FractionBox["t", 
            RowBox[{"2", " ", "a"}]], "+", 
           FractionBox["3", "4"]}], "]"}], "+", "1"}], ")"}]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{"1", "-", 
        RowBox[{
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{
           RowBox[{"-", "a"}], " ", "s"}]], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"a", " ", "s"}], "+", "1"}], ")"}]}]}], 
       RowBox[{"a", " ", 
        SuperscriptBox["s", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"1", "-", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "2"}], " ", "a", " ", "s"}]]}], ")"}]}]], 
      RowBox[{"max", "(", 
       RowBox[{"0", ",", 
        RowBox[{
         RowBox[{"2", " ", 
          RowBox[{"SawtoothWave", "[", 
           RowBox[{
            FractionBox["1", "2"], " ", 
            RowBox[{"(", 
             RowBox[{
              FractionBox["t", "a"], "-", "1"}], ")"}]}], "]"}]}], "-", 
         "1"}]}], ")"}], 
      RowBox[{"a", ">", "0"}]},
     {
      RowBox[{"log", "(", 
       FractionBox[
        RowBox[{"a", "+", "s"}], 
        RowBox[{"b", "+", "s"}]], ")"}], 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "b"}], " ", "t"}]], "-", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "a"}], " ", "t"}]]}], "t"], ""},
     {
      FractionBox[
       RowBox[{"log", "(", "s", ")"}], "s"], 
      RowBox[{
       RowBox[{"-", 
        RowBox[{"log", "(", "t", ")"}]}], "-", 
       TagBox["\[DoubledGamma]",
        Function[{}, EulerGamma]]}], ""},
     {
      RowBox[{"log", "(", 
       FractionBox[
        RowBox[{
         SuperscriptBox["a", "2"], "+", 
         SuperscriptBox["s", "2"]}], 
        RowBox[{
         SuperscriptBox["b", "2"], "+", 
         SuperscriptBox["s", "2"]}]], ")"}], 
      RowBox[{"-", 
       FractionBox[
        RowBox[{"2", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"cos", "(", 
            RowBox[{"a", " ", "t"}], ")"}], "-", 
           RowBox[{"cos", "(", 
            RowBox[{"b", " ", "t"}], ")"}]}], ")"}]}], "t"]}], 
      RowBox[{
       RowBox[{"a", ">", "0"}], "\[And]", 
       RowBox[{"b", ">", "0"}]}]},
     {
      FractionBox[
       RowBox[{"log", "(", 
        FractionBox[
         RowBox[{
          SuperscriptBox["a", "2"], "+", 
          SuperscriptBox["s", "2"]}], 
         SuperscriptBox["a", "2"]], ")"}], 
       RowBox[{"2", " ", "s"}]], 
      RowBox[{"-", 
       TemplateBox[{
         RowBox[{"a", " ", "t"}]},
        "CosIntegral"]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{"log", "(", 
        FractionBox[
         RowBox[{"a", "+", "s"}], "a"], ")"}], "s"], 
      RowBox[{
       FractionBox["1", "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"log", "(", 
          RowBox[{
           RowBox[{"-", 
            SuperscriptBox["a", "2"]}], " ", "t"}], ")"}], "-", 
         RowBox[{"2", " ", 
          TemplateBox[{
            RowBox[{
              RowBox[{"-", "a"}], " ", "t"}]},
           "ExpIntegralEi"]}], "-", 
         RowBox[{"2", " ", 
          RowBox[{"log", "(", "a", ")"}]}], "-", 
         RowBox[{"log", "(", 
          RowBox[{"-", 
           FractionBox["1", "t"]}], ")"}], "-", 
         RowBox[{"2", " ", 
          RowBox[{"log", "(", "t", ")"}]}]}], ")"}]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        SuperscriptBox["log", "2"], "(", "s", ")"}], "s"], 
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"log", "(", "t", ")"}], "+", 
          TagBox["\[DoubledGamma]",
           Function[{}, EulerGamma]]}], ")"}], "2"], "-", 
       FractionBox[
        SuperscriptBox["\[Pi]", "2"], "6"]}], ""},
     {
      RowBox[{
       SuperscriptBox["tan", 
        RowBox[{"-", "1"}]], "(", 
       FractionBox["a", "s"], ")"}], 
      FractionBox[
       RowBox[{"sin", "(", 
        RowBox[{"a", " ", "t"}], ")"}], "t"], ""},
     {
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"a", "/", "s"}]], " ", 
        RowBox[{"erfc", "(", 
         SqrtBox[
          FractionBox["a", "s"]], ")"}]}], 
       SqrtBox["s"]], 
      FractionBox[
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "2"}], " ", 
         SqrtBox[
          RowBox[{"a", " ", "t"}]]}]], 
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SqrtBox["t"]}]], ""},
     {
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        FractionBox[
         SuperscriptBox["s", "2"], 
         RowBox[{"4", " ", 
          SuperscriptBox["a", "2"]}]]], " ", 
       RowBox[{"erfc", "(", 
        FractionBox["s", 
         RowBox[{"2", " ", "a"}]], ")"}]}], 
      FractionBox[
       RowBox[{"2", " ", "a", " ", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", 
           SuperscriptBox["a", "2"]}], " ", 
          SuperscriptBox["t", "2"]}]]}], 
       SqrtBox["\[Pi]"]], ""},
     {
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         FractionBox[
          SuperscriptBox["s", "2"], 
          RowBox[{"4", " ", 
           SuperscriptBox["a", "2"]}]]], " ", 
        RowBox[{"erfc", "(", 
         FractionBox["s", 
          RowBox[{"2", " ", "a"}]], ")"}]}], "s"], 
      RowBox[{"erf", "(", 
       RowBox[{"a", " ", "t"}], ")"}], ""},
     {
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"a", " ", "s"}]], " ", 
        RowBox[{"erfc", "(", 
         SqrtBox[
          RowBox[{"a", " ", "s"}]], ")"}]}], 
       SqrtBox["s"]], 
      FractionBox["1", 
       RowBox[{
        SqrtBox["\[Pi]"], " ", 
        SqrtBox[
         RowBox[{"a", "+", "t"}]]}]], ""},
     {
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"a", " ", "s"}]], " ", 
       TemplateBox[{
         RowBox[{
           RowBox[{"-", "a"}], " ", "s"}]},
        "ExpIntegralEi"]}], 
      RowBox[{"-", 
       FractionBox["1", 
        RowBox[{"a", "+", "t"}]]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{
         TemplateBox[{
           RowBox[{"a", " ", "s"}]},
          "CosIntegral"], " ", 
         RowBox[{"sin", "(", 
          RowBox[{"a", " ", "s"}], ")"}]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           FractionBox["\[Pi]", "2"], "-", 
           TemplateBox[{
             RowBox[{"a", " ", "s"}]},
            "SinIntegral"]}], ")"}], " ", 
         RowBox[{"cos", "(", 
          RowBox[{"a", " ", "s"}], ")"}]}]}], "a"], 
      FractionBox["1", 
       RowBox[{
        SuperscriptBox["a", "2"], "+", 
        SuperscriptBox["t", "2"]}]], 
      RowBox[{"a", ">", "0"}]},
     {
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          FractionBox["\[Pi]", "2"], "-", 
          TemplateBox[{
            RowBox[{"a", " ", "s"}]},
           "SinIntegral"]}], ")"}], " ", 
        RowBox[{"sin", "(", 
         RowBox[{"a", " ", "s"}], ")"}]}], "-", 
       RowBox[{
        TemplateBox[{
          RowBox[{"a", " ", "s"}]},
         "CosIntegral"], " ", 
        RowBox[{"cos", "(", 
         RowBox[{"a", " ", "s"}], ")"}]}]}], 
      FractionBox["t", 
       RowBox[{
        SuperscriptBox["a", "2"], "+", 
        SuperscriptBox["t", "2"]}]], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{
         TemplateBox[{
           RowBox[{"a", " ", "s"}]},
          "CosIntegral"], " ", 
         RowBox[{"sin", "(", 
          RowBox[{"a", " ", "s"}], ")"}]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           FractionBox["\[Pi]", "2"], "-", 
           TemplateBox[{
             RowBox[{"a", " ", "s"}]},
            "SinIntegral"]}], ")"}], " ", 
         RowBox[{"cos", "(", 
          RowBox[{"a", " ", "s"}], ")"}]}]}], "s"], 
      RowBox[{
       SuperscriptBox["tan", 
        RowBox[{"-", "1"}]], "(", 
       FractionBox["t", "a"], ")"}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           FractionBox["\[Pi]", "2"], "-", 
           TemplateBox[{
             RowBox[{"a", " ", "s"}]},
            "SinIntegral"]}], ")"}], " ", 
         RowBox[{"sin", "(", 
          RowBox[{"a", " ", "s"}], ")"}]}], "-", 
        RowBox[{
         TemplateBox[{
           RowBox[{"a", " ", "s"}]},
          "CosIntegral"], " ", 
         RowBox[{"cos", "(", 
          RowBox[{"a", " ", "s"}], ")"}]}]}], "s"], 
      RowBox[{
       FractionBox["1", "2"], " ", 
       RowBox[{"log", "(", 
        RowBox[{
         FractionBox[
          SuperscriptBox["t", "2"], 
          SuperscriptBox["a", "2"]], "+", "1"}], ")"}]}], 
      RowBox[{"a", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"csch", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"sinh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], "s"], 
      RowBox[{
       FractionBox["x", "a"], "+", 
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{
                    SuperscriptBox["\[ExponentialE]", 
                    FractionBox[
                    
                    RowBox[{
                    "\[ImaginaryI]", " ", "\[FormalN]", " ", "\[Pi]", " ", 
                    RowBox[{"(", 
                    RowBox[{"a", "+", "t"}], ")"}]}], "a"]], " ", 
                    RowBox[{"sin", "(", 
                    FractionBox[
                    RowBox[{"\[FormalN]", " ", "\[Pi]", " ", "x"}], "a"], 
                    ")"}]}], 
                   RowBox[{"\[FormalN]", " ", "\[Pi]"}]], 
                  RowBox[{"\[FormalN]", "\[NotEqual]", "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"sech", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"sinh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], "s"], 
      TemplateBox[{
        RowBox[{"-", 
          FractionBox[
           RowBox[{"2", " ", "\[ImaginaryI]", " ", 
             SuperscriptBox["\[ExponentialE]", 
              FractionBox[
               RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
                 RowBox[{"(", 
                   RowBox[{
                    RowBox[{"2", " ", "\[FormalN]", " ", 
                    RowBox[{"(", 
                    RowBox[{"a", "+", "t"}], ")"}]}], "+", "t"}], ")"}]}], 
               RowBox[{"2", " ", "a"}]]], " ", 
             RowBox[{"sin", "(", 
               FractionBox[
                RowBox[{"\[Pi]", " ", 
                  RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                  "x"}], 
                RowBox[{"2", " ", "a"}]], ")"}]}], 
           RowBox[{
             RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
             "\[Pi]"}]]}], "\[FormalN]", 
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
       "InactiveSum",
       DisplayFunction->(RowBox[{
          UnderoverscriptBox[
           StyleBox["\[Sum]", "InactiveTraditional"], 
           RowBox[{#2, "=", #3}], #4], #}]& ),
       InterpretationFunction->(RowBox[{
          RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
          RowBox[{#, ",", 
            RowBox[{"{", 
              RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"csch", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"cosh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], "s"], 
      RowBox[{
       FractionBox["t", "a"], "+", 
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  RowBox[{"-", 
                    FractionBox[
                    RowBox[{"\[ImaginaryI]", " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    FractionBox[
                    
                    RowBox[{
                    "\[ImaginaryI]", " ", "\[FormalN]", " ", "\[Pi]", " ", 
                    RowBox[{"(", 
                    RowBox[{"a", "+", "t"}], ")"}]}], "a"]], " ", 
                    RowBox[{"cos", "(", 
                    FractionBox[
                    RowBox[{"\[FormalN]", " ", "\[Pi]", " ", "x"}], "a"], 
                    ")"}]}], 
                    RowBox[{"\[FormalN]", " ", "\[Pi]"}]]}], 
                  RowBox[{"\[FormalN]", "\[NotEqual]", "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"sech", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"cosh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], "s"], 
      RowBox[{"1", "+", 
       TemplateBox[{
         RowBox[{"-", 
           FractionBox[
            RowBox[{"2", " ", 
              SuperscriptBox["\[ExponentialE]", 
               FractionBox[
                RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
                  RowBox[{"(", 
                    RowBox[{"t", "+", 
                    RowBox[{"2", " ", "\[FormalN]", " ", 
                    RowBox[{"(", 
                    RowBox[{"a", "+", "t"}], ")"}]}]}], ")"}]}], 
                RowBox[{"2", " ", "a"}]]], " ", 
              RowBox[{"cos", "(", 
                FractionBox[
                 RowBox[{
                   RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                   "\[Pi]", " ", "x"}], 
                 RowBox[{"2", " ", "a"}]], ")"}]}], 
            RowBox[{
              RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
              "\[Pi]"}]]}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"csch", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"sinh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], 
       SuperscriptBox["s", "2"]], 
      RowBox[{
       FractionBox[
        RowBox[{"2", " ", "a", " ", 
         TemplateBox[{
           FractionBox[
            RowBox[{
              SuperscriptBox[
               RowBox[{"(", 
                 RowBox[{"-", "1"}], ")"}], 
               RowBox[{"K", "[", "1", "]"}]], " ", 
              RowBox[{"sin", "(", 
                FractionBox[
                 RowBox[{"\[Pi]", " ", "t", " ", 
                   RowBox[{"K", "[", "1", "]"}]}], "a"], ")"}], " ", 
              RowBox[{"sin", "(", 
                FractionBox[
                 RowBox[{"\[Pi]", " ", "x", " ", 
                   RowBox[{"K", "[", "1", "]"}]}], "a"], ")"}]}], 
            SuperscriptBox[
             RowBox[{"K", "[", "1", "]"}], "2"]], 
           RowBox[{"K", "[", "1", "]"}], "1", "\[Infinity]"},
          "InactiveSum",
          DisplayFunction->(RowBox[{
             UnderoverscriptBox[
              StyleBox["\[Sum]", "InactiveTraditional"], 
              RowBox[{#2, "=", #3}], #4], #}]& ),
          InterpretationFunction->(RowBox[{
             RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
             RowBox[{#, ",", 
               RowBox[{"{", 
                 RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
        SuperscriptBox["\[Pi]", "2"]], "+", 
       FractionBox[
        RowBox[{"t", " ", "x"}], "a"]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"sech", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"sinh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], 
       SuperscriptBox["s", "2"]], 
      RowBox[{"x", "+", 
       TemplateBox[{
         RowBox[{"-", 
           FractionBox[
            RowBox[{"4", " ", "a", " ", 
              SuperscriptBox["\[ExponentialE]", 
               FractionBox[
                RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
                  RowBox[{"(", 
                    RowBox[{"t", "+", 
                    RowBox[{"2", " ", "\[FormalN]", " ", 
                    RowBox[{"(", 
                    RowBox[{"a", "+", "t"}], ")"}]}]}], ")"}]}], 
                RowBox[{"2", " ", "a"}]]], " ", 
              RowBox[{"sin", "(", 
                FractionBox[
                 RowBox[{
                   RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                   "\[Pi]", " ", "x"}], 
                 RowBox[{"2", " ", "a"}]], ")"}]}], 
            SuperscriptBox[
             RowBox[{"(", 
               RowBox[{
                 RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                 "\[Pi]"}], ")"}], "2"]]}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"csch", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"cosh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], 
       SuperscriptBox["s", "2"]], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  RowBox[{"-", 
                    FractionBox[
                    RowBox[{"a", " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    FractionBox[
                    
                    RowBox[{
                    "\[ImaginaryI]", " ", "\[FormalN]", " ", "\[Pi]", " ", 
                    RowBox[{"(", 
                    RowBox[{"a", "+", "t"}], ")"}]}], "a"]], " ", 
                    RowBox[{"cos", "(", 
                    FractionBox[
                    RowBox[{"\[FormalN]", " ", "\[Pi]", " ", "x"}], "a"], 
                    ")"}]}], 
                    RowBox[{
                    SuperscriptBox["\[FormalN]", "2"], " ", 
                    SuperscriptBox["\[Pi]", "2"]}]]}], 
                  RowBox[{"\[FormalN]", "\[NotEqual]", "0"}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", 
       FractionBox[
        RowBox[{
         SuperscriptBox["t", "2"], "+", 
         SuperscriptBox["x", "2"]}], 
        RowBox[{"2", " ", "a"}]], "-", 
       FractionBox["a", "6"]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"sech", "(", 
         RowBox[{"a", " ", "s"}], ")"}], " ", 
        RowBox[{"cosh", "(", 
         RowBox[{"s", " ", "x"}], ")"}]}], 
       SuperscriptBox["s", "2"]], 
      RowBox[{"t", "+", 
       TemplateBox[{
         FractionBox[
          RowBox[{"4", " ", "\[ImaginaryI]", " ", "a", " ", 
            SuperscriptBox["\[ExponentialE]", 
             FractionBox[
              RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
                RowBox[{"(", 
                  RowBox[{"t", "+", 
                    RowBox[{"2", " ", "\[FormalN]", " ", 
                    RowBox[{"(", 
                    RowBox[{"a", "+", "t"}], ")"}]}]}], ")"}]}], 
              RowBox[{"2", " ", "a"}]]], " ", 
            RowBox[{"cos", "(", 
              FractionBox[
               RowBox[{
                 RowBox[{"(", 
                   RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                 "\[Pi]", " ", "x"}], 
               RowBox[{"2", " ", "a"}]], ")"}]}], 
          SuperscriptBox[
           RowBox[{"(", 
             RowBox[{
               RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", "\[Pi]"}],
              ")"}], "2"]], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      RowBox[{
       RowBox[{"csch", "(", 
        RowBox[{"a", " ", 
         SqrtBox["s"]}], ")"}], " ", 
       RowBox[{"sinh", "(", 
        RowBox[{
         SqrtBox["s"], " ", "x"}], ")"}]}], 
      TemplateBox[{
        RowBox[{"(", 
          TagBox[
           GridBox[{{"\[Piecewise]", 
              GridBox[{{
                 RowBox[{"-", 
                   FractionBox[
                    RowBox[{"2", " ", "\[Pi]", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    "\[FormalN]", " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox["\[Pi]", "2"], " ", 
                    SuperscriptBox["\[FormalN]", "2"], " ", "t"}], 
                    SuperscriptBox["a", "2"]]}]], " ", 
                    RowBox[{"sin", "(", 
                    FractionBox[
                    RowBox[{"\[Pi]", " ", "\[FormalN]", " ", "x"}], "a"], 
                    ")"}]}], 
                    SuperscriptBox["a", "2"]]}], 
                 RowBox[{
                   RowBox[{"\[FormalN]", "\[NotEqual]", "0"}], "\[And]", 
                   RowBox[{"\[FormalN]", "\[LongEqual]", 
                    TemplateBox[{"\[FormalN]"}, "Abs"]}]}]}, {"0", 
                 TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
               ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
               ColumnWidths -> Automatic, AllowedDimensions -> {2, Automatic},
                Selectable -> True, Editable -> True]}}, 
            ColumnAlignments -> {Left}, ColumnSpacings -> 0.5, ColumnWidths -> 
            Automatic], "Piecewise", SyntaxForm -> Equal, SelectWithContents -> 
           True, StripWrapperBoxes -> True, Selectable -> False, Editable -> 
           False, DeleteWithContents -> True], ")"}], "\[FormalN]", 
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
       "InactiveSum",
       DisplayFunction->(RowBox[{
          UnderoverscriptBox[
           StyleBox["\[Sum]", "InactiveTraditional"], 
           RowBox[{#2, "=", #3}], #4], #}]& ),
       InterpretationFunction->(RowBox[{
          RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
          RowBox[{#, ",", 
            RowBox[{"{", 
              RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      RowBox[{
       RowBox[{"sech", "(", 
        RowBox[{"a", " ", 
         SqrtBox["s"]}], ")"}], " ", 
       RowBox[{"cosh", "(", 
        RowBox[{
         SqrtBox["s"], " ", "x"}], ")"}]}], 
      TemplateBox[{
        RowBox[{"(", 
          TagBox[
           GridBox[{{"\[Piecewise]", 
              GridBox[{{
                 FractionBox[
                  RowBox[{"\[Pi]", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                    
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                    "\[Pi]"}], ")"}], "2"], " ", "t"}], 
                    RowBox[{"4", " ", 
                    SuperscriptBox["a", "2"]}]]}]], " ", 
                    RowBox[{"cos", "(", 
                    FractionBox[
                    RowBox[{"\[Pi]", " ", 
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                    "x"}], 
                    RowBox[{"2", " ", "a"}]], ")"}]}], 
                  SuperscriptBox["a", "2"]], 
                 RowBox[{
                   RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], 
                   "\[LongEqual]", 
                   TemplateBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}]}, 
                    "Abs"]}]}, {"0", 
                 TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
               ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
               ColumnWidths -> Automatic, AllowedDimensions -> {2, Automatic},
                Selectable -> True, Editable -> True]}}, 
            ColumnAlignments -> {Left}, ColumnSpacings -> 0.5, ColumnWidths -> 
            Automatic], "Piecewise", SyntaxForm -> Equal, SelectWithContents -> 
           True, StripWrapperBoxes -> True, Selectable -> False, Editable -> 
           False, DeleteWithContents -> True], ")"}], "\[FormalN]", 
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
       "InactiveSum",
       DisplayFunction->(RowBox[{
          UnderoverscriptBox[
           StyleBox["\[Sum]", "InactiveTraditional"], 
           RowBox[{#2, "=", #3}], #4], #}]& ),
       InterpretationFunction->(RowBox[{
          RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
          RowBox[{#, ",", 
            RowBox[{"{", 
              RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"sech", "(", 
         RowBox[{"a", " ", 
          SqrtBox["s"]}], ")"}], " ", 
        RowBox[{"sinh", "(", 
         RowBox[{
          SqrtBox["s"], " ", "x"}], ")"}]}], 
       SqrtBox["s"]], 
      TemplateBox[{
        RowBox[{"(", 
          TagBox[
           GridBox[{{"\[Piecewise]", 
              GridBox[{{
                 FractionBox[
                  RowBox[{"2", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                    "\[Pi]"}], ")"}], "2"], " ", "t"}], 
                    RowBox[{"4", " ", 
                    SuperscriptBox["a", "2"]}]]}]], " ", 
                    RowBox[{"sin", "(", 
                    FractionBox[
                    RowBox[{"\[Pi]", " ", 
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                    "x"}], 
                    RowBox[{"2", " ", "a"}]], ")"}]}], "a"], 
                 RowBox[{
                   RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], 
                   "\[LongEqual]", 
                   TemplateBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}]}, 
                    "Abs"]}]}, {"0", 
                 TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
               ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
               ColumnWidths -> Automatic, AllowedDimensions -> {2, Automatic},
                Selectable -> True, Editable -> True]}}, 
            ColumnAlignments -> {Left}, ColumnSpacings -> 0.5, ColumnWidths -> 
            Automatic], "Piecewise", SyntaxForm -> Equal, SelectWithContents -> 
           True, StripWrapperBoxes -> True, Selectable -> False, Editable -> 
           False, DeleteWithContents -> True], ")"}], "\[FormalN]", 
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
       "InactiveSum",
       DisplayFunction->(RowBox[{
          UnderoverscriptBox[
           StyleBox["\[Sum]", "InactiveTraditional"], 
           RowBox[{#2, "=", #3}], #4], #}]& ),
       InterpretationFunction->(RowBox[{
          RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
          RowBox[{#, ",", 
            RowBox[{"{", 
              RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"csch", "(", 
         RowBox[{"a", " ", 
          SqrtBox["s"]}], ")"}], " ", 
        RowBox[{"cosh", "(", 
         RowBox[{
          SqrtBox["s"], " ", "x"}], ")"}]}], 
       SqrtBox["s"]], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{"2", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox["\[FormalN]", "2"], " ", 
                    SuperscriptBox["\[Pi]", "2"], " ", "t"}], 
                    SuperscriptBox["a", "2"]]}]], " ", 
                    RowBox[{"cos", "(", 
                    FractionBox[
                    RowBox[{"\[FormalN]", " ", "\[Pi]", " ", "x"}], "a"], 
                    ")"}]}], "a"], 
                  RowBox[{
                    RowBox[{"\[FormalN]", "\[NotEqual]", "0"}], "\[And]", 
                    RowBox[{"\[FormalN]", "\[LongEqual]", 
                    TemplateBox[{"\[FormalN]"}, "Abs"]}]}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", 
       FractionBox["1", "a"]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"csch", "(", 
         RowBox[{"a", " ", 
          SqrtBox["s"]}], ")"}], " ", 
        RowBox[{"sinh", "(", 
         RowBox[{
          SqrtBox["s"], " ", "x"}], ")"}]}], "s"], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{"2", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox["\[FormalN]", "2"], " ", 
                    SuperscriptBox["\[Pi]", "2"], " ", "t"}], 
                    SuperscriptBox["a", "2"]]}]], " ", 
                    RowBox[{"sin", "(", 
                    FractionBox[
                    RowBox[{"\[FormalN]", " ", "\[Pi]", " ", "x"}], "a"], 
                    ")"}]}], 
                   RowBox[{"\[FormalN]", " ", "\[Pi]"}]], 
                  RowBox[{
                    RowBox[{"\[FormalN]", "\[NotEqual]", "0"}], "\[And]", 
                    RowBox[{"\[FormalN]", "\[LongEqual]", 
                    TemplateBox[{"\[FormalN]"}, "Abs"]}]}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", 
       FractionBox["x", "a"]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"sech", "(", 
         RowBox[{"a", " ", 
          SqrtBox["s"]}], ")"}], " ", 
        RowBox[{"cosh", "(", 
         RowBox[{
          SqrtBox["s"], " ", "x"}], ")"}]}], "s"], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  RowBox[{"-", 
                    FractionBox[
                    RowBox[{"4", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                    "\[Pi]"}], ")"}], "2"], " ", "t"}], 
                    RowBox[{"4", " ", 
                    SuperscriptBox["a", "2"]}]]}]], " ", 
                    RowBox[{"cos", "(", 
                    FractionBox[
                    RowBox[{
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                    "\[Pi]", " ", "x"}], 
                    RowBox[{"2", " ", "a"}]], ")"}]}], 
                    RowBox[{
                    RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                    "\[Pi]"}]]}], 
                  RowBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], 
                    "\[LongEqual]", 
                    TemplateBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}]}, 
                    "Abs"]}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", "1"}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"csch", "(", 
         RowBox[{"a", " ", 
          SqrtBox["s"]}], ")"}], " ", 
        RowBox[{"sinh", "(", 
         RowBox[{
          SqrtBox["s"], " ", "x"}], ")"}]}], 
       SuperscriptBox["s", "2"]], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  RowBox[{"-", 
                    FractionBox[
                    RowBox[{"2", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    SuperscriptBox["a", "2"], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox["\[FormalN]", "2"], " ", 
                    SuperscriptBox["\[Pi]", "2"], " ", "t"}], 
                    SuperscriptBox["a", "2"]]}]], " ", 
                    RowBox[{"sin", "(", 
                    FractionBox[
                    RowBox[{"\[FormalN]", " ", "\[Pi]", " ", "x"}], "a"], 
                    ")"}]}], 
                    RowBox[{
                    SuperscriptBox["\[FormalN]", "3"], " ", 
                    SuperscriptBox["\[Pi]", "3"]}]]}], 
                  RowBox[{
                    RowBox[{"\[FormalN]", "\[NotEqual]", "0"}], "\[And]", 
                    RowBox[{"\[FormalN]", "\[LongEqual]", 
                    TemplateBox[{"\[FormalN]"}, "Abs"]}]}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "+", 
       FractionBox[
        RowBox[{
         RowBox[{"-", 
          RowBox[{
           SuperscriptBox["a", "2"], " ", "x"}]}], "+", 
         RowBox[{"6", " ", "t", " ", "x"}], "+", 
         SuperscriptBox["x", "3"]}], 
        RowBox[{"6", " ", "a"}]]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"sech", "(", 
         RowBox[{"a", " ", 
          SqrtBox["s"]}], ")"}], " ", 
        RowBox[{"cosh", "(", 
         RowBox[{
          SqrtBox["s"], " ", "x"}], ")"}]}], 
       SuperscriptBox["s", "2"]], 
      RowBox[{
       TemplateBox[{
         RowBox[{"(", 
           TagBox[
            GridBox[{{"\[Piecewise]", 
               GridBox[{{
                  FractionBox[
                   RowBox[{"16", " ", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{"-", "1"}], ")"}], "\[FormalN]"], " ", 
                    SuperscriptBox["a", "2"], " ", 
                    SuperscriptBox["\[ExponentialE]", 
                    RowBox[{"-", 
                    FractionBox[
                    RowBox[{
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                    "\[Pi]"}], ")"}], "2"], " ", "t"}], 
                    RowBox[{"4", " ", 
                    SuperscriptBox["a", "2"]}]]}]], " ", 
                    RowBox[{"cos", "(", 
                    FractionBox[
                    RowBox[{
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], ")"}], " ", 
                    "\[Pi]", " ", "x"}], 
                    RowBox[{"2", " ", "a"}]], ")"}]}], 
                   SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"2", " ", "\[Pi]", " ", "\[FormalN]"}], "+", 
                    "\[Pi]"}], ")"}], "3"]], 
                  RowBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}], 
                    "\[LongEqual]", 
                    TemplateBox[{
                    RowBox[{
                    RowBox[{"2", " ", "\[FormalN]"}], "+", "1"}]}, 
                    "Abs"]}]}, {"0", 
                  TagBox["True", "PiecewiseDefault", AutoDelete -> True]}}, 
                ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, 
                ColumnWidths -> Automatic, 
                AllowedDimensions -> {2, Automatic}, Selectable -> True, 
                Editable -> True]}}, ColumnAlignments -> {Left}, 
             ColumnSpacings -> 0.5, ColumnWidths -> Automatic], "Piecewise", 
            SyntaxForm -> Equal, SelectWithContents -> True, 
            StripWrapperBoxes -> True, Selectable -> False, Editable -> False,
             DeleteWithContents -> True], ")"}], "\[FormalN]", 
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"},
        "InactiveSum",
        DisplayFunction->(RowBox[{
           UnderoverscriptBox[
            StyleBox["\[Sum]", "InactiveTraditional"], 
            RowBox[{#2, "=", #3}], #4], #}]& ),
        InterpretationFunction->(RowBox[{
           RowBox[{"Inactive", "[", "Sum", "]"}], "[", 
           RowBox[{#, ",", 
             RowBox[{"{", 
               RowBox[{#2, ",", #3, ",", #4}], "}"}]}], "]"}]& )], "-", 
       FractionBox[
        SuperscriptBox["a", "2"], "2"], "+", "t", "+", 
       FractionBox[
        SuperscriptBox["x", "2"], "2"]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       TemplateBox[{"0", 
         RowBox[{"\[ImaginaryI]", " ", 
           SqrtBox["s"], " ", "x"}]},
        "BesselJ"], 
       RowBox[{"s", " ", 
        TemplateBox[{"0", 
          RowBox[{"\[ImaginaryI]", " ", "a", " ", 
            SqrtBox["s"]}]},
         "BesselJ"]}]], 
      RowBox[{"1", "-", 
       RowBox[{"2", " ", 
        RowBox[{
         UnderoverscriptBox["\[Sum]", 
          RowBox[{
           RowBox[{"K", "[", "1", "]"}], "=", "1"}], "\[Infinity]"], 
         FractionBox[
          RowBox[{
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{"-", 
             FractionBox[
              RowBox[{"t", " ", 
               SuperscriptBox[
                RowBox[{"(", 
                 TemplateBox[{"0", 
                   RowBox[{"K", "[", "1", "]"}]},
                  "BesselJZero"], ")"}], "2"]}], 
              SuperscriptBox["a", "2"]]}]], " ", 
           TemplateBox[{"0", 
             FractionBox[
              RowBox[{"x", " ", 
                TemplateBox[{"0", 
                  RowBox[{"K", "[", "1", "]"}]}, "BesselJZero", SyntaxForm -> 
                 SubscriptBox]}], "a"]},
            "BesselJ"]}], 
          RowBox[{
           TemplateBox[{"0", 
             RowBox[{"K", "[", "1", "]"}]},
            "BesselJZero"], " ", 
           TemplateBox[{"1", 
             TemplateBox[{"0", 
               RowBox[{"K", "[", "1", "]"}]}, "BesselJZero", SyntaxForm -> 
              SubscriptBox]},
            "BesselJ"]}]]}]}]}], 
      RowBox[{"a", ">", "x", ">", "0"}]},
     {
      FractionBox[
       TemplateBox[{"0", 
         RowBox[{"\[ImaginaryI]", " ", 
           SqrtBox["s"], " ", "x"}]},
        "BesselJ"], 
       RowBox[{
        SuperscriptBox["s", "2"], " ", 
        TemplateBox[{"0", 
          RowBox[{"\[ImaginaryI]", " ", "a", " ", 
            SqrtBox["s"]}]},
         "BesselJ"]}]], 
      RowBox[{
       RowBox[{"2", " ", 
        SuperscriptBox["a", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          UnderoverscriptBox["\[Sum]", 
           RowBox[{
            RowBox[{"K", "[", "1", "]"}], "=", "1"}], "\[Infinity]"], 
          FractionBox[
           RowBox[{
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
              FractionBox[
               RowBox[{"t", " ", 
                SuperscriptBox[
                 RowBox[{"(", 
                  TemplateBox[{"0", 
                    RowBox[{"K", "[", "1", "]"}]},
                   "BesselJZero"], ")"}], "2"]}], 
               SuperscriptBox["a", "2"]]}]], " ", 
            TemplateBox[{"0", 
              FractionBox[
               RowBox[{"x", " ", 
                 TemplateBox[{"0", 
                   RowBox[{"K", "[", "1", "]"}]}, "BesselJZero", SyntaxForm -> 
                  SubscriptBox]}], "a"]},
             "BesselJ"]}], 
           RowBox[{
            SuperscriptBox[
             RowBox[{"(", 
              TemplateBox[{"0", 
                RowBox[{"K", "[", "1", "]"}]},
               "BesselJZero"], ")"}], "3"], " ", 
            TemplateBox[{"1", 
              TemplateBox[{"0", 
                RowBox[{"K", "[", "1", "]"}]}, "BesselJZero", SyntaxForm -> 
               SubscriptBox]},
             "BesselJ"]}]]}], ")"}]}], "+", 
       RowBox[{
        FractionBox["1", "4"], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["x", "2"], "-", 
          SuperscriptBox["a", "2"]}], ")"}]}], "+", "t"}], 
      RowBox[{"a", ">", "x", ">", "0"}]}
    },
    AutoDelete->False,
    BaseStyle->{FontFamily -> Times, FontSize -> 12},
    FrameStyle->Hue[0.6, 0.4, 0.8],
    GridBoxBackground->{"Columns" -> {{None}}, "Rows" -> {{None, 
         GrayLevel[0.9]}}, 
      "ItemsIndexed" -> {{1, 1} -> Hue[0.6, 0.4, 1], {1, 2} -> 
        Hue[0.6, 0.4, 1]}},
    GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}},
    GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
    GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{1}}}],
   "Grid"], TraditionalForm]], "Output",
 CellMargins->{{66, 0}, {14, 7}},
 CellChangeTimes->{{3.807436698942761*^9, 3.807436713430814*^9}, 
   3.810560534110831*^9, 3.863248484336534*^9, 3.912156910527686*^9, 
   3.912157030575132*^9, {3.912157084234555*^9, 3.912157125397911*^9}, {
   3.912157562739129*^9, 3.91215761014598*^9}, {3.912157690529305*^9, 
   3.912157704354144*^9}, {3.912157759342743*^9, 3.91215776835324*^9}, {
   3.912157806096744*^9, 3.9121578146359863`*^9}, 3.91215785651999*^9, 
   3.912157940160759*^9, 3.912158002008445*^9, {3.912158143830229*^9, 
   3.91215816676834*^9}, 3.912158230361526*^9, 3.912158410074543*^9, 
   3.912158576471101*^9, 3.912158632177777*^9, 3.912158858451195*^9, {
   3.912158907192957*^9, 3.912158926547127*^9}, 3.912159016556342*^9, 
   3.912159081889577*^9, {3.912159196780725*^9, 3.912159213677129*^9}, 
   3.912159267543935*^9, 3.91215933820089*^9, 3.912159538801107*^9, {
   3.9121595964490967`*^9, 3.912159619187192*^9}, 3.912159712663539*^9, 
   3.912159749732586*^9, 3.912159783526555*^9, 3.912159945316778*^9, 
   3.912160057648654*^9, 3.912160394959254*^9, 3.912160523982518*^9, 
   3.912160887408122*^9, 3.912171618621445*^9, 3.912245481352128*^9, 
   3.914843065425993*^9, 3.9247915587248745`*^9},
 CellID->27975257,ExpressionUUID->"e3cb8387-e321-954f-ac21-6da1ceb11359"]
}, {2}]]
}, Open  ]],

Cell["\[Copyright] 2026 Wolfram Media, Inc.", "SmallText",
 CellMargins->{{66, 66}, {20, 100}},
 CellGroupingRules->"SectionGrouping",
 FontSize->12,
 FontColor->RGBColor[
  0.7098039215686275, 0.7098039215686275, 
   0.7098039215686275],ExpressionUUID->"a1036ad9-deb3-4add-aacd-ab56c3790770"]
},
Editable->True,
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowToolbars->{},
CellInsertionPointCell->None,
WindowSize->Automatic,
WindowMargins->Automatic,
WindowFrame->"Normal",
WindowPersistentStyles->{
 WindowFrame, WindowMargins, WindowSize, Magnification},
WindowTitle->"Table of Laplace Transforms | Laplace Transforms in Theory and \
Practice",
DockedCells->{
  Cell[
   BoxData[
    TemplateBox[<|
     "label" -> TemplateBox[<|
        "heading" -> "Wolfram eTextbook Series", "title" -> 
         "Laplace Transforms in Theory and Practice"|>, 
        "BannerHeadingTitleTemplate"], "previous" -> TemplateBox[{
         TemplateBox[{
           TemplateBox[{}, "BannerLeftArrowTemplate"], 
           Function[{}, 
            
            NotebookLocate[{"LaplaceTransform-27_Sample-Exam.nb", ""}, 
             FrontEnd`HistoryData :> {
               EvaluationNotebook[]}]]}, "BannerButtonTemplate"], 
         "Sample Exam"}, "PrettyTooltipTemplate"], "next" -> TemplateBox[{
         TemplateBox[{
           TemplateBox[{}, "BannerRightArrowTemplate"], 
           Function[{}, 
            
            NotebookLocate[{"LaplaceTransform-29_References.nb", ""}, 
             FrontEnd`HistoryData :> {
               EvaluationNotebook[]}]]}, "BannerButtonTemplate"], 
         "References"}, "PrettyTooltipTemplate"], "menu" -> TemplateBox[{
         TemplateBox[{{
           "Cover" :> NotebookLocate[{"LaplaceTransform-00a_Cover.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "Introduction" :> 
            NotebookLocate[{"LaplaceTransform-00b_Introduction.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "1. What Is a Laplace Transform?" :> 
            NotebookLocate[{
              "LaplaceTransform-01_What-Is-a-Laplace-Transform.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "2. Formal Properties of the Laplace Transform: Part 1" :> 
            NotebookLocate[{
              "LaplaceTransform-02_Formal-Properties-of-the-Laplace-Transform-\
Part-1.nb", ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "3. Formal Properties of the Laplace Transform: Part 2" :> 
            NotebookLocate[{
              "LaplaceTransform-03_Formal-Properties-of-the-Laplace-Transform-\
Part-2.nb", ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "4. Special Functions" :> 
            NotebookLocate[{"LaplaceTransform-04_Special-Functions.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "5. Elementary Functions" :> 
            NotebookLocate[{
              "LaplaceTransform-05_Elementary-Functions.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "6. Piecewise and Generalized Functions" :> 
            NotebookLocate[{
              "LaplaceTransform-06_Piecewise-and-Generalized-Functions.nb", 
               ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "7. Periodic Functions" :> 
            NotebookLocate[{"LaplaceTransform-07_Periodic-Functions.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "8. Numerical Evaluation" :> 
            NotebookLocate[{
              "LaplaceTransform-08_Numerical-Evaluation.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "9. Definition of the Inverse Laplace Transform" :> 
            NotebookLocate[{
              "LaplaceTransform-09_Definition-of-the-Inverse-Laplace-\
Transform.nb", ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "10. Formal Properties of the Inverse Laplace Transform: Part 1" :> 
            NotebookLocate[{
              "LaplaceTransform-10_Formal-Properties-of-the-Inverse-Laplace-\
Transform-Part-1.nb", ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "11. Rational Functions" :> 
            NotebookLocate[{"LaplaceTransform-11_Rational-Functions.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "12. Formal Properties of the Inverse Laplace Transform: Part 2" :> 
            NotebookLocate[{
              "LaplaceTransform-12_Formal-Properties-of-the-Inverse-Laplace-\
Transform-Part-2.nb", ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "13. Other Functions" :> 
            NotebookLocate[{"LaplaceTransform-13_Other-Functions.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "14. Complex Inversion" :> 
            NotebookLocate[{"LaplaceTransform-14_Complex-Inversion.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "15. Series and Asymptotic Expansions" :> 
            NotebookLocate[{
              "LaplaceTransform-15_Series-and-Asymptotic-Expansions.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "16. Multivariate Transforms" :> 
            NotebookLocate[{
              "LaplaceTransform-16_Multivariate-Transforms.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "17. Numerical Inverse Laplace Transform" :> 
            NotebookLocate[{
              "LaplaceTransform-17_Numerical-Inverse-Laplace-Transform.nb", 
               ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "18. ODEs with Constant Coefficients" :> 
            NotebookLocate[{
              "LaplaceTransform-18_ODEs-with-Constant-Coefficients.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "19. ODEs: Applications in Physics and Engineering" :> 
            NotebookLocate[{
              "LaplaceTransform-19_ODEs-Applications-in-Physics-and-\
Engineering.nb", ""}, FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "20. ODEs with Polynomial Coefficients" :> 
            NotebookLocate[{
              "LaplaceTransform-20_ODEs-with-Polynomial-Coefficients.nb", ""},
               FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "21. Partial Differential Equations" :> 
            NotebookLocate[{
              "LaplaceTransform-21_Partial-Differential-Equations.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "22. Integral Equations" :> 
            NotebookLocate[{"LaplaceTransform-22_Integral-Equations.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "23. Fractional Differential Equations" :> 
            NotebookLocate[{
              "LaplaceTransform-23_Fractional-Differential-Equations.nb", ""},
               FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], 
            "24. Evaluation of Integrals and Sums" :> 
            NotebookLocate[{
              "LaplaceTransform-24_Evaluation-of-Integrals-and-Sums.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "25. Control Systems" :> 
            NotebookLocate[{"LaplaceTransform-25_Control-Systems.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "Laplace Transforms in a Nutshell" :> 
            NotebookLocate[{
              "LaplaceTransform-26_Laplace-Transforms-in-a-Nutshell.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "Sample Exam" :> 
            NotebookLocate[{"LaplaceTransform-27_Sample-Exam.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "Table of Laplace Transforms" :> 
            NotebookLocate[{
              "LaplaceTransform-28_Table-of-Laplace-Transforms.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}], "References" :> 
            NotebookLocate[{"LaplaceTransform-29_References.nb", ""}, 
              FrontEnd`HistoryData :> {
                EvaluationNotebook[]}]}}, "BannerMenuTemplate"], 
         "Table of contents"}, "PrettyTooltipTemplate"]|>, "BannerTemplate"]],
    "DockedCell", "Banner"], 
  Cell[
   BoxData[
    TemplateBox[<|"label" -> "Hrachya Khachatryan  |  Cite this eTextbook"|>, 
     "BannerCitationOpenerTemplate"]], "DockedCell", 
   "BannerCitationOpenerLabel"], 
  Cell[
   BoxData[
    TemplateBox[{
      TemplateBox[{"\"Hrachya Khachatryan (2026), \"", 
        StyleBox[
        "\"Laplace Transforms in Theory and Practice: A Computational \
Approach,\"", Selectable -> True, Copyable -> True, FontSlant -> Italic], 
        "\" Wolfram Media. \
wolfram-media.com/products/laplace-transforms-in-theory-and-practice.\""}, 
       "RowDefault"], 
      RowBox[{"Hrachya Khachatryan (2026), ", 
        StyleBox[
        "Laplace Transforms in Theory and Practice: A Computational \
Approach,", FontSlant -> "Italic"], 
        " Wolfram Media. \
wolfram-media.com/products/laplace-transforms-in-theory-and-practice."}]}, 
     "CitationClickToCopy2", BaseStyle -> {LineBreakWithin -> Automatic}]], 
   "DockedCell", "BannerCitation", CellOpen -> Dynamic[
     TrueQ[
      CurrentValue[
       EvaluationNotebook[], {TaggingRules, "eTextbook", "CitationOpener"}, 
       False]]]]},
PrintingCopies->1,
PrintingPageRange->{32000, 32000},
PrintingOptions->{"Magnification"->1.,
"PaperOrientation"->"Portrait",
"PaperSize"->{612, 792}},
ShowCellBracket->Automatic,
TaggingRules-><|"eTextbook" -> <|"CitationOpener" -> False|>|>,
ShowCellLabel->False,
CellLabelAutoDelete->True,
CellLabelTemplate-><|
 "In" -> "In[`1`]:=", "InExpired" -> "In[`1`]:=", "Out" -> "Out[`1`]=", 
  "OutExpired" -> "Out[`1`]="|>,
ShowCellTags->False,
ShowAutoSpellCheck->False,
ShowPredictiveInterface->False,
AutoStyleOptions->{"HighlightComments"->True},
AutoMultiplicationSymbol->{},
Magnification->1,
FrontEndVersion->"14.3 for Mac OS X ARM (64-bit) (July 1, 2025)",
StyleDefinitions->Notebook[{
   Cell[
    StyleData[StyleDefinitions -> "Default.nb"]], 
   Cell[
    CellGroupData[{
      Cell[
      "Style Environments", "Section", 
       CellChangeTimes -> {{3.64661165091824*^9, 3.646611654013329*^9}, 
         3.6485723794335403`*^9, 3.651347081728628*^9, 3.651347179462186*^9, 
         3.651347384135805*^9, 3.651348171662589*^9}], 
      Cell[
       StyleData[All, "Working"], CellInsertionPointCell -> 
       FEPrivate`FrontEndResource["FEExpressions", "CellInsertionMenu"], 
       DockedCells -> {
         Cell[
          BoxData[
           GridBox[{{
              InterpretationBox[
               StyleBox[
                
                GraphicsBox[{}, BaselinePosition -> Baseline, 
                 ImageSize -> {4, 0}], CacheGraphics -> False], 
               Spacer[5]], 
              ActionMenuBox[
              "\"Insert\"", {
               "\"Subsection\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToSubsectionStyle[]), 
                "\"Subsubsection\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToSubsubsectionStyle[]), 
                "\"Subsubsubsection\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToSubsubsubsectionStyle[]), 
                Delimiter, 
                "\"Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToTextStyle[]), "\"CodeText\"" :> 
                Module[{$CellContext`bn = ButtonNotebook[]}, 
                  If[Developer`CellInformation[$CellContext`bn] =!= $Failed, 
                    While[
                    FreeQ[
                    Developer`CellInformation[$CellContext`bn], 
                    "CellBracket"], 
                    FrontEndExecute[
                    
                    FrontEnd`SelectionMove[$CellContext`bn, All, Cell, 
                    AutoScroll -> False]]]; 
                    SelectionMove[$CellContext`bn, After, Cell]]; 
                  NotebookWrite[$CellContext`bn, 
                    Cell["XXXX", "CodeText"], All]; 
                  SelectionMove[$CellContext`bn, All, CellContents]], 
                "\"Hyperlink\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTGenerateHyperlinkDialog[]), 
                "\"Display Formula\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertDisplayFormulaCell[]), Delimiter, 
                "\"Solved Example\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`\
WBTInsertSolvedExampleAndSolvedExampleNoteCells[]), 
                "\"Solved Example Input\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolvedExampleInputCell[]), 
                "\"Solved Example Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolvedExampleNoteCell[]), 
                "\"Solved Example Display Formula\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolvedExampleDisplayFormulaCell[]),
                 "\"Solved Example Display Formula Numbered\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`\
WBTInsertSolvedExampleDisplayFormulaNumberedCell[]), Delimiter, 
                "\"Theorem\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTheoremCell[]), 
                "\"Theorem Numbered\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTheoremNumberedCell[]), 
                "\"Theorem Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTheoremTextCell[]), 
                "\"Proof/Theorem Display Formula\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertProofTheoremDisplayCell[]), 
                "\"Proof/Theorem Display Formula Numbered\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`\
WBTInsertProofTheoremDisplayFormulaNumberedCell[]), 
                "\"Proof\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertProofCell[]), 
                "\"Proof Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertProofTextCell[]), Delimiter, 
                "\"Vocabulary 2Col\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertVocabularySectionAnd2ColTable[]), 
                "\"Vocabulary 3Col\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertVocabularySectionAnd3ColTable[]), 
                "\"Add Row\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow[]), 
                "\"Remove Row\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow["RemoveRow" -> True]), 
                "\"Apply Divider\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow["AddDivider" -> True]), 
                "\"Remove Divider\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow[
                  "RemoveDivider" -> True]), Delimiter, 
                "\"Exercises\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseSection[]), 
                "\"Exercise\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseSection[]), 
                "\"Exercise Note\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseNote[]), 
                "\"Solution Section\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseSolution[]), 
                "\"Solution Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolutionAnswer[]), Delimiter, 
                "\"Q&A | Tech Notes | More\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertQAndATechNotesMore[]), 
                "\"Question\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertQuestion[]), 
                "\"Answer\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertAnswer[]), 
                "\"Tech Note\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTechNote[]), 
                "\"More to Explore\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertMoreExplore[]), Delimiter, 
                "\"References Section\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertReferencesSection[]), 
                "\"Add Reference\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTAddReferenceCell[]), Delimiter, 
                "\"Comment\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyComment[])}, FrameMargins -> 2.4], 
              ItemBox["", ItemSize -> Fit], 
              ActionMenuBox[
              "\"Function Name\"", {
               "\"Link\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTMakeSymbolLink[]), 
                "\"Format\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTFormatSymbol[])}, Appearance -> 
               "PopupMenu", Method -> "Queued", FrameMargins -> 2.4], 
              ButtonBox[
              "\"Resource Function Link\"", 
               ButtonFunction :> (Needs["WolframBookTools`"]; 
                WolframBookTools`WBTResourceFunctionLink[]), Evaluator -> 
               Automatic, Appearance -> "DialogBox", Method -> "Queued"], 
              ActionMenuBox[
              "\"Inline Format\"", {
               "\"Inline Code\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToInlineCode[]), 
                "\"Traditional Math\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTTraditionalFormCell[])}, Appearance -> 
               "PopupMenu", Method -> "Queued", FrameMargins -> 2.4], 
              ActionMenuBox[
              "\"Mark Cells\"", {
               "\"Tentative\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyTentative[]), Delimiter, 
                "\"Print Only\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyPrintOnly[]), 
                "\"Web Only\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyWebOnly[]), Delimiter, 
                "\"Locked\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyLock[])}, Appearance -> "PopupMenu",
                Method -> "Queued", FrameMargins -> 2.4], 
              ItemBox["", ItemSize -> Fit], 
              GridBox[{{
                 TooltipBox[
                  ButtonBox[
                  "\"Index Field\"", Appearance -> {"AbuttingRight"}, 
                   ButtonFunction :> (Needs["WolframBookTools`"]; 
                    WolframBookTools`WBTInsertIndexField[]), Evaluator -> 
                   Automatic, Method -> "Queued"], 
                  "First put the cursor in a cell to insert a corresponding \
field above to insert index entries.\nList main index entries corresponding \
to the cell separated by commas. Any associated sub-entries\nshould be put \
immediately after in braces.\nExample: programming{functional, rule based}, \
function, relation, lists{flat, nested}\n If $Language is \"ChineseSimplified\
\", \"ChineseTraditional\", \"Japanese\", \"Korean\" or \"Russian\"\ntwo \
index fields get inserted above a selected cell, the top one for inserting \
entries\nintended for the Englsh index and the bottom for the index in the \
language given by $Language.", TooltipDelay -> 0.3], 
                 TooltipBox[
                  ButtonBox[
                  "\"Toggle\"", Appearance -> {"AbuttingLeft"}, 
                   ButtonFunction :> (CurrentValue[
                    ButtonNotebook[], ScreenStyleEnvironment] = 
                    If[CurrentValue[
                    ButtonNotebook[], ScreenStyleEnvironment] === 
                    "Invisibles", "Working", "Invisibles"]), Evaluator -> 
                   Automatic, Method -> "Queued"], 
                  "Toggles index entry fields.", TooltipDelay -> 0.3]}}, 
               GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "ColumnsIndexed" -> {2 -> 0}, "Rows" -> {{Automatic}}}], 
              InterpretationBox[
               StyleBox[
                
                GraphicsBox[{}, BaselinePosition -> Baseline, 
                 ImageSize -> {4, 0}], CacheGraphics -> False], 
               Spacer[4]]}}]], "DockedCell", 
          CellFrameMargins -> {{0, 0}, {8, 8}}]}, CreateCellID -> True, 
       TrackCellChangeTimes -> False, ShowPredictiveInterface -> False, 
       AutoStyleOptions -> {
        "UndefinedSymbolStyle" -> 
         None}, $CellContext`GhostCellInEmptyNotebook -> False], 
      Cell[
       StyleData[All, "Printout"], PageWidth :> 700, 
       PrintingOptions -> {"PageSize" -> {504, 720}}, 
       AutoStyleOptions -> {"UndefinedSymbolStyle" -> None}, Magnification -> 
       0.6], 
      Cell[
       StyleData[All, "Invisibles"], CellInsertionPointCell -> 
       FEPrivate`FrontEndResource["FEExpressions", "CellInsertionMenu"], 
       DockedCells -> {
         Cell[
          BoxData[
           GridBox[{{
              InterpretationBox[
               StyleBox[
                
                GraphicsBox[{}, BaselinePosition -> Baseline, 
                 ImageSize -> {4, 0}], CacheGraphics -> False], 
               Spacer[4]], 
              ActionMenuBox[
              "\"Insert\"", {
               "\"Subsection\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToSubsectionStyle[]), 
                "\"Subsubsection\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToSubsubsectionStyle[]), 
                "\"Subsubsubsection\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToSubsubsubsectionStyle[]), 
                Delimiter, 
                "\"Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToTextStyle[]), "\"CodeText\"" :> 
                Module[{$CellContext`bn = ButtonNotebook[]}, 
                  If[Developer`CellInformation[$CellContext`bn] =!= $Failed, 
                    While[
                    FreeQ[
                    Developer`CellInformation[$CellContext`bn], 
                    "CellBracket"], 
                    FrontEndExecute[
                    
                    FrontEnd`SelectionMove[$CellContext`bn, All, Cell, 
                    AutoScroll -> False]]]; 
                    SelectionMove[$CellContext`bn, After, Cell]]; 
                  NotebookWrite[$CellContext`bn, 
                    Cell["XXXX", "CodeText"], All]; 
                  SelectionMove[$CellContext`bn, All, CellContents]], 
                "\"Hyperlink\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTGenerateHyperlinkDialog[]), 
                "\"Display Formula\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertDisplayFormulaCell[]), Delimiter, 
                "\"Solved Example\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`\
WBTInsertSolvedExampleAndSolvedExampleNoteCells[]), 
                "\"Solved Example Input\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolvedExampleInputCell[]), 
                "\"Solved Example Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolvedExampleNoteCell[]), 
                "\"Solved Example Display Formula\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolvedExampleDisplayFormulaCell[]),
                 "\"Solved Example Display Formula Numbered\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`\
WBTInsertSolvedExampleDisplayFormulaNumberedCell[]), Delimiter, 
                "\"Theorem\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTheoremCell[]), 
                "\"Theorem Numbered\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTheoremNumberedCell[]), 
                "\"Theorem Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTheoremTextCell[]), 
                "\"Proof/Theorem Display Formula\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertProofTheoremDisplayCell[]), 
                "\"Proof/Theorem Display Formula Numbered\"" :> (
                 Needs["WolframBookTools`"]; 
                 WolframBookTools`\
WBTInsertProofTheoremDisplayFormulaNumberedCell[]), 
                "\"Proof\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertProofCell[]), 
                "\"Proof Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertProofTextCell[]), Delimiter, 
                "\"Vocabulary 2Col\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertVocabularySectionAnd2ColTable[]), 
                "\"Vocabulary 3Col\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertVocabularySectionAnd3ColTable[]), 
                "\"Add Row\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow[]), 
                "\"Remove Row\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow["RemoveRow" -> True]), 
                "\"Apply Divider\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow["AddDivider" -> True]), 
                "\"Remove Divider\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTVocabTableAddRow[
                  "RemoveDivider" -> True]), Delimiter, 
                "\"Exercises\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseSection[]), 
                "\"Exercise\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseSection[]), 
                "\"Exercise Note\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseNote[]), 
                "\"Solution Section\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertExerciseSolution[]), 
                "\"Solution Text\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertSolutionAnswer[]), Delimiter, 
                "\"Q&A | Tech Notes | More\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertQAndATechNotesMore[]), 
                "\"Question\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertQuestion[]), 
                "\"Answer\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertAnswer[]), 
                "\"Tech Note\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertTechNote[]), 
                "\"More to Explore\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertMoreExplore[]), Delimiter, 
                "\"References Section\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTInsertReferencesSection[]), 
                "\"Add Reference\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTAddReferenceCell[]), Delimiter, 
                "\"Comment\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyComment[])}, Appearance -> 
               "PopupMenu", FrameMargins -> 2.4], 
              ItemBox["", ItemSize -> Fit], 
              ActionMenuBox[
              "\"Function Name\"", {
               "\"Link\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTMakeSymbolLink[]), 
                "\"Format\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTFormatSymbol[])}, Appearance -> 
               "PopupMenu", Method -> "Queued", FrameMargins -> 2.4], 
              ButtonBox[
              "\"Resource Function Link\"", 
               ButtonFunction :> (Needs["WolframBookTools`"]; 
                WolframBookTools`WBTResourceFunctionLink[]), Evaluator -> 
               Automatic, Appearance -> "DialogBox", Method -> "Queued"], 
              ActionMenuBox[
              "\"Inline Format\"", {
               "\"Inline Code\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTConvertToInlineCode[]), 
                "\"Traditional Math\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTTraditionalFormCell[])}, Appearance -> 
               "PopupMenu", Method -> "Queued", FrameMargins -> 2.4], 
              ActionMenuBox[
              "\"Mark Cells\"", {
               "\"Tentative\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyTentative[]), Delimiter, 
                "\"Print Only\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyPrintOnly[]), 
                "\"Web Only\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyWebOnly[]), Delimiter, 
                "\"Locked\"" :> (Needs["WolframBookTools`"]; 
                 WolframBookTools`WBTApplyLock[])}, Method -> "Queued", 
               FrameMargins -> 2.4], 
              ItemBox["", ItemSize -> Fit], 
              GridBox[{{
                 TooltipBox[
                  ButtonBox[
                  "\"Index Field\"", Appearance -> {"AbuttingRight"}, 
                   ButtonFunction :> (Needs["WolframBookTools`"]; 
                    WolframBookTools`WBTInsertIndexField[]), Evaluator -> 
                   Automatic, Method -> "Queued"], 
                  "First put the cursor in a cell to insert a corresponding \
field above to insert index entries.\nList main index entries corresponding \
to the cell separated by commas. Any associated sub-entries\nshould be put \
immediately after in braces.\nExample: programming{functional, rule based}, \
function, relation, lists{flat, nested}\n If $Language is \"ChineseSimplified\
\", \"ChineseTraditional\", \"Japanese\", \"Korean\" or \"Russian\"\ntwo \
index fields get inserted above a selected cell, the top one for inserting \
entries\nintended for the Englsh index and the bottom for the index in the \
language given by $Language.", TooltipDelay -> 0.3], 
                 TooltipBox[
                  ButtonBox[
                  "\"Toggle\"", Appearance -> {"AbuttingLeft"}, 
                   ButtonFunction :> (CurrentValue[
                    ButtonNotebook[], ScreenStyleEnvironment] = 
                    If[CurrentValue[
                    ButtonNotebook[], ScreenStyleEnvironment] === 
                    "Invisibles", "Working", "Invisibles"]), Evaluator -> 
                   Automatic, Method -> "Queued"], 
                  "Toggles index entry fields.", TooltipDelay -> 0.3]}}, 
               GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "ColumnsIndexed" -> {2 -> 0}, "Rows" -> {{Automatic}}}], 
              InterpretationBox[
               StyleBox[
                
                GraphicsBox[{}, BaselinePosition -> Baseline, 
                 ImageSize -> {4, 0}], CacheGraphics -> False], 
               Spacer[4]]}}]], "DockedCell", 
          CellFrameMargins -> {{0, 0}, {8, 8}}]}, CreateCellID -> True, 
       TrackCellChangeTimes -> False, ShowPredictiveInterface -> False, 
       AutoStyleOptions -> {
        "UndefinedSymbolStyle" -> 
         None}, $CellContext`GhostCellInEmptyNotebook -> False]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell["Styles for Headers and Footers", "Section"], 
      Cell[
       StyleData["Header"], 
       PrintingOptions -> {"PageHeaderMargins" -> {28, 28}}, StyleMenuListing -> 
       None, FontFamily -> "Source Sans Pro", FontSize -> 8, FontWeight -> 
       "Regular", FontSlant -> "Plain", 
       PrivateFontOptions -> {"FontPostScriptName" -> "Automatic"}, FontColor -> 
       GrayLevel[0.45]], 
      Cell[
       StyleData["PageNumber"], CellMargins -> {{0, 0}, {4, 1}}, 
       StyleMenuListing -> None, FontFamily -> "Source Sans Pro", FontSize -> 
       8, FontWeight -> "Bold", FontSlant -> "Plain", 
       PrivateFontOptions -> {"FontPostScriptName" -> "Automatic"}, FontColor -> 
       GrayLevel[0]]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
      "Custom Styles", "Section", 
       CellChangeTimes -> {{3.646611660445352*^9, 3.646611669493331*^9}}], 
      Cell[
       StyleData["Notebook"], WindowToolbars -> {}, PageWidth :> WindowWidth, 
       PrintingOptions -> {
        "FirstPageHeader" -> True, "InnerOuterMargins" -> {30, 30}, 
         "PaperOrientation" -> "Portrait", "PaperSize" -> {504, 720}, 
         "PrintingMargins" -> {{20, 20}, {54, 54}}}, CellLabelAutoDelete -> 
       False, ShowSyntaxStyles -> True, 
       LightDarkAutoColorRules -> <|"AllColors" -> True|>, MenuSortingValue -> 
       None, GraphicsBoxOptions -> {ImageSize -> 240}, 
       Graphics3DBoxOptions -> {ImageSize -> 240}], 
      Cell[
       StyleData["TOCPage"], CellSize -> {40, Inherited}, TextAlignment -> 
       Right, MenuSortingValue -> 20010, StyleMenuListing -> None, FontFamily -> 
       "Source Sans Pro", FontSize -> 18, FontWeight -> "Plain"], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ContentsTitle"], CellMargins -> {{66, 66}, {4, 14}}, 
          MenuSortingValue -> 20000, FontFamily -> "Helvetica", FontSize -> 
          36, FontWeight -> "Bold", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["ContentsTitle", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TOCTitle"], CellMargins -> {{66, 66}, {4, 14}}, 
          CellGroupingRules -> {"SectionGrouping", 70}, TabSpacings -> 36, 
          CounterIncrements -> "TOCTitle", MenuSortingValue -> 20020, 
          FontFamily -> "Source Sans Pro", FontSize -> 18, FontWeight -> 
          "Bold", FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["TOCTitle", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TOCSection"], CellMargins -> {{95, 95}, {1, 1}}, 
          CellGroupingRules -> {"SectionGrouping", 75}, TabSpacings -> 34, 
          CounterIncrements -> "TOCSection", MenuSortingValue -> 20030, 
          FontFamily -> "Source Sans Pro", FontSize -> 16], 
         Cell[
          StyleData["TOCSection", "Printout"]]}, Closed]], 
      Cell[
       StyleData["Leader"], TabFilling -> ".", MenuSortingValue -> 10000, 
       StyleMenuListing -> None, FontFamily -> "Source Sans Pro", FontSize -> 
       18, FontWeight -> "Plain"], 
      Cell[
       StyleData["LeaderNoDots"], TabFilling -> " ", MenuSortingValue -> 
       10000, StyleMenuListing -> None, FontFamily -> "Source Sans Pro", 
       FontSize -> 18, FontWeight -> "Plain"], 
      Cell[
       StyleData["PageLink"], MenuSortingValue -> 10000, StyleMenuListing -> 
       None, ButtonStyleMenuListing -> Automatic, FontFamily -> 
       "Source Sans Pro", FontSize -> 18, FontColor -> 
       RGBColor[0.269993, 0.308507, 0.6], 
       ButtonBoxOptions -> {
        Active -> True, Appearance -> {Automatic, None}, 
         ButtonFunction :> (FrontEndExecute[{
            FrontEnd`NotebookLocate[#2]}]& )}], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Title"], CellMargins -> {{64, Inherited}, {50, 72}}, 
          MenuCommandKey :> None, FontFamily -> "Verdana", FontSize -> 42, 
          FontWeight -> "Bold", FontColor -> GrayLevel[0.4]], 
         Cell[
          StyleData["Title", "Printout"], 
          CellMargins -> {{64, Inherited}, {50, 72}}]}, Closed]], 
      Cell[
       StyleData["Chapter"], MenuCommandKey :> None], 
      Cell[
       StyleData["Subchapter"], MenuCommandKey :> None], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Section"], CellFrame -> {{0, 0}, {0, 0}}, 
          CellMargins -> {{64, Inherited}, {12, 64}}, 
          CellGroupingRules -> {"SectionGrouping", 30}, PageBreakAbove -> 
          True, ShowCellLabel -> False, 
          CellFrameLabelMargins -> {{2, Inherited}, {Inherited, Inherited}}, 
          CellChangeTimes -> {3.652728456208679*^9, 3.652728527108994*^9}, 
          CounterIncrements -> "Section", 
          CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}, {
            "Exercise", 0}}, FontFamily -> "Source Sans Pro Semibold", 
          FontSize -> 26, FontSlant -> "Plain", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          InterpretationBoxOptions -> {Editable -> True}], 
         Cell[
          StyleData["Section", "Printout"], 
          CellMargins -> {{62, 4}, {52, 182}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SectionSingleDigit"], CellFrame -> {{0, 0}, {0, 0}}, 
          CellDingbat -> Cell[
            TextData[
             CounterBox["Section"], 
             StyleBox[
             "|\[NegativeThinSpace]\[VeryThinSpace]", FontColor -> 
              RGBColor[
               0.9019607843137255, 0.4117647058823529, 0.027450980392156862`],
               FontFamily -> "Courier", FontSize -> 36, FontWeight -> Plain]],
             "SectionNumber"], CellMargins -> {{100, 100}, {12, 64}}, 
          Evaluatable -> True, CellGroupingRules -> {"SectionGrouping", 60}, 
          PageBreakAbove -> True, ShowCellLabel -> False, 
          CellFrameLabelMargins -> {{2, Inherited}, {Inherited, Inherited}}, 
          CellChangeTimes -> {3.652728456208679*^9, 3.652728527108994*^9}, 
          CounterIncrements -> "Section", 
          CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}, {
            "Exercise", 0}}, FontFamily -> "Source Sans Pro Semibold", 
          FontSize -> 26, FontSlant -> "Plain", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          InterpretationBoxOptions -> {Editable -> True}], 
         Cell[
          StyleData["SectionSingleDigit", "Printout"], 
          CellMargins -> {{100, Inherited}, {12, 2}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SectionDoubleDigit"], CellFrame -> {{0, 0}, {0, 0}}, 
          CellDingbat -> Cell[
            TextData[
             CounterBox["Section"], 
             StyleBox[
             "|\[NegativeThinSpace]\[VeryThinSpace]", FontColor -> 
              RGBColor[
               0.9019607843137255, 0.4117647058823529, 0.027450980392156862`],
               FontFamily -> "Courier", FontSize -> 36, FontWeight -> Plain]],
             "SectionNumber"], CellMargins -> {{112, Inherited}, {12, 64}}, 
          Evaluatable -> True, CellGroupingRules -> {"SectionGrouping", 60}, 
          PageBreakAbove -> True, ShowCellLabel -> False, 
          CellFrameLabelMargins -> {{2, Inherited}, {Inherited, Inherited}}, 
          CellChangeTimes -> {3.652728456208679*^9, 3.652728527108994*^9}, 
          CounterIncrements -> "Section", 
          CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}, {
            "Exercise", 0}}, FontFamily -> "Source Sans Pro Semibold", 
          FontSize -> 26, FontSlant -> "Plain", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          InterpretationBoxOptions -> {Editable -> True}], 
         Cell[
          StyleData["SectionDoubleDigit", "Printout"], 
          CellMargins -> {{112, Inherited}, {12, 2}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SectionNumber"], CellBaseline -> Baseline, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 26, FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["SectionNumber", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SectionBar"], FontFamily -> "Source Sans Pro", 
          FontWeight -> "Plain", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["SectionBar", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SectionInline"], FontFamily -> 
          "Source Sans Pro Semibold", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["SectionInline", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SectionNoDingbat"], 
          CellMargins -> {{64, Inherited}, {12, 64}}, Evaluatable -> True, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakAbove -> 
          True, ShowCellLabel -> False, 
          CellFrameLabelMargins -> {{2, Inherited}, {Inherited, Inherited}}, 
          CellChangeTimes -> {3.652728456208679*^9, 3.652728527108994*^9}, 
          CounterIncrements -> "Section", 
          CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}, {
            "Exercise", 0}}, FontFamily -> "Source Sans Pro Semibold", 
          FontSize -> 26, FontSlant -> "Plain", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          InterpretationBoxOptions -> {Editable -> True}], 
         Cell[
          StyleData["SectionNoDingbat", "Printout"], 
          CellMargins -> {{64, Inherited}, {12, 2}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SubsectionNumbered"], CellDingbat -> Cell[
            TextData[{"  ", 
              CounterBox["Section"], ".", 
              CounterBox["Subsection"]}], "SubsectionNumber", FontColor -> 
            RGBColor[
             0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
          CellMargins -> {{98, Inherited}, {Inherited, 32}}, 
          CounterIncrements -> "Subsection", FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 18, FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["SubsectionNumbered", "Printout"], 
          CellMargins -> {{102, Inherited}, {12, 32}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SubsectionNumber"], FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 18, FontColor -> 
          GrayLevel[0.25]], 
         Cell[
          StyleData["SubsectionNumber", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SubsectionFirst"], 
          CellMargins -> {{64, Inherited}, {2, 72}}, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 18, FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["Subsection", "Printout"], 
          CellMargins -> {{64, Inherited}, {12, 32}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Subsection"], CellMargins -> {{64, Inherited}, {2, 32}}, 
          FontFamily -> "Source Sans Pro Semibold", FontSize -> 18, FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["Subsection", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Subsubsection"], 
          CellMargins -> {{64, Inherited}, {2, 32}}, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 16, FontSlant -> "Italic", 
          FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["Subsubsection", "Printout"], 
          CellMargins -> {{64, Inherited}, {6, 14}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SubsubsectionTopMargin"], 
          CellMargins -> {{64, Inherited}, {2, 14}}, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 16, FontSlant -> "Italic", 
          FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["SubsubsectionTopMargin", "Printout"], 
          CellMargins -> {{64, Inherited}, {6, 14}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Subsubsubsection"], 
          CellMargins -> {{64, Inherited}, {2, 32}}, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 15, FontSlant -> "Plain", 
          FontColor -> GrayLevel[0.45]], 
         Cell[
          StyleData["Subsubsubsection", "Printout"], 
          CellMargins -> {{64, Inherited}, {6, 14}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Subsubsubsubsection"], 
          CellMargins -> {{66, 66}, {2, 10}}, 
          StyleKeyMapping -> {
           "Backspace" -> 
            "Subsubsubsection", $CellContext`KeyEvent[
             "Tab", $CellContext`Modifiers -> {"Shift"}] -> 
            "Subsubsubsection"}, CellGroupingRules -> {"SectionGrouping", 70},
           PageBreakBelow -> False, LanguageCategory -> "NaturalLanguage", 
          CounterIncrements -> "Subsubsubsubsection", 
          CounterAssignments -> {{"Item", 0}, {"Subitem", 0}, {
            "Subsubitem", 0}, {"ItemNumbered", 0}, {"SubitemNumbered", 0}, {
            "SubsubitemNumbered", 0}}, MenuSortingValue -> None, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 15, FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["Subsubsubsubsection", "Printout"], 
          CellMargins -> {{66, 66}, {2, 10}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ResourcesSubsection"], 
          CellMargins -> {{64, Inherited}, {4, 16}}, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 15, FontSlant -> "Plain", 
          FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["ResourcesSubsection", "Printout"], 
          CellMargins -> {{64, Inherited}, {4, 16}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["VocabularySection"], CellFrame -> {{0, 0}, {0, 3}}, 
          CellMargins -> {{64, Inherited}, {8, 30}}, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> 
          False, CellFrameMargins -> {{8, 8}, {4, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], FontFamily -> 
          "Source Sans Pro", FontSize -> 18, FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GridBoxOptions -> {GridBoxAlignment -> {}}], 
         Cell[
          StyleData["VocabularySection", "Printout"], 
          CellMargins -> {{64, Inherited}, {8, 24}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["VocabularySubsection"], 
          CellMargins -> {{64, Inherited}, {2, 10}}, FontFamily -> 
          "Source Sans Pro", FontSize -> 16, FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["VocabularySubsubsection", "Printout"], 
          CellMargins -> {{64, Inherited}, {6, 14}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["VocabularySubsectionSM"], 
          CellFrame -> {{0, 0}, {0.75, 0}}, 
          CellMargins -> {{64, Inherited}, {5, 15}}, 
          CellFrameMargins -> {{8, 8}, {5, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], FontFamily -> 
          "Source Sans Pro", FontSize -> 14, FontWeight -> "Bold", FontSlant -> 
          "Regular", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["VocabularySubsubsectionSM", "Printout"], 
          CellMargins -> {{64, Inherited}, {6, 15}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["VocabularyTable", StyleDefinitions -> StyleData["Text"]],
           SpanMaxSize -> 1, FontFamily -> "Source Sans Pro Light", FontColor -> 
          GrayLevel[0.8], 
          GridBoxOptions -> {
           GridBoxAlignment -> {"Columns" -> {{Left}}}, 
            GridBoxDividers -> {"Columns" -> {{False}}, "Rows" -> {False, {
                 Directive[
                  Thickness[0.5], "VocabDivColor"]}, False}}, 
            GridBoxItemStyle -> {
             "Columns" -> {"VocabularyCode", Inherited, Inherited}, 
              "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {
             "Columns" -> {{0, 1, 2, 1, 2}}, "Rows" -> {{1}}}}], 
         Cell[
          StyleData["VocabularyTable", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "VocabularyTable3Column", StyleDefinitions -> StyleData["Text"]], 
          SpanMaxSize -> 1, FontFamily -> "Source Sans Pro Light", FontColor -> 
          GrayLevel[0.8], 
          GridBoxOptions -> {
           GridBoxAlignment -> {"Columns" -> {{Left}}}, 
            GridBoxDividers -> {"Columns" -> {{False}}, "Rows" -> {False, {
                 Directive[
                  Thickness[0.5], "VocabDivColor"]}, False}}, 
            GridBoxItemStyle -> {
             "Columns" -> {
               "VocabularyCode", Inherited, "VocabularyCode", Inherited, 
                Inherited}, "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {
             "Columns" -> {{0, 1, 2, 1, 2}}, "Rows" -> {{1}}}}], 
         Cell[
          StyleData["VocabularyTable3Column", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["VocabularyText"], FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["VocabularyText", "Printout"], 
          CellMargins -> {{66, 10}, {7, 7}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["VocabularyCode", StyleDefinitions -> StyleData["Text"]], 
          Deletable -> False, FontFamily -> "Source Sans Pro", FontSize -> 14,
           FontWeight -> "Bold", FontColor -> GrayLevel[0.25], 
          GridBoxOptions -> {
           GridBoxAlignment -> {"Columns" -> {{Left}}}, 
            GridBoxDividers -> {
             "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
              "Rows" -> {True, {True}, True}, "RowsIndexed" -> {}}}], 
         Cell[
          StyleData["VocabularyCode", "Printout"], FontColor -> 
          GrayLevel[0.25]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["GrayPointSix"], FontColor -> GrayLevel[0.6]], 
         Cell[
          StyleData["GrayPointSix", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["VocabDivColor"], FontColor -> GrayLevel[0.8]], 
         Cell[
          StyleData["VocabDivColor", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SummarySection"], Editable -> True, PageWidth :> 
          WindowWidth, CellFrame -> {{0, 0}, {0, 3}}, 
          CellMargins -> {{64, Inherited}, {8, 30}}, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakAbove -> 
          True, CellFrameMargins -> {{8, 8}, {4, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], MenuSortingValue -> 9000, 
          FontFamily -> "Source Sans Pro", FontSize -> 18, FontSlant -> 
          "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GridBoxOptions -> {GridBoxAlignment -> {}}], 
         Cell[
          StyleData["SummarySection", "Printout"], 
          CellMargins -> {{64, 64}, {8, 30}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SummaryNote"], PageWidth :> WindowWidth, 
          CellMargins -> {{64, 64}, {4, 8}}, ReturnCreatesNewCell -> True, 
          PageBreakBelow -> False, MenuSortingValue -> 9010, FontFamily -> 
          "Source Sans Pro", FontSize -> 14, FontWeight -> "Plain", FontSlant -> 
          "Plain", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["SummaryNote", "Printout"], 
          CellMargins -> {{68, 68}, {4, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SummaryList"], PageWidth :> WindowWidth, CellDingbat -> 
          Cell[
            TextData[{"\[FilledSmallSquare]"}], FontSize -> 12, FontColor -> 
            GrayLevel[0.5]], CellMargins -> {{78, 78}, {4, 8}}, 
          ReturnCreatesNewCell -> True, CellFrameLabelMargins -> 3, 
          LineSpacing -> {1.25, 1., 2.}, MenuSortingValue -> 9020, FontFamily -> 
          "Source Sans Pro", FontSize -> 14, FontWeight -> "Plain", FontSlant -> 
          "Plain", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["SummaryList", "Printout"], 
          CellMargins -> {{82, 82}, {4, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseSection"], CellFrame -> {{0, 0}, {0, 3}}, 
          CellMargins -> {{64, Inherited}, {8, 30}}, Evaluatable -> True, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> 
          False, ShowCellLabel -> False, CellFrameMargins -> {{8, 8}, {4, 6}},
           CellFrameColor -> RGBColor[0.901961, 0.411765, 0.027451], 
          CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}, {
            "Exercise", 0}}, FontFamily -> "Source Sans Pro", FontSize -> 18, 
          FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GridBoxOptions -> {GridBoxAlignment -> {}}], 
         Cell[
          StyleData["ExerciseSection", "Printout"], 
          CellMargins -> {{64, Inherited}, {8, 30}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseSubsection"], PageWidth :> 500, 
          CellFrame -> {{False, False}, {1, False}}, 
          CellMargins -> {{64, Inherited}, {8, 18}}, 
          CellGroupingRules -> {"SectionGrouping", 61}, CellFrameColor -> 
          RGBColor[0.65, 0.6, 0.6], FontFamily -> "Source Sans Pro", FontSize -> 
          18, FontSlant -> "Italic", FontColor -> RGBColor[0.65, 0.6, 0.6]], 
         Cell[
          StyleData["ExerciseSubsection", "Printout"], 
          CellFrame -> {{False, False}, {1, False}}, CellFrameColor -> 
          RGBColor[0.65, 0.6, 0.6]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseSubsectionSM"], 
          CellMargins -> {{64, Inherited}, {4, 12}}, 
          CellGroupingRules -> {"SectionGrouping", 61}, FontFamily -> 
          "Source Sans Pro Semibold", FontSize -> 15, FontSlant -> "Plain", 
          FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["ExerciseSubsectionSM", "Printout"], 
          CellMargins -> {{64, Inherited}, {4, 12}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Exercise"], CellDingbat -> Cell[
            TextData[{"  ", 
              CounterBox["Section"], ".", 
              CounterBox["Exercise"]}], "ExerciseNumber", FontColor -> 
            RGBColor[
             0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
          ShowGroupOpener -> False, CellMargins -> {{106, Inherited}, {4, 8}},
           CellGroupingRules -> {"SectionGrouping", 62}, DefaultNewCellStyle -> 
          "ExerciseInput", CounterIncrements -> "Exercise", MenuSortingValue -> 
          10020, MenuCommandKey :> "2", FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["Exercise", "Printout"], ShowGroupOpener -> False, 
          CellMargins -> {{108, Inherited}, {4, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseNumber"], FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Bold", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["ExerciseNumber", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseSectionNote"], 
          CellMargins -> {{64, Inherited}, {4, 8}}, ReturnCreatesNewCell -> 
          True, CellGroupingRules -> {"SectionGrouping", 62.}, PageBreakBelow -> 
          False, LineSpacing -> {1., 1., 2.}, MenuSortingValue -> 10050, 
          FontFamily -> "Source Sans Pro", FontSize -> 14, FontWeight -> 
          "Plain", FontSlant -> "Plain", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["ExerciseSectionNote", "Printout"], 
          CellMargins -> {{64, Inherited}, {4, 8}}, 
          LineSpacing -> {0.8, 1., 2.}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseNote"], 
          CellMargins -> {{106, Inherited}, {4, 8}}, ReturnCreatesNewCell -> 
          True, CellGroupingRules -> {"SectionGrouping", 62.}, PageBreakBelow -> 
          False, LineSpacing -> {1., 1., 2.}, MenuSortingValue -> 10050, 
          FontFamily -> "Source Sans Pro", FontSize -> 14, FontWeight -> 
          "Plain", FontSlant -> "Plain", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["ExerciseNote", "Printout"], 
          LineSpacing -> {0.8, 1., 2.}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseSolution"], 
          CellMargins -> {{106, Inherited}, {4, 8}}, ReturnCreatesNewCell -> 
          True, CellGroupingRules -> {"SectionGrouping", 62.}, PageBreakBelow -> 
          False, CellChangeTimes -> {3.938884624675207*^9}, 
          LineSpacing -> {1., 1., 2.}, LineColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          FrontFaceColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          BackFaceColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GraphicsColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          MenuSortingValue -> 10050, FontFamily -> "Source Sans Pro Semibold",
           FontSize -> 14, FontSlant -> "Plain", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["ExerciseSolution", "Printout"], 
          CellMargins -> {{106, Inherited}, {4, 8}}, 
          LineSpacing -> {0.8, 1., 2.}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SolutionAnswer"], CellMargins -> {{106, 10}, {4, 1}}, 
          ReturnCreatesNewCell -> True, LineSpacing -> {1.125, 1., 2.}, 
          MenuSortingValue -> 10032, FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> 
          GrayLevel[0.25], $CellContext`DefaultReturnCreatedCellStyle -> 
          "Question"], 
         Cell[
          StyleData["SolutionAnswer", "Printout"], 
          CellMargins -> {{106, 10}, {4, 1}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SolutionItem"], CellDingbat -> Cell[
            TextData[{
              CounterBox["ItemNumbered"], ")"}], FontSize -> 14, FontWeight -> 
            "Regular", FontColor -> GrayLevel[0.25]], 
          CellMargins -> {{122, Inherited}, {2, 4}}, ReturnCreatesNewCell -> 
          True, CellFrameLabelMargins -> 4, LineSpacing -> {1.25, 1., 2.}, 
          CounterIncrements -> "ItemNumbered", MenuSortingValue -> 10040, 
          FontFamily -> "Source Sans Pro", FontSize -> 14, FontWeight -> 
          "Plain", FontSlant -> "Plain", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["SolutionItem", "Printout"], 
          CellMargins -> {{106, Inherited}, {2, 4}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["QASection"], CellFrame -> {{0, 0}, {0, 3}}, 
          CellMargins -> {{64, Inherited}, {8, 30}}, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> 
          False, CellFrameMargins -> {{8, 8}, {4, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], 
          CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}, {
            "Question", 0}}, FontFamily -> "Source Sans Pro", FontSize -> 18, 
          FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GridBoxOptions -> {GridBoxAlignment -> {}}], 
         Cell[
          StyleData["QASection", "Printout"], 
          CellMargins -> {{64, Inherited}, {8, 30}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Question"], CellMargins -> {{64, Inherited}, {2, 12}}, 
          ReturnCreatesNewCell -> True, PageBreakBelow -> False, 
          CounterIncrements -> "Question", MenuSortingValue -> 10030, 
          MenuCommandKey :> "3", FontFamily -> "Source Sans Pro", FontSize -> 
          14, FontWeight -> "Bold", FontSlant -> 
          "Plain", $CellContext`DefaultReturnCreatedCellStyle -> "Answer"], 
         Cell[
          StyleData["Question", "Printout"], 
          CellMargins -> {{65, Inherited}, {2, 12}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Answer"], CellMargins -> {{66, 10}, {4, 1}}, 
          ReturnCreatesNewCell -> True, LineSpacing -> {1.125, 1., 2.}, 
          MenuSortingValue -> 10032, FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> 
          GrayLevel[0.25], $CellContext`DefaultReturnCreatedCellStyle -> 
          "Question"], 
         Cell[
          StyleData["Answer", "Printout"], 
          CellMargins -> {{66, 10}, {4, 1}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["QuestionNumber"], FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Bold", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["QuestionNumber", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TechNoteSection"], CellFrame -> {{0, 0}, {0, 3}}, 
          CellMargins -> {{64, Inherited}, {8, 30}}, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> 
          False, CellFrameMargins -> {{8, 8}, {4, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], FontFamily -> 
          "Source Sans Pro", FontSize -> 18, FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GridBoxOptions -> {GridBoxAlignment -> {}}], 
         Cell[
          StyleData["TechNoteSection", "Printout"], 
          CellMargins -> {{64, Inherited}, {8, 30}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TechNoteSubsection"], 
          CellMargins -> {{64, Inherited}, {2, 10}}, FontFamily -> 
          "Source Sans Pro", FontSize -> 16, FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
         Cell[
          StyleData["TechNoteSubsubsection", "Printout"], 
          CellMargins -> {{64, Inherited}, {6, 14}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TechNoteItem"], CellDingbat -> Cell[
            TextData[{
              CounterBox["ItemNumbered"], "."}], FontSize -> 12, FontWeight -> 
            Bold, FontColor -> GrayLevel[0.25]], 
          CellMargins -> {{93, Inherited}, {4, 8}}, ReturnCreatesNewCell -> 
          True, CellFrameLabelMargins -> 4, 
          CellChangeTimes -> {{3.651515120816633*^9, 3.651515125814807*^9}, 
            3.6515155174947033`*^9}, LineSpacing -> {1.25, 1., 2.}, 
          CounterIncrements -> "ItemNumbered", MenuSortingValue -> 10040, 
          FontFamily -> "Source Sans Pro", FontSize -> 14, FontWeight -> 
          "Plain", FontSlant -> "Plain", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["TechNoteItem", "Printout"], 
          CellMargins -> {{93, Inherited}, {4, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TechNoteNoDingbat"], 
          CellMargins -> {{82, Inherited}, {4, 8}}, ReturnCreatesNewCell -> 
          True, CellFrameLabelMargins -> 4, LineSpacing -> {1.25, 1., 2.}, 
          MenuSortingValue -> 10040, FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["TechNote", "Printout"], 
          CellMargins -> {{82, Inherited}, {4, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TechNote"], CellDingbat -> Cell[
            TextData[{"\[FilledSquare]"}], FontSize -> 12, FontColor -> 
            GrayLevel[0.5]], CellMargins -> {{78, Inherited}, {4, 8}}, 
          ReturnCreatesNewCell -> True, CellFrameLabelMargins -> 4, 
          LineSpacing -> {1.25, 1., 2.}, MenuSortingValue -> 10040, 
          FontFamily -> "Source Sans Pro", FontSize -> 14, FontWeight -> 
          "Plain", FontSlant -> "Plain", FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["TechNote", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TechNoteInput", StyleDefinitions -> StyleData["Input"]], 
          CellMargins -> {{99, 10}, {3, 7}}, SpanMaxSize -> 1, FontSize -> 
          14], 
         Cell[
          StyleData["TechNoteInput", "Printout"], 
          CellMargins -> {{99, 10}, {3, 7}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "TechNoteOutput", StyleDefinitions -> StyleData["Output"]], 
          CellMargins -> {{99, 10}, {14, 7}}, FontSize -> 14], 
         Cell[
          StyleData["TechNoteOutput", "Printout"], 
          CellMargins -> {{99, 10}, {14, 7}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["MoreExploreSection"], CellFrame -> {{0, 0}, {0, 3}}, 
          CellMargins -> {{64, Inherited}, {8, 30}}, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> 
          False, CellFrameMargins -> {{8, 8}, {4, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], FontFamily -> 
          "Source Sans Pro", FontSize -> 18, FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GridBoxOptions -> {GridBoxAlignment -> {}}], 
         Cell[
          StyleData["MoreExploreSection", "Printout"], 
          CellMargins -> {{64, Inherited}, {8, 30}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["MoreExplore"], CellMargins -> {{64, Inherited}, {4, 8}}, 
          ReturnCreatesNewCell -> True, PageBreakBelow -> False, 
          MenuSortingValue -> 10050, FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["MoreExplore", "Printout"], 
          CellMargins -> {{64, Inherited}, {4, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["MoreExploreShortURL"], 
          CellMargins -> {{64, Inherited}, {4, 8}}, PageBreakBelow -> False, 
          FontFamily -> "Source Sans Pro Light", FontSize -> 14, FontSlant -> 
          "Plain", FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["MoreExploreShortURL", "Printout"], 
          CellMargins -> {{64, Inherited}, {4, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TakeawaysSection"], CellFrame -> {{1, 1}, {1, 1}}, 
          CellMargins -> {{52, -12}, {-1, 30}}, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> 
          False, CellFrameMargins -> {{16, 8}, {6, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], FontFamily -> 
          "Source Sans Pro", FontSize -> 15, FontWeight -> "Bold", FontSlant -> 
          "Plain", 
          PrivateFontOptions -> {"FontPostScriptName" -> "Automatic"}, 
          FontColor -> GrayLevel[1], Background -> 
          RGBColor[0.901961, 0.411765, 0.027451]], 
         Cell[
          StyleData["TakeawaysSection", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TakeawaysHeader"], 
          CellMargins -> {{64, Inherited}, {5, 15}}, 
          CellFrameMargins -> {{8, 8}, {5, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], FontFamily -> 
          "Source Sans Pro", FontSize -> 15, FontWeight -> "SemiBold", 
          FontSlant -> "Regular", FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["TakeawaysHeader", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TakeawaysTable"], CellFrame -> {{0, 0}, {0, 0}}, 
          CellMargins -> {{52, -12}, {12, -1}}, ReturnCreatesNewCell -> True, 
          CellFrameMargins -> {{18, 12}, {20, 12}}, CellFrameLabelMargins -> 
          6, LineSpacing -> {1.25, 1., 2.}, SpanMaxSize -> 1, FontFamily -> 
          "Source Sans Pro Light", FontColor -> GrayLevel[0.25], Background -> 
          RGBColor[1., 0.9490196078431372, 0.8509803921568627], 
          GridBoxOptions -> {
           GridBoxAlignment -> {"Columns" -> {{Left}}}, 
            GridBoxDividers -> {"Columns" -> {{False}}, "Rows" -> {False}}, 
            GridBoxItemStyle -> {
             "Columns" -> {"TakeawaysDingbat", Inherited}, 
              "Rows" -> {{SpanFromLeft, Automatic}}}, 
            GridBoxSpacings -> {"Columns" -> {{0.5}}, "Rows" -> {{0.75}}}}], 
         Cell[
          StyleData["TakeawaysTable", "Printout"], 
          CellMargins -> {{51.5, -12.5}, {12, 0}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TakeawaysText"], FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["TakeawaysText", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "TakeawaysDingbat", StyleDefinitions -> StyleData["Text"]], 
          FontFamily -> "Source Sans Pro", FontSize -> 10, FontWeight -> 
          "SemiBold", FontColor -> RGBColor[0.901961, 0.411765, 0.027451], 
          GridBoxOptions -> {
           GridBoxAlignment -> {"Columns" -> {{Left}}}, 
            GridBoxDividers -> {
             "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
              "Rows" -> {True, {True}, True}, "RowsIndexed" -> {}}}], 
         Cell[
          StyleData["TakeawaysDingbat", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["CodeText", StyleDefinitions -> StyleData["Text"]], 
          CellMargins -> {{66, 10}, {3, 15}}, LineSpacing -> {1, 1, 1}, 
          MenuSortingValue -> 1540, 
          MenuCommandKey :> $CellContext`MenuKey[
           "7", $CellContext`Modifiers -> {"Shift"}], FontFamily -> 
          "Source Sans Pro", FontSize -> 16, FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["CodeText", "Printout"], 
          CellMargins -> {{66, 10}, {4, 12}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["CodeCaption"], CellFrame -> {{0, 0}, {0, 0}}, 
          CellMargins -> {{66, 10}, {4, 12}}, PageBreakBelow -> False, 
          CellFrameColor -> GrayLevel[0.4], LineSpacing -> {1, 1, 1}, 
          MenuSortingValue -> 10010, MenuCommandKey :> "1", FontFamily -> 
          "Source Sans Pro", FontSize -> 16, FontColor -> GrayLevel[0.25]], 
         Cell[
          StyleData["CodeCaption", "Printout"], 
          CellMargins -> {{66, 10}, {4, 12}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["DisplayFormula"], CellMargins -> {{99, 15}, {2, 12}}, 
          StripStyleOnPaste -> True, DefaultFormatType -> 
          DefaultInputFormatType, 
          HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"},
           LanguageCategory -> "Formula", ScriptLevel -> 0, 
          SingleLetterItalics -> True, MenuSortingValue -> 1700, FontFamily -> 
          "Baskerville", FontSize -> 16, FontWeight -> "Regular", FontSlant -> 
          "Plain", 
          PrivateFontOptions -> {"FontPostScriptName" -> "Automatic"}, 
          FontColor -> GrayLevel[0.2], 
          UnderoverscriptBoxOptions -> {LimitsPositioning -> True}], 
         Cell[
          StyleData["DisplayFormula", "Printout"], 
          CellMargins -> {{99, Inherited}, {Inherited, Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "DisplayFormulaNumbered", StyleDefinitions -> 
           StyleData["DisplayFormula"]], CellFrameLabels -> {{None, 
             Cell[
              TextData[{"(", 
                CounterBox["DisplayFormulaNumbered"], ")"}], 
              "DisplayFormulaEquationNumber", CellSize -> {30, Inherited}]}, {
            None, None}}, 
          CellFrameLabelMargins -> {{Inherited, 6}, {Inherited, Inherited}}, 
          TextAlignment -> Left, CounterIncrements -> 
          "DisplayFormulaNumbered", MenuSortingValue -> 1710, FontFamily -> 
          "Baskerville", FontSize -> 16, FontWeight -> "Regular", FontSlant -> 
          "Plain", 
          PrivateFontOptions -> {"FontPostScriptName" -> "Automatic"}], 
         Cell[
          StyleData["DisplayFormulaNumbered", "Printout"], 
          CellMargins -> {{99, 19}, {Inherited, Inherited}}, 
          CellFrameMargins -> {{Inherited, Inherited}, {
            Inherited, Inherited}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Print"], CellMargins -> {{99, 10}, {4, 4}}, FontSize -> 
          15], 
         Cell[
          StyleData["Print", "Presentation"], 
          CellMargins -> {{100, Inherited}, {1.5 Inherited, 1.5 Inherited}}], 
         
         Cell[
          StyleData["Print", "SlideShow"], 
          CellMargins -> {{
            0.135 FrontEnd`AbsoluteCurrentValue[{WindowSize, 1}], 0.01 
             FrontEnd`AbsoluteCurrentValue[{WindowSize, 1}]}, {8, 15}}, 
          FontSize -> 18], 
         Cell[
          StyleData["Print", "Condensed"], 
          CellMargins -> {{18, Inherited}, {Inherited, Inherited}}], 
         Cell[
          StyleData["Print", "Printout"], 
          CellMargins -> {{49, Inherited}, {Inherited, Inherited}}], 
         Cell[
          StyleData["Print", "PrintoutGray"], 
          CellMargins -> {{49, Inherited}, {Inherited, Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Item"], CellDingbat -> 
          StyleBox[
           "\:203a", Alignment -> Baseline, FontFamily -> Automatic, FontSize -> 
            18, FontWeight -> GrayLevel[0], 
            RGBColor[
            0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
          CellMargins -> {{81, 10}, {4, 8}}, ReturnCreatesNewCell -> True, 
          StyleKeyMapping -> {"Tab" -> "Subitem", "*" -> "Subitem"}, 
          CellGroupingRules -> {"GroupTogetherNestedGrouping", 15000}, 
          CellFrameLabelMargins -> 4, CounterIncrements -> "Item", 
          CounterAssignments -> {{"Subitem", 0}, {"Subsubitem", 0}}, 
          MenuSortingValue -> 1600, FontFamily -> "Source Sans Pro", FontSize -> 
          15], 
         Cell[
          StyleData["Item", "Printout"], CellDingbat -> 
          StyleBox[
           "\:203a", Alignment -> Baseline, FontSize -> 17, FontFamily -> 
            "Automatic", FontWeight -> "Black", 
            RGBColor[
            0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
          CellMargins -> {{80, Inherited}, {Inherited, Inherited}}, 
          CellDingbatMargin -> 2, 
          CellGroupingRules -> {
           "GroupTogetherNestedGrouping", 1.073741821*^9}, 
          CellChangeTimes -> {{3.8855684925344043`*^9, 
           3.885568495926271*^9}, {3.885643888233819*^9, 
           3.885643900721007*^9}}]}, Open]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ItemParagraph"], CellMargins -> {{81, 10}, {4, 1}}, 
          ReturnCreatesNewCell -> True, 
          StyleKeyMapping -> {"Tab" -> "SubitemParagraph"}, 
          CellGroupingRules -> {"GroupTogetherNestedGrouping", 15000}, 
          MenuSortingValue -> 1600, FontFamily -> "Source Sans Pro", FontSize -> 
          15, FontColor -> GrayLevel[0.2]], 
         Cell[
          StyleData["ItemParagraph", "Printout"], 
          CellMargins -> {{80, Inherited}, {Inherited, 0.5 Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ItemNumbered"], CellDingbat -> Cell[
            TextData[{
              CounterBox["ItemNumbered"], "."}], FontWeight -> "Bold"], 
          CellMargins -> {{85, 10}, {4, 8}}, ReturnCreatesNewCell -> True, 
          StyleKeyMapping -> {"Tab" -> "SubitemNumbered"}, 
          CellGroupingRules -> {"GroupTogetherNestedGrouping", 15000}, 
          CellFrameLabelMargins -> 4, CounterIncrements -> "ItemNumbered", 
          CounterAssignments -> {{"SubitemNumbered", 0}, {
            "SubsubitemNumbered", 0}}, MenuSortingValue -> 1630, FontFamily -> 
          "Source Sans Pro", FontSize -> 15], 
         Cell[
          StyleData["ItemNumbered", "Printout"], 
          CellMargins -> {{90, Inherited}, {Inherited, Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Subitem"], CellDingbat -> 
          StyleBox[
           "\:203a", Alignment -> Baseline, FontSize -> 18, FontWeight -> 
            GrayLevel[0], 
            RGBColor[
            0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
          CellMargins -> {{105, 12}, {4, 4}}, ReturnCreatesNewCell -> True, 
          StyleKeyMapping -> {
           "Tab" -> "Subsubitem", "*" -> "Subsubitem", "Backspace" -> 
            "Item", $CellContext`KeyEvent[
             "Tab", $CellContext`Modifiers -> {"Shift"}] -> "Item"}, 
          CellGroupingRules -> {"ItemGrouping", 80}, CellFrameLabelMargins -> 
          4, CounterIncrements -> "Subitem", 
          CounterAssignments -> {{"Subsubitem", 0}}, MenuSortingValue -> 1610,
           FontFamily -> "Source Sans Pro", FontSize -> 14], 
         Cell[
          StyleData["Subitem", "Printout"], CellDingbat -> 
          StyleBox[
           "\:203a", Alignment -> Baseline, FontSize -> 17, FontFamily -> 
            "Automatic", FontWeight -> "Black", 
            RGBColor[
            0.9019607843137255, 0.4117647058823529, 0.027450980392156862`]], 
          CellMargins -> {{105, Inherited}, {Inherited, Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Subsubitem"], CellDingbat -> 
          StyleBox[
           "\:203a", Alignment -> Baseline, FontSize -> 18, FontWeight -> 
            GrayLevel[0], 
            RGBColor[0.6, 0.6, 0.6]], CellMargins -> {{129, 12}, {4, 4}}, 
          ReturnCreatesNewCell -> True, 
          StyleKeyMapping -> {
           "Backspace" -> 
            "Subitem", $CellContext`KeyEvent[
             "Tab", $CellContext`Modifiers -> {"Shift"}] -> "Subitem"}, 
          CellGroupingRules -> {"ItemGrouping", 90}, CellFrameLabelMargins -> 
          4, CounterIncrements -> "Subsubitem", MenuSortingValue -> 1620, 
          FontFamily -> "Source Sans Pro", FontSize -> 13], 
         Cell[
          StyleData["Subsubitem", "Printout"], CellDingbat -> 
          StyleBox[
           "\:203a", Alignment -> Baseline, FontSize -> 18, FontWeight -> 
            GrayLevel[0], 
            GrayLevel[0.65]], 
          CellMargins -> {{129, Inherited}, {Inherited, Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Note"], CellFrame -> {{0, 0}, {0, 1}}, 
          CellMargins -> {{66, 0}, {8, 6}}, ReturnCreatesNewCell -> True, 
          StyleKeyMapping -> {"Tab" -> "SubitemParagraph"}, 
          CellGroupingRules -> {"GroupTogetherNestedGrouping", 15000}, 
          CellFrameMargins -> {{14, 14}, {12, 12}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], 
          LineSpacing -> {1.2, 1., 2.}, MenuSortingValue -> 1600, FontFamily -> 
          "Source Sans Pro", FontSize -> 15, FontColor -> GrayLevel[0.2], 
          Background -> RGBColor[1., 0.9647058823529412, 0.9411764705882353]], 
         Cell[
          StyleData["Note", "Printout"], CellMargins -> {{66, 0}, {10, 8}}, 
          FontSize -> 14]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Echo"], 
          CellMargins -> {{99, Inherited}, {Inherited, Inherited}}], 
         Cell[
          StyleData["Echo", "Printout"], 
          CellMargins -> {{99, Inherited}, {Inherited, Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["EchoTiming"], 
          CellMargins -> {{99, Inherited}, {Inherited, Inherited}}], 
         Cell[
          StyleData["EchoTiming", "Printout"], 
          CellMargins -> {{99, Inherited}, {Inherited, Inherited}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Epigraph"], CellMargins -> {{100, 78}, {6, 24}}, 
          CellFrameLabels -> {{None, None}, {None, None}}, 
          CellFrameLabelMargins -> 8, TextAlignment -> Left, Hyphenation -> 
          True, HyphenationOptions -> {"HyphenationMinLengths" -> {3, 5}}, 
          LineSpacing -> {1, 2}, TabSpacings -> {1.2, 2.5}, FontFamily -> 
          "Source Sans Pro", FontSize -> 18, FontWeight -> "Plain", FontSlant -> 
          "Plain"], 
         Cell[
          StyleData["Epigraph", "Printout", StyleDefinitions -> None]]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["EpigraphAuthor"], CellMargins -> {{125, 100}, {12, 12}}, 
          TextAlignment -> Left, LineSpacing -> {1, 2}, 
          ParagraphIndent -> -17, TabSpacings -> {1.5, 2.5}, FontFamily -> 
          "Source Sans Pro", FontSize -> 16, FontWeight -> "Plain", FontSlant -> 
          "Plain", FontTracking -> -0.05], 
         Cell[
          StyleData["EpigraphAuthor", "Printout", StyleDefinitions -> None]]},
         Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ReferenceSection"], CellFrame -> {{0, 0}, {0, 3}}, 
          CellMargins -> {{64, Inherited}, {8, 30}}, 
          CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> 
          False, CellFrameMargins -> {{8, 8}, {4, 6}}, CellFrameColor -> 
          RGBColor[0.901961, 0.411765, 0.027451], FontFamily -> 
          "Source Sans Pro", FontSize -> 18, FontSlant -> "Italic", FontColor -> 
          RGBColor[
           0.9019607843137255, 0.4117647058823529, 0.027450980392156862`], 
          GridBoxOptions -> {GridBoxAlignment -> {}}], 
         Cell[
          StyleData["ReferenceSection", "Printout"], 
          CellMargins -> {{64, Inherited}, {8, 30}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Reference"], CellDingbat -> Cell[
            TextData[{
              CounterBox["Reference"]}], "SR", FontSize -> 13, 
            CellSize -> {30, Inherited}, TextAlignment -> Right], 
          CellMargins -> {{80, 10}, {3, 4}}, 
          CellFrameLabels -> {{None, None}, {None, None}}, 
          CellFrameLabelMargins -> 8, 
          CellChangeTimes -> {{3.738599543211059*^9, 3.738599549834622*^9}}, 
          LineSpacing -> {1, 2}, ParagraphIndent -> -8, 
          TabSpacings -> {0.7, 2.5}, CounterIncrements -> "Reference", 
          MenuSortingValue -> 1870, FontFamily -> "Source Sans Pro", FontSize -> 
          14, FontWeight -> "Plain", FontSlant -> "Plain"], 
         Cell[
          StyleData["Reference", "Printout", StyleDefinitions -> None], 
          CellMargins -> {{66, 10}, {3, 4}}, TabSpacings -> {1.2, 2.5}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["TextFirst"], CellMargins -> {{66, 10}, {4, 72}}, 
          ReturnCreatesNewCell -> True, FontFamily -> "Baskerville", FontSize -> 
          18, FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["Text", "Printout"], CellMargins -> {{66, 10}, {7, 7}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Text"], CellMargins -> {{66, 10}, {4, 12}}, 
          ReturnCreatesNewCell -> True, 
          CellChangeTimes -> {{3.968834509197134*^9, 3.968834509700926*^9}}, 
          FontFamily -> "Baskerville", FontSize -> 18, FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`]], 
         Cell[
          StyleData["Text", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SmallText"], CellMargins -> {{66, 10}, {6, 6}}, 
          LineSpacing -> {1, 3}, TabSpacings -> {2.5}, LanguageCategory -> 
          "NaturalLanguage", CounterIncrements -> "SmallText", 
          MenuSortingValue -> 1750, StyleMenuListing -> None, FontFamily -> 
          "Source Sans Pro", FontSize -> 14, FontColor -> GrayLevel[0.2]], 
         Cell[
          StyleData["SmallText", "Printout"], 
          CellMargins -> {{66, 10}, {7, 7}}, Hyphenation -> True]}, Closed]], 
      
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ResourcesText"], CellMargins -> {{66, 10}, {2, 0}}, 
          ReturnCreatesNewCell -> True, FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Plain", 
          FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["ResourcesText", "Printout"], 
          CellMargins -> {{66, 10}, {2, 0}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ResourcesLink"], CellMargins -> {{66, 10}, {2, 0}}, 
          ReturnCreatesNewCell -> True, FontFamily -> "Source Sans Pro", 
          FontSize -> 14, FontWeight -> "Plain", FontSlant -> "Italic", 
          FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["ResourcesLink", "Printout"], 
          CellMargins -> {{66, 10}, {2, 0}}]}, Open]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Input"], CellMargins -> {{99, 10}, {3, 7}}, CellEpilog :> 
          Quiet[Needs["WolframBookTools`"]; 
            WolframBookTools`AddCaptionsToRegeneratedOutput[]], SpanMaxSize -> 
          1, FontSize -> 15], 
         Cell[
          StyleData["Input", "Printout"], CellMargins -> {{99, 10}, {3, 7}}]},
         Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Output"], CellMargins -> {{99, 10}, {14, 7}}, FontSize -> 
          15], 
         Cell[
          StyleData["Output", "Printout"], 
          CellMargins -> {{99, 10}, {14, 7}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["InputOnly"], CellMargins -> {{99, 10}, {25, 10}}, 
          SpanMaxSize -> 1, MenuSortingValue -> 1500, FontSize -> 15], 
         Cell[
          StyleData["InputOnly", "Printout"], 
          CellMargins -> {{99, 10}, {15, 10}}]}, Closed]], 
      Cell[
       StyleData["InitializationCell"], Background -> None], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["CellLabel"], 
          CellLabelMargins -> {{18, Inherited}, {Inherited, Inherited}}, 
          LanguageCategory -> None, StyleMenuListing -> None, FontFamily -> 
          "Roboto", FontSize -> 9, FontWeight -> "Regular", FontSlant -> 
          "Plain", FontColor -> GrayLevel[0.5]], 
         Cell[
          StyleData["CellLabel", "Printout"], FontSize -> 8, FontColor -> 
          GrayLevel[0.3]]}, Closed]], 
      Cell[
       StyleData[
       "CellLabelExpired", StyleDefinitions -> StyleData["CellLabel"]], 
       CellLabelMargins -> 6, FontSlant -> Italic, FontTracking -> 0.4, 
       FontColor -> GrayLevel[0.3]], 
      Cell[
       StyleData["IconizedDefaultName"], FontSize -> 12, 
       PrivateFontOptions -> {"OperatorSubstitution" -> False}, FontColor -> 
       GrayLevel[0.15]], 
      Cell[
       StyleData["IconizedFrame"], 
       TemplateBoxOptions -> {
        DisplayFunction -> (
          FrameBox[#, BaselinePosition -> Baseline, 
           FrameMargins -> {{0, 0}, {1, 1}}, FrameStyle -> GrayLevel[0.65], 
           Background -> GrayLevel[0.96], RoundingRadius -> 4, 
           DefaultBaseStyle -> {
            "DialogStyle", FontFamily -> "Roboto", FontSize -> 11}]& ), 
         Tooltip -> None}], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Message"], Editable -> False, 
          CellMargins -> {{66, Inherited}, {Inherited, Inherited}}, 
          CellGroupingRules -> "OutputGrouping", TextClipboardType -> 
          "PlainText", StripStyleOnPaste -> True, PageBreakWithin -> False, 
          GroupPageBreakWithin -> False, GeneratedCell -> True, 
          CellAutoOverwrite -> True, ShowCellLabel -> False, 
          DefaultFormatType -> DefaultOutputFormatType, ContextMenu -> 
          FEPrivate`FrontEndResource["ContextMenus", "Output"], 
          ShowAutoStyles -> False, ShowSyntaxStyles -> False, 
          AutoStyleOptions -> {
           "StringStyle" -> None, "SyntaxErrorStyle" -> None}, 
          HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"},
           AutoItalicWords -> {}, AutoQuoteCharacters -> {}, 
          PasteAutoQuoteCharacters -> {}, LanguageCategory -> None, 
          FormatType -> InputForm, ShowStringCharacters -> False, 
          CounterIncrements -> "Message", MenuSortingValue -> 1600, 
          StyleMenuListing -> None, FontFamily :> 
          CurrentValue["PanelFontFamily"], FontSize -> 11, FontColor -> 
          RGBColor[0.5072, 0.16933, 0.15221]], 
         Cell[
          StyleData["Message", "Printout"], 
          CellMargins -> {{100, Inherited}, {Inherited, Inherited}}, 
          CellFrameLabels -> {{None, None}, {None, None}}, FontColor -> 
          GrayLevel[0]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExerciseInput", StyleDefinitions -> StyleData["Input"]], 
          CellMargins -> {{106, 10}, {4, 7}}, 
          GeneratedCellStyles -> {"Output" -> "ExerciseOutput"}, 
          ShowCellLabel -> False, SpanMaxSize -> 1, FontSize -> 14], 
         Cell[
          StyleData["ExerciseInput", "Printout"], 
          CellMargins -> {{106, 10}, {4, 7}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "ExerciseOutput", StyleDefinitions -> StyleData["Output"]], 
          CellMargins -> {{106, 10}, {10, 4}}, ShowCellLabel -> False, 
          FontSize -> 14], 
         Cell[
          StyleData["ExerciseOutput", "Printout"], 
          CellMargins -> {{106, 10}, {10, 4}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Picture"], CellMargins -> {{66, 10}, {10, 10}}, 
          CellGroupingRules -> "GraphicsGrouping", StyleMenuListing -> None], 
         
         Cell[
          StyleData["Picture", "Printout"], 
          CellMargins -> {{66, 10}, {8, 8}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Comment"], FontFamily -> "Verdana", FontSize -> 13, 
          FontColor -> RGBColor[0.3, 0.3, 0.2], Background -> 
          RGBColor[1, 0.9, 0.8]], 
         Cell[
          StyleData["Comment", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Suggestion"], 
          CellFrameLabels -> {{Inherited, Inherited}, {Inherited, 
             Cell[
              BoxData[
               TagBox[
                GridBox[{{
                   ButtonBox[
                   "\"  Insert  \"", 
                    ButtonFunction :> (Needs["DocuTools`"]; 
                    DocuTools`DocuToolsLoader[]; 
                    DocuTools`ReplaceWithSuggestion[]), Evaluator -> 
                    Automatic, 
                    BaseStyle -> {FontSize -> 10, FontFamily -> "Verdana"}, 
                    ContentPadding -> False, Appearance -> Automatic, Method -> 
                    "Queued"], 
                   ButtonBox[
                   "\"  Stet  \"", 
                    ButtonFunction :> (Needs["DocuTools`"]; 
                    DocuTools`DocuToolsLoader[]; DocuTools`StetSuggestion[]), 
                    Evaluator -> Automatic, 
                    BaseStyle -> {FontSize -> 10, FontFamily -> "Verdana"}, 
                    Appearance -> Automatic, Method -> "Queued"], "    ", 
                   ButtonBox[
                   "\"  Next  \"", 
                    ButtonFunction :> (Needs["DocuTools`"]; 
                    DocuTools`DocuToolsLoader[]; 
                    DocuTools`FindNextSuggestion[]), Evaluator -> Automatic, 
                    BaseStyle -> {FontSize -> 10, FontFamily -> "Verdana"}, 
                    Appearance -> Automatic, Method -> "Queued"], 
                   ButtonBox[
                   "\"  Previous  \"", 
                    ButtonFunction :> (Needs["DocuTools`"]; 
                    DocuTools`DocuToolsLoader[]; 
                    DocuTools`FindPreviousSuggestion[]), Evaluator -> 
                    Automatic, 
                    BaseStyle -> {FontSize -> 10, FontFamily -> "Verdana"}, 
                    Appearance -> Automatic, Method -> "Queued"], "\"\""}}, 
                 AutoDelete -> False, 
                 GridBoxItemSize -> {
                  "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], 
                "Grid"]], ShowStringCharacters -> False, Background -> 
              None]}}, Background -> RGBColor[1, 0.8, 0.8]], 
         Cell[
          StyleData["Suggestion", "Printout"], 
          CellElementSpacings -> {"CellMinHeight" -> 0.1}, CellOpen -> False, 
          CellFrameMargins -> 0, FontSize -> 0.1, Magnification -> 0.01]}, 
        Open]], 
      Cell[
       StyleData["Tentative"], 
       CellBracketOptions -> {
        "Color" -> RGBColor[
          0.30000000000000016`, 0.6000000000000003, 0.7000000000000003], 
         "Thickness" -> 5}, Evaluatable -> False, CellFrameMargins -> 4, 
       StyleMenuListing -> None, Background -> 
       RGBColor[0.8500000000000003, 0.9500000000000003, 1]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["PrintOnly"], 
          CellBracketOptions -> {
           "Color" -> RGBColor[0.89, 0.867, 0.99], "Thickness" -> 5}, 
          CellFrameMargins -> 4, StyleMenuListing -> None, Background -> 
          RGBColor[0.89, 0.867, 0.99]], 
         Cell[
          StyleData["PrintOnly", "Printout"], 
          CellElementSpacings -> {"CellMinHeight" -> 0.1}, CellOpen -> False, 
          CellFrameMargins -> 0, FontSize -> 0.1, Magnification -> 0.01], 
         Cell[
          StyleData["Tentative", "Printout"], 
          CellElementSpacings -> {"CellMinHeight" -> 0.1}, CellOpen -> False, 
          CellFrameMargins -> 0, FontSize -> 0.1, Magnification -> 0.01]}, 
        Open]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["WebOnly"], 
          CellBracketOptions -> {
           "Color" -> RGBColor[0.91, 0.92, 0.9], "Thickness" -> 5}, 
          CellFrameMargins -> 4, StyleMenuListing -> None, Background -> 
          RGBColor[0.91, 0.92, 0.86]], 
         Cell[
          StyleData["WebOnly", "Printout"], 
          CellElementSpacings -> {"CellMinHeight" -> 0.1}, CellOpen -> False, 
          CellFrameMargins -> 0, FontSize -> 0.1, Magnification -> 0.01]}, 
        Open]], 
      Cell[
       StyleData["Lockdown"], 
       CellBracketOptions -> {
        "Color" -> RGBColor[0.8, 0.5, 0.4], "Thickness" -> 3}, Evaluatable -> 
       False, StyleMenuListing -> None], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["IndexField"], CellFrame -> True, CellFrameColor -> 
          GrayLevel[0.7], FontFamily -> "Verdana", FontSize -> 12], 
         Cell[
          StyleData["IndexField", "Invisibles"], CellFrame -> False, 
          ShowCellBracket -> False, CellOpen -> False, FontSize -> 1]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ExplanationField"], CellFrame -> True, CellFrameColor -> 
          GrayLevel[0.7], FontFamily -> "Verdana", FontSize -> 12], 
         Cell[
          StyleData["ExplanationField", "Invisibles"], CellFrame -> False, 
          ShowCellBracket -> False, CellOpen -> False, FontSize -> 1]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["EnglishHighlight"], FontFamily -> "WolframCodeSans"], 
         Cell[
          StyleData["EnglishHighlight", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SolvedExample"], CellMargins -> {{66, 30}, {0, 16}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{25, 13}, {10, 25}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, 
          CounterIncrements -> "SolvedExample", FontFamily -> 
          "Source Sans Pro", FontSize -> 16.5, FontWeight -> "SemiBold", 
          FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`], Background -> Hue[0.085, 0.07, 0.95]], 
         Cell[
          StyleData["SolvedExample", "Printout"], 
          CellMargins -> {{66, 0}, {0, 16}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "SolvedExampleNote", StyleDefinitions -> StyleData["Text"]], 
          CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{25, 13}, {10, 10}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontSize -> 17, 
          FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`], Background -> Hue[0.085, 0.07, 0.95]], 
         Cell[
          StyleData["SolvedExampleNote", "Printout"], 
          CellMargins -> {{66, 0}, {0, -6}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "SolvedExampleDisplayFormula", StyleDefinitions -> 
           StyleData["DisplayFormula"]], CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{32, Inherited}, {12, 8}}, TextAlignment -> 
          Left, LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontSize -> 
          14, FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`], Background -> Hue[0.085, 0.07, 0.95]], 
         Cell[
          StyleData["SolvedExampleDisplayFormula", "Printout"], 
          CellMargins -> {{66, 0}, {0, -6}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "SolvedExampleDisplayFormulaNumbered", StyleDefinitions -> 
           StyleData["DisplayFormula"]], CellMargins -> {{66, 40}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{32, 46}, {12, 8}}, 
          CellFrameLabels -> {{None, 
             Cell[
              TextData[{"(", 
                CounterBox["SolvedExampleDisplayFormulaNumbered"], ")"}], 
              "DisplayFormulaEquationNumber", CellSize -> {30, Automatic}]}, {
            None, None}}, 
          CellFrameLabelMargins -> {{Inherited, -40}, {Inherited, Inherited}},
           TextAlignment -> Left, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, 
          CounterIncrements -> "SolvedExampleDisplayFormulaNumbered", 
          FontSize -> 14, FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`], Background -> Hue[0.085, 0.07, 0.95]], 
         Cell[
          StyleData["SolvedExampleDisplayFormulaNumbered", "Printout"], 
          CellMargins -> {{66, 0}, {0, -6}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "SolvedExampleInput", StyleDefinitions -> StyleData["Input"]], 
          CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          GeneratedCellStyles -> {
           "Message" -> "SolvedExampleMessage", "Output" -> 
            "SolvedExampleOutput"}, 
          CellFrameMargins -> {{32, Inherited}, {3, 7}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`], Background -> Hue[0.085, 0.07, 0.95]], 
         Cell[
          StyleData["SolvedExampleInput", "Printout"], 
          CellMargins -> {{66, 0}, {0, -7}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "SolvedExampleOutput", StyleDefinitions -> StyleData["Output"]], 
          CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{32, Inherited}, {14, 7}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`], Background -> Hue[0.085, 0.07, 0.95]], 
         Cell[
          StyleData["SolvedExampleOutput", "Printout"], 
          CellMargins -> {{66, 0}, {6, -6}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["SolvedExampleMessage"], 
          CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{25, 13}, {10, 10}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontColor -> 
          RGBColor[
           0.050002574846150734`, 0.050002574846150734`, 
            0.050002574846150734`], Background -> Hue[0.085, 0.07, 0.95]], 
         Cell[
          StyleData["SolvedExampleMessage", "Printout"], 
          CellMargins -> {{66, 0}, {0, -6}}]}, Closed]], 
      Cell[
       StyleData["SolvedExampleEndCap"], CellMargins -> {{66, 30}, {0, 0}}, 
       CellBracketOptions -> {"OverlapContent" -> True}, 
       CellElementSpacings -> {"CellMinHeight" -> 20}, 
       CellFrameMargins -> {{10, 13}, {0, 0}}, 
       LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontSize -> 2, 
       FontColor -> 
       RGBColor[
        0.050002574846150734`, 0.050002574846150734`, 0.050002574846150734`], 
       Background -> Hue[0.085, 0.07, 0.95]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Theorem"], Editable -> False, 
          CellMargins -> {{66, 30}, {0, 16}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{25, 13}, {0, 25}}, 
          CellChangeTimes -> {3.968922600990673*^9}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, 
          CounterIncrements -> "Subsection", FontFamily -> "Source Sans Pro", 
          FontSize -> 16.5, FontWeight -> "SemiBold", FontColor -> 
          RGBColor[
           0.00010000076130382223`, 0.007800042619928998, 
            0.13000297516585294`], Background -> Hue[0.57, 0.098, 0.996], 
          GridBoxOptions -> {
           GridBoxAlignment -> {
             "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {
             "Columns" -> {{Automatic}}, "RowsIndexed" -> {2 -> 0}}}, 
          GraphicsBoxOptions -> {
           ImagePadding -> None, ImageSize -> {900, 1}, PlotRangePadding -> 
            0}], 
         Cell[
          StyleData["Theorem", "Printout"], CellMargins -> {{66, 0}, {0, 16}},
           CellChangeTimes -> {{3.965900023638689*^9, 
           3.965900023829352*^9}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "TheoremStatement", StyleDefinitions -> StyleData["Text"]], 
          CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{25, 13}, {10, 10}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontSize -> 17, 
          FontColor -> 
          RGBColor[
           0.00010000076130382223`, 0.007800042619928998, 
            0.13000297516585294`], Background -> Hue[0.57, 0.098, 0.996]], 
         Cell[
          StyleData["TheoremStatement", "Printout"], 
          CellMargins -> {{66, 0}, {0, 0}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "ProofTheoremDisplayFormula", StyleDefinitions -> 
           StyleData["DisplayFormula"]], CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{32, Inherited}, {12, 8}}, 
          CellFrameLabelMargins -> {{Inherited, -26}, {Inherited, Inherited}},
           TextAlignment -> Left, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, 
          MenuSortingValue -> 1710, FontFamily -> "Baskerville", FontSize -> 
          14, FontWeight -> "Regular", FontSlant -> "Plain", 
          PrivateFontOptions -> {"FontPostScriptName" -> "Automatic"}, 
          FontColor -> 
          RGBColor[
           0.00010000076130382223`, 0.007800042619928998, 
            0.13000297516585294`], Background -> Hue[0.57, 0.098, 0.996]], 
         Cell[
          StyleData["ProofTheoremDisplayFormula", "Printout"], 
          CellMargins -> {{66, 0}, {0, 0}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "ProofTheoremDisplayFormulaNumbered", StyleDefinitions -> 
           StyleData["DisplayFormula"]], CellMargins -> {{66, 40}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{32, 46}, {12, 8}}, 
          CellFrameLabels -> {{None, 
             Cell[
              TextData[{"(", 
                CounterBox["ProofTheoremDisplayFormulaNumbered"], ")"}], 
              "DisplayFormulaEquationNumber", CellSize -> {30, Automatic}]}, {
            None, None}}, 
          CellFrameLabelMargins -> {{Inherited, -40}, {Inherited, Inherited}},
           TextAlignment -> Left, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, 
          CounterIncrements -> "ProofTheoremDisplayFormulaNumbered", 
          MenuSortingValue -> 1710, FontFamily -> "Baskerville", FontSize -> 
          14, FontWeight -> "Regular", FontSlant -> "Plain", 
          PrivateFontOptions -> {"FontPostScriptName" -> "Automatic"}, 
          FontColor -> 
          RGBColor[
           0.00010000076130382223`, 0.007800042619928998, 
            0.13000297516585294`], Background -> Hue[0.57, 0.098, 0.996]], 
         Cell[
          StyleData["ProofTheoremDisplayFormulaNumbered", "Printout"], 
          CellMargins -> {{66, 0}, {0, 0}}]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Proof"], Editable -> False, 
          CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{25, 13}, {0, 20}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontFamily -> 
          "Source Sans Pro", FontSize -> 16.5, FontWeight -> "SemiBold", 
          FontColor -> 
          RGBColor[
           0.00010000076130382223`, 0.007800042619928998, 
            0.13000297516585294`], Background -> Hue[0.57, 0.098, 0.996], 
          GridBoxOptions -> {
           GridBoxAlignment -> {
             "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {
             "Columns" -> {{Automatic}}, "RowsIndexed" -> {2 -> 0}}}, 
          GraphicsBoxOptions -> {
           ImagePadding -> None, ImageSize -> {900, 1}, PlotRangePadding -> 
            0}], 
         Cell[
          StyleData["Proof", "Printout"], CellMargins -> {{66, 0}, {0, 0}}]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["ProofContent", StyleDefinitions -> StyleData["Text"]], 
          CellMargins -> {{66, 30}, {0, 0}}, 
          CellBracketOptions -> {"OverlapContent" -> True}, 
          CellFrameMargins -> {{25, 13}, {10, 10}}, 
          LightDarkAutoColorRules -> <|"AllColors" -> True|>, FontSize -> 17, 
          FontColor -> 
          RGBColor[
           0.00010000076130382223`, 0.007800042619928998, 
            0.13000297516585294`], Background -> Hue[0.57, 0.098, 0.996]], 
         Cell[
          StyleData["ProofContent", "Printout"], 
          CellMargins -> {{66, 0}, {0, 0}}]}, Closed]], 
      Cell[
       StyleData["ProofTheoremEndCap"], CellMargins -> {{66, 30}, {0, 0}}, 
       CellBracketOptions -> {"OverlapContent" -> True}, 
       CellElementSpacings -> {"CellMinHeight" -> 20}, 
       CellFrameMargins -> {{10, 13}, {0, 0}}, FontSize -> 2, FontColor -> 
       RGBColor[
        0.00010000076130382223`, 0.007800042619928998, 0.13000297516585294`], 
       Background -> Hue[0.57, 0.098, 0.996]], 
      Cell[
       StyleData["Banner", StyleDefinitions -> StyleData["Text"]], Editable -> 
       False, WindowToolbars -> {}, PageWidth :> WindowWidth, 
       Alignment -> {{Left, Right}, {Center, Center}}, 
       CellFrame -> {{0, 1}, {0, 0}}, ShowCellBracket -> False, 
       CellMargins -> {{0, 0}, {0, 0}}, 
       CellBracketOptions -> {"OverlapContent" -> True}, 
       CellGroupingRules -> {"SectionGrouping", 0}, CellContext -> CellGroup, 
       CellFrameMargins -> {{0, 20}, {5, 0}}, CellFrameColor -> 
       RGBColor[
        0.00009999889888604668, 0.1607913972623736, 0.4000129703059972], 
       ShowStringCharacters -> False, FontFamily -> "Source Sans Pro", 
       FontSize -> 20, FontWeight -> "SemiBold", FontColor -> GrayLevel[1], 
       Background -> 
       RGBColor[
        0.00009999889888604668, 0.1607913972623736, 0.4000129703059972]], 
      Cell[
       StyleData[
       "BannerCitationOpenerLabel", StyleDefinitions -> StyleData["Text"]], 
       WindowToolbars -> {}, Selectable -> True, PageWidth :> WindowWidth, 
       CellFrame -> {{0, 1}, {0, 0}}, ShowCellBracket -> False, 
       CellMargins -> {{0, 0}, {0, 0}}, 
       CellGroupingRules -> {"SectionGrouping", 70}, CellContext -> CellGroup,
        CellFrameMargins -> {{28, 0}, {4, 5}}, CellFrameColor -> 
       RGBColor[0.8627719122171761, 0.9333285528421761, 0.9999789434671761], 
       ShowStringCharacters -> False, FontFamily -> "Source Sans Pro", 
       FontSize -> 11, FontWeight -> "Regular", FontColor -> 
       RGBColor[
        0.27843797333540327`, 0.40392625458540327`, 0.5137851263583065], 
       Background -> 
       RGBColor[0.8627719122171761, 0.9333285528421761, 0.9999789434671761]], 
      
      Cell[
       StyleData["BannerCitation", StyleDefinitions -> StyleData["Text"]], 
       WindowToolbars -> {}, Selectable -> True, PageWidth :> WindowWidth, 
       CellFrame -> {{0, 1}, {0, 0}}, ShowCellBracket -> False, 
       CellMargins -> {{0, 0}, {0, -1}}, 
       CellElementSpacings -> {"CellMinHeight" -> 2, "ClosedCellHeight" -> 1},
        Copyable -> True, CellContext -> CellGroup, 
       CellFrameMargins -> {{28, 0}, {8, 0}}, CellFrameColor -> 
       RGBColor[0.8627719122171761, 0.9333285528421761, 0.9999789434671761], 
       ShowStringCharacters -> False, FontFamily -> "Source Sans Pro", 
       FontSize -> 11, FontWeight -> "Bold", FontColor -> 
       RGBColor[
        0.27843797333540327`, 0.40392625458540327`, 0.5137851263583065], 
       Background -> 
       RGBColor[0.8627719122171761, 0.9333285528421761, 0.9999789434671761]], 
      
      Cell[
       StyleData[
       "BannerPreReleaseLabel", StyleDefinitions -> 
        StyleData["BannerCitationOpenerLabel"]], 
       CellFrameMargins -> {{0, 30}, {2, 0}}, 
       ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{
            
            NotebookLocate[#2, "OpenInNewWindow" -> 
             CurrentValue["HyperlinkModifierKey"]]}]& ), Evaluator -> None, 
         Method -> "Queued"}], 
      Cell[
       StyleData["BannerHeading"], MenuSortingValue -> None, FontFamily -> 
       "Source Sans Pro", FontSize -> 11, FontWeight -> "Regular", FontColor -> 
       RGBColor[
        0.9999903558940054, 0.5650486394018294, 0.14501301402226988`]]}, 
     Open]], 
   Cell[
    CellGroupData[{
      Cell[
      "Inline and special formatting", "Section", 
       CellChangeTimes -> {{3.646681732592888*^9, 3.646681749414035*^9}}], 
      Cell[
       StyleData["DateObject"], ContextMenu -> 
       FEPrivate`FrontEndResource["ContextMenus", "DateObject"], 
       TemplateBoxOptions -> {DisplayFunction -> (FrameBox[
           
           StyleBox[#, "Text", FontFamily -> "Source Sans Pro", FontSize -> 
            13, FontWeight -> "Plain", FontColor -> 
            RGBColor[
             0.12941176470588237`, 0.34509803921568627`, 
              0.43529411764705883`], ShowStringCharacters -> False], 
           Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{5, 5}, {2, 2}},
            FrameStyle -> GrayLevel[0.65], RoundingRadius -> 2, 
           BaselinePosition -> Baseline, 
           BaseStyle -> {FontFamily -> "Courier"}]& ), 
         InterpretationFunction -> (#2& )}], 
      Cell[
       StyleData["DateObjectLabel"], FontWeight -> "Plain", FontColor -> 
       GrayLevel[0.2]], 
      Cell[
       StyleData["SummaryItemAnnotation"], FontColor -> GrayLevel[0.3]], 
      Cell[
       StyleData["Caption"], FontFamily :> CurrentValue["PanelFontFamily"], 
       FontSize :> 0.8 Inherited, FontWeight -> "Plain", FontSlant -> "Plain",
        FontColor :> CurrentValue[{"SystemColors", "DialogText"}], 
       TemplateBoxOptions -> {DisplayFunction -> (ButtonBox[
           
           FrameBox[#, FrameStyle -> GrayLevel[0.5], Background -> 
            GrayLevel[0.969], FrameMargins -> 7, RoundingRadius -> 3, 
            BaselinePosition -> Baseline], Active -> False, Alignment -> Left,
            Appearance -> None, BaseStyle -> {Deployed -> False}, 
           DefaultBaseStyle -> {"Pane", Background -> None}, BaselinePosition -> 
           Baseline]& ), Tooltip -> None}, 
       GraphicsBoxOptions -> {
        Axes -> False, 
         DefaultBaseStyle -> {
          "GraphicsNoFontsOrMenu", CacheGraphics -> False}, ImageSize -> 
         Dynamic[{
           Automatic, 
            3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
             Magnification])}]}, 
       Graphics3DBoxOptions -> {
        Axes -> False, DefaultBaseStyle -> {"Graphics3DNoFontsOrMenu"}, 
         ImageSize -> 
         Dynamic[{
           Automatic, 
            3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
             Magnification])}]}], 
      Cell[
       StyleData["GraphicsEmbeddedCaption"], FontFamily -> "Source Sans Pro", 
       FontSize -> 14], 
      Cell[
       StyleData["SummaryPanel"], FontFamily :> 
       CurrentValue["PanelFontFamily"], FontSize :> 0.8 Inherited, FontWeight -> 
       "Plain", FontSlant -> "Plain", FontColor :> 
       CurrentValue[{"SystemColors", "DialogText"}], 
       TemplateBoxOptions -> {DisplayFunction -> (ButtonBox[
           
           FrameBox[#, FrameStyle -> GrayLevel[0.5], Background -> 
            GrayLevel[0.969], FrameMargins -> 7, RoundingRadius -> 3, 
            BaselinePosition -> Baseline], Active -> False, Alignment -> Left,
            Appearance -> None, BaseStyle -> {Deployed -> False}, 
           DefaultBaseStyle -> {"Pane", Background -> None}, BaselinePosition -> 
           Baseline]& ), Tooltip -> None}, 
       GraphicsBoxOptions -> {
        Axes -> False, 
         DefaultBaseStyle -> {
          "GraphicsNoFontsOrMenu", CacheGraphics -> False}, ImageSize -> 
         Dynamic[{
           Automatic, 
            3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
             Magnification])}]}, 
       Graphics3DBoxOptions -> {
        Axes -> False, DefaultBaseStyle -> {"Graphics3DNoFontsOrMenu"}, 
         ImageSize -> 
         Dynamic[{
           Automatic, 
            3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
             Magnification])}]}], 
      Cell[
       StyleData["Graphics"], MenuSortingValue -> None], 
      Cell[
       StyleData["Graphics3D"], MenuSortingValue -> None], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["StandardForm"], LineSpacing -> {1.25, 0, 2}, FontFamily -> 
          "Source Sans Code"], 
         Cell[
          StyleData["StandardForm", "Printout"], LineSpacing -> {1.25, 0, 2}, 
          FontFamily -> "Source Sans Code"]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["OutputForm"], LineSpacing -> {0.6, 1}, FontFamily -> 
          "Source Sans Code"], 
         Cell[
          StyleData["OutputForm", "Printout"], LineSpacing -> {0.6, 1}, 
          FontFamily -> "Source Sans Code"]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["InputForm"], FontFamily -> "Source Sans Code"], 
         Cell[
          StyleData["InputForm", "Printout"], FontFamily -> 
          "Source Sans Code"]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["FormattedFunction"], FontFamily -> "Source Sans Pro", 
          FontSize :> If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.9]]], 
         Cell[
          StyleData["FormattedFunction", "Printout"], FontFamily -> 
          "Source Sans Pro", FontSize :> If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.88]]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Link"], FontFamily -> "Source Sans Pro", FontSize :> 
          If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.9]], FontColor -> GrayLevel[0], 
          ButtonBoxOptions -> {
           Active -> True, Appearance -> {Automatic, None}, 
            ButtonFunction :> (FEPrivate`FrontEndExecute[
              FrontEndToken["OpenHelpLink", {#}]]& ), ButtonNote -> 
            ButtonData, Evaluator -> None, ImageSize -> Full, Method -> 
            "Preemptive"}], 
         Cell[
          StyleData["Link", "Printout"], FontFamily -> "Source Sans Pro", 
          FontSize :> If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.88]], FontColor -> GrayLevel[0], 
          ButtonBoxOptions -> {
           Active -> True, Appearance -> {Automatic, None}, 
            ButtonFunction :> (FEPrivate`FrontEndExecute[
              FrontEndToken["OpenHelpLink", {#}]]& ), ButtonNote -> 
            ButtonData, Evaluator -> None, ImageSize -> Full, Method -> 
            "Preemptive"}]}, Open]], 
      Cell[
       StyleData[
       "CaptionFunctionLink", StyleDefinitions -> StyleData["Link"]], 
       FontFamily -> "Source Sans Pro", FontSize -> 14, FontColor -> 
       GrayLevel[0]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["DetailsLink"], FontFamily -> "Source Sans Pro", FontSize :> 
          If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.9]], FontColor -> GrayLevel[0], 
          ButtonBoxOptions -> {
           ButtonFunction :> (
             Function[$CellContext`t, 
              NotebookFind[$CellContext`t, "Notes", All, CellStyle]; 
              NotebookFind[$CellContext`t, "NotesSection", All, CellStyle, 
                AutoScroll -> Top]][
              Documentation`HelpLookup["ref/" <> #]]& ), ButtonSource -> 
            ButtonContents, Evaluator -> Automatic}], 
         Cell[
          StyleData["DetailsLink", "Printout"], FontFamily -> 
          "Source Sans Pro", FontSize :> If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.88]], FontColor -> GrayLevel[0]]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["LinkAlt"], FontFamily -> "Source Sans Pro", FontSize :> 
          If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.9]], FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["LinkAlt", "Printout"], FontFamily -> "Source Sans Pro", 
          FontSize :> If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.88]], FontColor -> GrayLevel[0]]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Hyperlink"], MenuSortingValue -> None, FontColor -> 
          RGBColor[0.3, 0.35, 0.5]], 
         Cell[
          StyleData["Hyperlink", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["FunctionLink", StyleDefinitions -> StyleData["Link"]], 
          FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["FunctionLink", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "FunctionHyperlink", StyleDefinitions -> StyleData["Link"]], 
          FontColor -> GrayLevel[0], 
          ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{
               
               NotebookLocate[#2, "OpenInNewWindow" -> 
                CurrentValue["HyperlinkModifierKey"]]}]& ), Evaluator -> None,
             Method -> "Queued"}], 
         Cell[
          StyleData["FunctionHyperlink", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData[
          "ResourceFunctionlink", StyleDefinitions -> StyleData["Hyperlink"]],
           MenuSortingValue -> None, FontFamily -> "Source Sans Pro", 
          FontSize :> If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.9]], FontColor -> GrayLevel[0]], 
         Cell[
          StyleData["ResourceFunctionlink", "Printout"], FontFamily -> 
          "Source Sans Pro", FontSize :> If[CurrentValue[
              EvaluationCell[], "FontFamily"] === "Source Sans Pro", 
            Inherited, 
            If[CurrentValue[
               EvaluationCell[], "FontFamily"] === "WolframCodeSans", 
             Inherited, Inherited 0.88]], FontColor -> GrayLevel[0]]}, 
        Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["Crosslink"], 
          ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{
               
               NotebookLocate[#2, "OpenInNewWindow" -> 
                CurrentValue["HyperlinkModifierKey"]]}]& ), Evaluator -> None,
             Method -> "Queued"}], 
         Cell[
          StyleData["Crosslink", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["CodeLink"], 
          ButtonBoxOptions -> {
           Active -> True, Appearance -> {Automatic, None}, 
            ButtonFunction :> (FEPrivate`FrontEndExecute[
              FrontEndToken["OpenHelpLink", {
                Part[#, 1]}]]& ), ButtonNote -> ButtonData, Evaluator -> None,
             ImageSize -> Full, Method -> "Preemptive"}], 
         Cell[
          StyleData["CodeLink", "Printout"]]}, Open]], 
      Cell[
       StyleData["VocabularyLink"], FontColor -> GrayLevel[0], 
       ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{
            
            NotebookLocate[#2, "OpenInNewWindow" -> 
             CurrentValue["HyperlinkModifierKey"]]}]& ), Evaluator -> None, 
         Method -> "Queued"}], 
      Cell[
       StyleData["InlineMath"], SpanMaxSize -> 0, CellID -> 644119144], 
      Cell[
       StyleData["InlineCode"], AutoSpacing -> True, SpanMaxSize -> 0, 
       FontColor -> GrayLevel[0]], 
      Cell[
       StyleData["InlineCodeText"], SpanMaxSize -> 0, FontFamily -> 
       "Source Sans Pro", FontSize -> 0.94 Inherited], 
      Cell[
       StyleData["InlineFormula"]], 
      Cell[
       StyleData["NoLabel"], 
       GeneratedCellStyles -> {"Output" -> "ExerciseOutput"}, ShowCellLabel -> 
       False], 
      Cell[
       StyleData["MenuName"], FontFamily -> "Verdana", FontWeight -> "Bold", 
       FontColor -> GrayLevel[0.286275]], 
      Cell[
       StyleData["DialogElementName"], 
       CellChangeTimes -> {3.642251807158844*^9, 3.8358753610849867`*^9, 
        3.835875471581566*^9}, FontFamily -> "Source Sans Pro SemiBold", 
       FontSize -> 0.95 Inherited, FontWeight -> "Regular"], 
      Cell[
       StyleData["KeyEvent"], CellFrame -> {{0.5, 0.5}, {0.5, 0.5}}, 
       CellFrameMargins -> {{2, 2}, {2, 2}}, CellFrameColor -> GrayLevel[0.7],
        FontFamily -> "Verdana", FontColor -> GrayLevel[0.4]], 
      Cell[
       StyleData["KeyEventDelimiter"], FontColor -> GrayLevel[0.5]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["CodeVariable"], FontFamily -> "Times", FontSize -> 
          1.05 Inherited, FontWeight -> "Plain", FontSlant -> "Italic"], 
         Cell[
          StyleData["CodeVariable", "Printout"]]}, Closed]], 
      Cell[
       CellGroupData[{
         Cell[
          StyleData["CodeVariableLrg"], FontFamily -> "Times", FontSize -> 
          1.1 Inherited, FontWeight -> "Plain", FontSlant -> "Italic"], 
         Cell[
          StyleData["CodeVariableLrg", "Printout"]]}, Open]], 
      Cell[
       CellGroupData[{
         Cell["Key Styles", "Subsubsection"], 
         Cell[
          StyleData["Key0"], 
          TemplateBoxOptions -> {DisplayFunction -> (FrameBox[
              TagBox[
               GridBox[{{
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> GrayLevel[1], StripOnInput -> 
                   False]}}, 
                GridBoxAlignment -> {
                 "Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, AutoDelete -> 
                False, GridBoxDividers -> {"Rows" -> {{None}}}, 
                GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{1.45}}},
                 GridBoxSpacings -> {"Columns" -> {{0}}}, 
                BaselinePosition -> {{1, 1}, Baseline}], "Grid"], 
              RoundingRadius -> 4, Background -> 
              GrayLevel[0.9333333333333333], 
              FrameMargins -> {{0, 0}, {-1, -1}}, FrameStyle -> {
                GrayLevel[0.8352941176470589], 
                AbsoluteThickness[1]}, BaselinePosition -> Baseline, 
              StripOnInput -> False]& )}], 
         Cell[
          StyleData["Key1"], 
          TemplateBoxOptions -> {DisplayFunction -> (FrameBox[
              TagBox[
               GridBox[{{
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> 
                   GrayLevel[0.9333333333333333], StripOnInput -> False], 
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #2, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> GrayLevel[1], StripOnInput -> 
                   False]}}, 
                GridBoxAlignment -> {
                 "Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, AutoDelete -> 
                False, GridBoxDividers -> {
                 "ColumnsIndexed" -> {2 -> GrayLevel[0.8352941176470589]}, 
                  "Rows" -> {{None}}}, 
                GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{1.45}}},
                 GridBoxSpacings -> {"Columns" -> {{0}}}, 
                BaselinePosition -> {{1, 1}, Baseline}], "Grid"], 
              RoundingRadius -> 4, Background -> 
              GrayLevel[0.9333333333333333], 
              FrameMargins -> {{0, 0}, {-1, -1}}, FrameStyle -> {
                GrayLevel[0.8352941176470589], 
                AbsoluteThickness[1]}, BaselinePosition -> Baseline, 
              StripOnInput -> False]& )}], 
         Cell[
          StyleData["Key2"], 
          TemplateBoxOptions -> {DisplayFunction -> (FrameBox[
              TagBox[
               GridBox[{{
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> 
                   GrayLevel[0.9333333333333333], StripOnInput -> False], 
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #2, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> 
                   GrayLevel[0.9333333333333333], StripOnInput -> False], 
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #3, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> GrayLevel[1], StripOnInput -> 
                   False]}}, 
                GridBoxAlignment -> {
                 "Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, AutoDelete -> 
                False, GridBoxDividers -> {
                 "ColumnsIndexed" -> {
                   2 -> GrayLevel[0.8352941176470589], 3 -> 
                    GrayLevel[0.8352941176470589]}, "Rows" -> {{None}}}, 
                GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{1.45}}},
                 GridBoxSpacings -> {"Columns" -> {{0}}}, 
                BaselinePosition -> {{1, 1}, Baseline}], "Grid"], 
              RoundingRadius -> 4, Background -> 
              GrayLevel[0.9333333333333333], 
              FrameMargins -> {{0, 0}, {-1, -1}}, FrameStyle -> {
                GrayLevel[0.8352941176470589], 
                AbsoluteThickness[1]}, BaselinePosition -> Baseline, 
              StripOnInput -> False]& )}], 
         Cell[
          StyleData["Key3"], 
          TemplateBoxOptions -> {DisplayFunction -> (FrameBox[
              TagBox[
               GridBox[{{
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> 
                   GrayLevel[0.9333333333333333], StripOnInput -> False], 
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #2, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> 
                   GrayLevel[0.9333333333333333], StripOnInput -> False], 
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #3, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> 
                   GrayLevel[0.9333333333333333], StripOnInput -> False], 
                  ItemBox[
                   
                   TemplateBox[{"\[ThickSpace]", #4, "\[ThickSpace]"}, 
                    "RowDefault"], Background -> GrayLevel[1], StripOnInput -> 
                   False]}}, 
                GridBoxAlignment -> {
                 "Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, AutoDelete -> 
                False, GridBoxDividers -> {
                 "ColumnsIndexed" -> {
                   2 -> GrayLevel[0.8352941176470589], 3 -> 
                    GrayLevel[0.8352941176470589], 4 -> 
                    GrayLevel[0.8352941176470589]}, "Rows" -> {{None}}}, 
                GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{1.45}}},
                 GridBoxSpacings -> {"Columns" -> {{0}}}, 
                BaselinePosition -> {{1, 1}, Baseline}], "Grid"], 
              RoundingRadius -> 4, Background -> 
              GrayLevel[0.9333333333333333], 
              FrameMargins -> {{0, 0}, {-1, -1}}, FrameStyle -> {
                GrayLevel[0.8352941176470589], 
                AbsoluteThickness[1]}, BaselinePosition -> Baseline, 
              StripOnInput -> False]& )}]}, Open]], 
      Cell[
       CellGroupData[{
         Cell["Entity styles", "Subsubsection"], 
         Cell[
          StyleData["Entity"], ContextMenu -> 
          FEPrivate`FrontEndResource["ContextMenus", "Entity"], 
          AutoStyleOptions -> {"HighlightSyntaxErrors" -> False}, 
          ShowStringCharacters -> False, 
          TemplateBoxOptions -> {DisplayFunction -> (TooltipBox[
              FrameBox[
               PaneSelectorBox[{True -> GridBox[{{
                    
                    StyleBox[#, FontSize -> 0.85 Inherited, FontColor -> 
                    RGBColor[0.395437, 0.20595, 0.061158]], 
                    PaneBox[
                    StyleBox[#4, "EntityTypeLabel"], BaselinePosition -> 
                    Baseline, ContentPadding -> False]}}, 
                   GridBoxItemSize -> {
                    "Columns" -> {{All}}, "Rows" -> {{All}}}, 
                   GridBoxSpacings -> {"Columns" -> {{0.5}}, "Rows" -> {{0}}},
                    BaselinePosition -> {1, 1}], False -> 
                 PaneBox[#, 
                   BaseStyle -> {
                    FontColor -> RGBColor[0.395437, 0.20595, 0.061158]}, 
                   BaselinePosition -> Baseline]}, 
                Dynamic[
                 CurrentValue[Evaluatable]], ImageSize -> Automatic, 
                BaselinePosition -> Baseline, 
                BaseStyle -> {FontFamily -> "Helvetica"}], FrameStyle -> 
               Directive[
                 RGBColor[1., 0.504768, 0.], 
                 AbsoluteThickness[1]], Background -> 
               RGBColor[1., 0.980392, 0.921569], 
               FrameMargins -> {{5, 5}, {1.5, 1.5}}, 
               ImageMargins -> {{2, 2}, {2, 2}}, BaselinePosition -> Baseline,
                RoundingRadius -> 4, 
               BaseStyle -> {FontFamily -> "Courier"}], #3, 
              BaseStyle -> {
               ShowStringCharacters -> False, LineIndent -> 0, 
                PrivateFontOptions -> {"OperatorSubstitution" -> False}}, 
              TooltipDelay -> 0.4]& ), Editable -> False, 
            InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityFrameless"], ShowStringCharacters -> False, 
          TemplateBoxOptions -> {DisplayFunction -> (TooltipBox[
              PaneSelectorBox[{True -> GridBox[{{
                    
                    StyleBox[#, FontWeight -> "Bold", FontFamily -> 
                    "Source Sans Pro", FontColor -> 
                    RGBColor[0.395437, 0.20595, 0.061158]], 
                    StyleBox[
                    RowBox[{"(", #4, ")"}], FontFamily -> "Source Sans Pro", 
                    FontWeight -> "Plain", FontColor -> GrayLevel[0.65], 
                    Selectable -> False]}}, 
                  GridBoxItemSize -> {
                   "Columns" -> {{All}}, "Rows" -> {{All}}}, 
                  GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}}, 
                  BaselinePosition -> {1, 1}], False -> 
                PaneBox[#, 
                  BaseStyle -> {
                   FontColor -> RGBColor[0.395437, 0.20595, 0.061158]}, 
                  BaselinePosition -> Baseline]}, 
               Dynamic[
                CurrentValue[Evaluatable]], ImageSize -> Automatic, 
               BaselinePosition -> Baseline, 
               BaseStyle -> {FontFamily -> "Helvetica"}], #3, 
              BaseStyle -> {
               ShowStringCharacters -> False, LineIndent -> 0, 
                PrivateFontOptions -> {
                 FontWeight -> "Plain", "OperatorSubstitution" -> False}}]& ),
             Editable -> False, InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityFramelessHot"], ShowStringCharacters -> False, 
          TemplateBoxOptions -> {
           DisplayFunction -> (PaneSelectorBox[{True -> GridBox[{{
                   
                   StyleBox[#, FontWeight -> "Bold", FontFamily -> 
                    "Source Sans Pro", FontColor -> GrayLevel[0]], 
                   StyleBox[
                    RowBox[{"(", #4, ")"}], FontWeight -> "Plain", FontFamily -> 
                    "Source Sans Pro", FontColor -> GrayLevel[0], Selectable -> 
                    False]}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}}, 
                 BaselinePosition -> {1, 1}], False -> 
               PaneBox[#, BaseStyle -> {FontColor -> GrayLevel[0]}, 
                 BaselinePosition -> Baseline]}, 
              Dynamic[
               CurrentValue[Evaluatable]], ImageSize -> Automatic, 
              BaselinePosition -> Baseline, 
              BaseStyle -> {
               FontWeight -> "Plain", FontFamily -> "Helvetica", 
                ShowStringCharacters -> False, LineIndent -> 0, 
                PrivateFontOptions -> {"OperatorSubstitution" -> False}}]& ), 
            Editable -> False, InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityClass"], ShowStringCharacters -> False, 
          TemplateBoxOptions -> {DisplayFunction -> (TooltipBox[
              FrameBox[
               PaneSelectorBox[{True -> GridBox[{{
                    PaneBox[
                    DynamicBox[
                    FEPrivate`ImportImage[
                    
                    FrontEnd`ToFileName[{"Typeset", "Entity"}, 
                    "EntityClass.png"]], ImageSizeCache -> {8., {2., 6.}}], 
                    BaselinePosition -> Bottom], 
                    
                    StyleBox[#, FontWeight -> "Bold", FontFamily -> 
                    "Source Sans Pro", FontColor -> 
                    RGBColor[0.395437, 0.20595, 0.061158]], 
                    StyleBox[
                    RowBox[{"(", #4, ")"}], FontWeight -> "Plain", FontFamily -> 
                    "Source Sans Pro", FontColor -> GrayLevel[0.65], 
                    Selectable -> False]}}, 
                   GridBoxItemSize -> {
                    "Columns" -> {{All}}, "Rows" -> {{All}}}, 
                   GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}},
                    BaselinePosition -> {1, 2}], False -> GridBox[{{
                    PaneBox[
                    DynamicBox[
                    FEPrivate`ImportImage[
                    
                    FrontEnd`ToFileName[{"Typeset", "Entity"}, 
                    "EntityClass.png"]], ImageSizeCache -> {8., {2., 6.}}], 
                    BaselinePosition -> Bottom], 
                    
                    StyleBox[#, FontColor -> 
                    RGBColor[0.395437, 0.20595, 0.061158]]}}, 
                   GridBoxItemSize -> {
                    "Columns" -> {{All}}, "Rows" -> {{All}}}, 
                   GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}},
                    BaselinePosition -> {1, 2}]}, 
                Dynamic[
                 CurrentValue[Evaluatable]], ImageSize -> Automatic, 
                BaselinePosition -> Baseline, 
                BaseStyle -> {FontFamily -> "Helvetica"}], FrameStyle -> 
               RGBColor[1., 0.504768, 0.], Background -> 
               RGBColor[1., 0.980392, 0.921569], 
               FrameMargins -> {{5, 5}, {1.5, 1.5}}, 
               ImageMargins -> {{2, 2}, {2, 2}}, BaselinePosition -> Baseline,
                RoundingRadius -> 4], #3, 
              BaseStyle -> {
               FontWeight -> "Plain", ShowStringCharacters -> False, 
                LineIndent -> 0, 
                PrivateFontOptions -> {"OperatorSubstitution" -> False}}]& ), 
            Editable -> False, InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityClassFrameless"], ShowStringCharacters -> False, 
          TemplateBoxOptions -> {DisplayFunction -> (TooltipBox[
              PaneSelectorBox[{True -> GridBox[{{
                    PaneBox[
                    DynamicBox[
                    FEPrivate`ImportImage[
                    
                    FrontEnd`ToFileName[{"Typeset", "Entity"}, 
                    "EntityClass.png"]], ImageSizeCache -> {8., {2., 6.}}], 
                    BaselinePosition -> Bottom], 
                    
                    StyleBox[#, FontWeight -> "Bold", FontFamily -> 
                    "Source Sans Pro", FontColor -> 
                    RGBColor[0.395437, 0.20595, 0.061158]], 
                    StyleBox[
                    RowBox[{"(", #4, ")"}], FontWeight -> "Plain", FontFamily -> 
                    "Source Sans Pro", FontColor -> GrayLevel[0.65], 
                    Selectable -> False]}}, 
                  GridBoxItemSize -> {
                   "Columns" -> {{All}}, "Rows" -> {{All}}}, 
                  GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}}, 
                  BaselinePosition -> {1, 2}], False -> GridBox[{{
                    PaneBox[
                    DynamicBox[
                    FEPrivate`ImportImage[
                    
                    FrontEnd`ToFileName[{"Typeset", "Entity"}, 
                    "EntityClass.png"]], ImageSizeCache -> {8., {2., 6.}}], 
                    BaselinePosition -> Bottom], 
                    
                    StyleBox[#, FontColor -> 
                    RGBColor[0.395437, 0.20595, 0.061158]]}}, 
                  GridBoxItemSize -> {
                   "Columns" -> {{All}}, "Rows" -> {{All}}}, 
                  GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}}, 
                  BaselinePosition -> {1, 2}]}, 
               Dynamic[
                CurrentValue[Evaluatable]], ImageSize -> Automatic, 
               BaselinePosition -> Baseline, 
               BaseStyle -> {FontFamily -> "Helvetica"}], #3, 
              BaseStyle -> {
               FontWeight -> "Plain", ShowStringCharacters -> False, 
                LineIndent -> 0, 
                PrivateFontOptions -> {"OperatorSubstitution" -> False}}]& ), 
            Editable -> False, InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityClassFramelessHot"], ShowStringCharacters -> False,
           TemplateBoxOptions -> {
           DisplayFunction -> (PaneSelectorBox[{True -> GridBox[{{
                   PaneBox[
                    DynamicBox[
                    FEPrivate`ImportImage[
                    
                    FrontEnd`ToFileName[{"Typeset", "Entity"}, 
                    "EntityClass.png"]], ImageSizeCache -> {8., {2., 6.}}], 
                    BaselinePosition -> Bottom], 
                   
                   StyleBox[#, FontWeight -> "Bold", FontFamily -> 
                    "Source Sans Pro", FontColor -> GrayLevel[0]], 
                   StyleBox[
                    RowBox[{"(", #4, ")"}], FontWeight -> "Plain", FontFamily -> 
                    "Source Sans Pro", FontColor -> GrayLevel[0], Selectable -> 
                    False]}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}}, 
                 BaselinePosition -> {1, 2}], False -> GridBox[{{
                   PaneBox[
                    DynamicBox[
                    FEPrivate`ImportImage[
                    
                    FrontEnd`ToFileName[{"Typeset", "Entity"}, 
                    "EntityClass.png"]], ImageSizeCache -> {8., {2., 6.}}], 
                    BaselinePosition -> Bottom], 
                   StyleBox[#, FontColor -> GrayLevel[0]]}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}}, 
                 BaselinePosition -> {1, 2}]}, 
              Dynamic[
               CurrentValue[Evaluatable]], ImageSize -> Automatic, 
              BaselinePosition -> Baseline, 
              BaseStyle -> {
               FontWeight -> "Plain", FontFamily -> "Helvetica", 
                ShowStringCharacters -> False, LineIndent -> 0, 
                PrivateFontOptions -> {"OperatorSubstitution" -> False}}]& ), 
            Editable -> False, InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityProperty"], ContextMenu -> 
          FEPrivate`FrontEndResource["ContextMenus", "Entity"], 
          AutoStyleOptions -> {"HighlightSyntaxErrors" -> False}, 
          ShowStringCharacters -> False, 
          TemplateBoxOptions -> {DisplayFunction -> (TooltipBox[
              FrameBox[
               
               PaneBox[#, 
                BaseStyle -> {
                 FontSlant -> Italic, FontWeight -> Plain, FontFamily -> 
                  "Helvetica", FontSize -> 0.85 Inherited, FontColor -> 
                  RGBColor[0.395437, 0.20595, 0.061158]}, BaselinePosition -> 
                Baseline], FrameStyle -> Directive[
                 RGBColor[0.94227, 0.703639, 0.033387], 
                 AbsoluteThickness[1]], Background -> 
               RGBColor[1., 0.980392, 0.921569], 
               FrameMargins -> {{5, 5}, {1.5, 1.5}}, 
               ImageMargins -> {{2, 2}, {2, 2}}, BaselinePosition -> Baseline,
                RoundingRadius -> 4, 
               BaseStyle -> {FontFamily -> "Courier"}], #3, 
              BaseStyle -> {
               ShowStringCharacters -> False, LineIndent -> 0, 
                PrivateFontOptions -> {"OperatorSubstitution" -> False}}, 
              TooltipDelay -> 0.4]& ), Editable -> False, 
            InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityPropertyClass"], ShowStringCharacters -> False, 
          TemplateBoxOptions -> {DisplayFunction -> (TooltipBox[
              FrameBox[
               PaneBox[
                GridBox[{{
                   PaneBox[
                    DynamicBox[
                    FEPrivate`ImportImage[
                    
                    FrontEnd`ToFileName[{"Typeset", "Entity"}, 
                    "EntityClass.png"]], ImageSizeCache -> {8., {2., 6.}}], 
                    BaselinePosition -> Bottom], #}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {"Columns" -> {{0.2}}, "Rows" -> {{0}}}, 
                 BaselinePosition -> {1, 2}], 
                BaseStyle -> {
                 FontSlant -> Italic, FontWeight -> Plain, FontFamily -> 
                  "Source Sans Pro", FontColor -> 
                  RGBColor[0.395437, 0.20595, 0.061158]}, BaselinePosition -> 
                Baseline], FrameStyle -> 
               RGBColor[0.94227, 0.703639, 0.033387], Background -> 
               RGBColor[1., 0.980392, 0.921569], 
               FrameMargins -> {{5, 5}, {1.5, 1.5}}, 
               ImageMargins -> {{2, 2}, {2, 2}}, BaselinePosition -> Baseline,
                RoundingRadius -> 4], #3, 
              BaseStyle -> {
               FontWeight -> "Plain", ShowStringCharacters -> False, 
                LineIndent -> 0, 
                PrivateFontOptions -> {"OperatorSubstitution" -> False}}]& ), 
            Editable -> False, InterpretationFunction -> (#2& )}], 
         Cell[
          StyleData["EntityValue"], ShowStringCharacters -> False, 
          TemplateBoxOptions -> {DisplayFunction -> (FrameBox[
              
              GridBox[{{#, #2}}, GridBoxAlignment -> {"Rows" -> {{Baseline}}},
                GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, 
               GridBoxSpacings -> {"Columns" -> {{0}}}, 
               BaselinePosition -> {1, 1}], Background -> 
              RGBColor[{0.9921568627450981, 0.9529411764705882, 
                0.8509803921568627}], BaselinePosition -> Baseline, 
              FrameMargins -> {{1, 1}, {1, 1}}, ImageMargins -> 2, FrameStyle -> 
              RGBColor[{0.9333333333333333, 0.8470588235294118, 
                0.5529411764705883}], RoundingRadius -> 5]& )}]}, Open]]}, 
     Open]], 
   Cell[
    CellGroupData[{
      Cell["Template Boxes", "Section"], 
      Cell[
       StyleData["BannerTemplate"], 
       TemplateBoxOptions -> {DisplayFunction :> (TagBox[
           GridBox[{{
              Slot["label"], 
              Slot["previous"], 
              TemplateBox[{10}, "Spacer1"], 
              Slot["next"], 
              TemplateBox[{10}, "Spacer1"], 
              Slot["menu"]}}, 
            GridBoxAlignment -> {
             "Columns" -> {{Left, Right}}, "Rows" -> {{Center}}}, AutoDelete -> 
            False, GridBoxFrame -> {"Columns" -> None, "Rows" -> {{None}}}, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {"Columns" -> {{0}}, "Rows" -> {{0}}}], 
           "Grid"]& )}], 
      Cell[
       StyleData["BannerHeadingTitleTemplate"], 
       TemplateBoxOptions -> {DisplayFunction :> (PanelBox[
           TagBox[
            GridBox[{{
               StyleBox[
                Slot["heading"], "BannerHeading", StripOnInput -> False]}, {
               Slot["title"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, 
             DefaultBaseStyle -> "Column", 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{0.2}}}], "Column"], 
           Appearance -> None, ContentPadding -> False, BaseStyle -> "Banner",
            FrameMargins -> {{18, 20}, {6.75, 6}}, 
           ImageSize -> {Full, Automatic}]& )}], 
      Cell[
       StyleData["BannerButtonTemplate"], 
       LightDarkAutoColorRules -> <|"MarkedColors" -> True|>, 
       TemplateBoxOptions -> {DisplayFunction :> (ButtonBox[
           
           PanelBox[#, ContentPadding -> False, 
            FrameMargins -> {{10, 10}, {7, 7}}, Appearance -> None, BaseStyle -> 
            Dynamic[
              FEPrivate`If[
               CurrentValue["MouseOver"], {
               Background -> 
                RGBColor[
                 0.08808648687787803, 0.3397116701677621, 
                  0.5610151372105242]}, "Banner"], Evaluator -> "System"]], 
           ButtonFunction -> #2, Appearance -> None, 
           FrameMargins -> {{0, 0}, {-1, -1}}, Enabled -> True, Evaluator -> 
           Automatic, Method -> "Preemptive"]& )}], 
      Cell[
       StyleData["BannerLeftArrowTemplate"], 
       TemplateBoxOptions -> {DisplayFunction -> (GraphicsBox[{
            CapForm["Round"], 
            JoinForm["Round"], 
            Thickness[0.1], 
            GrayLevel[1], 
            LineBox[{{25, 180}, {-25, 0}, {25, -180}}]}, {
           Method -> {"ShrinkWrap" -> True}, ImageSize -> 12, 
            PlotRange -> {{-75, 100}, {-275, 400}}, AspectRatio -> 1}]& )}], 
      Cell[
       StyleData["BannerRightArrowTemplate"], 
       TemplateBoxOptions -> {DisplayFunction -> (GraphicsBox[{
            CapForm["Round"], 
            JoinForm["Round"], 
            Thickness[0.1], 
            GrayLevel[1], 
            LineBox[{{-25, -180}, {25, 0}, {-25, 180}}]}, {
           Method -> {"ShrinkWrap" -> True}, ImageSize -> 12, 
            PlotRange -> {{-75, 100}, {-275, 400}}, AspectRatio -> 1}]& )}], 
      Cell[
       StyleData["PrettyTooltipTemplate"], 
       TemplateBoxOptions -> {DisplayFunction -> (TooltipBox[#, 
           FrameBox[
            
            StyleBox[#2, FontFamily -> "Source Sans Pro", FontColor -> 
             RGBColor[0.53725, 0.53725, 0.53725], FontSize -> 12, FontWeight -> 
             "Plain", FontTracking -> "Plain", StripOnInput -> False], 
            Background -> RGBColor[0.96078, 0.96078, 0.96078], FrameStyle -> 
            RGBColor[0.89804, 0.89804, 0.89804], FrameMargins -> 8, 
            StripOnInput -> False], TooltipDelay -> 0.1, 
           TooltipStyle -> {Background -> None, CellFrame -> 0}]& )}], 
      Cell[
       StyleData["BannerMenuTemplate"], 
       LightDarkAutoColorRules -> <|"MarkedColors" -> True|>, 
       TemplateBoxOptions -> {DisplayFunction :> (ActionMenuBox[
           TagBox[
            PanelBox[
             GraphicsBox[{
               CapForm["Round"], 
               GrayLevel[1], 
               AbsoluteThickness[3.2], 
               LineBox[{{0, 0}, {2, 0}}], 
               LineBox[{{0, 1}, {2, 1}}], 
               LineBox[{{0, 2}, {2, 2}}]}, ImageSize -> {27, Automatic}, 
              AspectRatio -> 0.62], ContentPadding -> False, 
             FrameMargins -> {{10, 10}, {7, 7}}, Appearance -> None, 
             BaseStyle -> Dynamic[
               FEPrivate`If[
                CurrentValue["MouseOver"], {
                Background -> 
                 RGBColor[
                  0.08808648687787803, 0.3397116701677621, 
                   0.5610151372105242]}, "Banner"], Evaluator -> "System"]], 
            MouseAppearanceTag["LinkHand"]], #, Appearance -> None]& )}], 
      Cell[
       StyleData["BannerCitationOpenerTemplate"], 
       TemplateBoxOptions -> {DisplayFunction :> (ButtonBox[
           TagBox[
            GridBox[{{
               Slot["label"], 
               PaneSelectorBox[{True -> GraphicsBox[{
                    CapForm["Round"], 
                    JoinForm["Round"], 
                    Thickness[0.18], 
                    GrayLevel[0.7], 
                    LineBox[{{-180, 25}, {0, -25}, {180, 25}}]}, {
                   Method -> {"ShrinkWrap" -> True}, ImageSize -> 11, 
                    PlotRange -> {{-275, 400}, {-75, 100}}, AspectRatio -> 
                    1}], False -> GraphicsBox[{
                    CapForm["Round"], 
                    JoinForm["Round"], 
                    Thickness[0.18], 
                    GrayLevel[0.7], 
                    LineBox[{{-25, -180}, {25, 0}, {-25, 180}}]}, {
                   Method -> {"ShrinkWrap" -> True}, ImageSize -> 8, 
                    PlotRange -> {{-75, 100}, {-475, 200}}, AspectRatio -> 
                    1}]}, 
                Dynamic[
                 CurrentValue[
                  EvaluationNotebook[], {
                  TaggingRules, "eTextbook", "CitationOpener"}]]]}}, 
             GridBoxAlignment -> {"Rows" -> {{Baseline}}}, AutoDelete -> 
             False, GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], 
           ButtonFunction :> (CurrentValue[
              EvaluationNotebook[], {
              TaggingRules, "eTextbook", "CitationOpener"}] = Not[
              TrueQ[
               CurrentValue[
                EvaluationNotebook[], {
                TaggingRules, "eTextbook", "CitationOpener"}]]]), Appearance -> 
           None, Evaluator -> Automatic, Method -> "Preemptive", BaseStyle -> 
           "BannerCitationOpenerLabel"]& )}], 
      Cell[
       StyleData["CitationClickToCopy2"], 
       TemplateBoxOptions -> {DisplayFunction -> (TagBox[
           DynamicModuleBox[{Typeset`boxobj$$, Typeset`cellobj$$}, 
            TagBox[
             TagBox[
              ButtonBox[
               
               TagBox[#, BoxForm`Undeploy, 
                DefaultBaseStyle -> {Deployed -> False}], ButtonFunction :> 
               FrontEndExecute[{
                  CopyToClipboard[
                   Cell[
                    TextData[#2], "Text", 
                    LinebreakAdjustments -> {0.85, 2, 10, 0, 1}, 
                    DefaultFormatType -> DefaultTextFormatType, 
                    TextClipboardType -> "PlainText", StripStyleOnPaste -> 
                    True, PageBreakWithin -> False, GroupPageBreakWithin -> 
                    False, LanguageCategory -> None, 
                    HyphenationOptions -> {"HyphenationCharacter" -> ""}]], 
                  NotebookDelete[Typeset`cellobj$$], 
                  FrontEnd`AttachCell[Typeset`boxobj$$, 
                   Cell[
                    BoxData[
                    TemplateBox[{"Copied"}, "ClickToCopyTooltip"]]], {
                   1, {Center, Bottom}}, {Center, Top}, 
                   "ClosingActions" -> {"ParentChanged", "MouseExit"}]}], 
               Evaluator -> None, 
               Appearance -> {
                "Default" -> None, "Hover" -> 
                 FrontEnd`FileName[{"Typeset", "ClickToCopy"}, "Hover.9.png"],
                  "Pressed" -> 
                 FrontEnd`FileName[{"Typeset", "ClickToCopy"}, 
                   "Pressed.9.png"]}, BaseStyle -> {}, DefaultBaseStyle -> {},
                BaselinePosition -> Baseline, FrameMargins -> 2, Method -> 
               "Preemptive"], 
              
              EventHandlerTag[{
               "MouseEntered" :> (Typeset`cellobj$$ = MathLink`CallFrontEnd[
                   FrontEnd`AttachCell[Typeset`boxobj$$, 
                    Cell[
                    BoxData[
                    TemplateBox[{"Copy"}, "ClickToCopyTooltip"]]], {
                    1, {Center, Bottom}}, {Center, Top}, 
                    "ClosingActions" -> {"ParentChanged"}]]), "MouseExited" :> 
                NotebookDelete[Typeset`cellobj$$], PassEventsDown -> True, 
                Method -> "Preemptive", PassEventsUp -> True}]], 
             MouseAppearanceTag["LinkHand"]], 
            Initialization :> (Typeset`boxobj$$ = EvaluationBox[]), 
            DynamicModuleValues :> {}, 
            UnsavedVariables :> {Typeset`boxobj$$, Typeset`cellobj$$}, 
            BaseStyle -> {Editable -> False}], Deploy, DefaultBaseStyle -> 
           "Deploy"]& ), 
         InterpretationFunction -> (RowBox[{"ClickToCopy", "[", 
            RowBox[{#, ",", #2}], "]"}]& ), Tooltip -> None}], 
      Cell[
       StyleData["BannerPreReleaseTemplate"], 
       TemplateBoxOptions -> {DisplayFunction :> (TagBox[
           GridBox[{{
              PanelBox[
               StyleBox[
                Slot["author"], FontWeight -> "SemiBold"], BaseStyle -> 
               "BannerPreReleaseLabel", Appearance -> None, ContentPadding -> 
               False, FrameMargins -> {{18, 20}, {6, 6}}, 
               ImageSize -> {Full, Automatic}], 
              TemplateBox[{"Provide Feedback \[RightGuillemet]", {
                 URL[
                  Slot["url"]], None}, 
                Slot["url"], "BannerPreReleaseLabel", {"HyperlinkActive"}, {
                Appearance -> None}}, "HyperlinkTemplate"]}}, 
            GridBoxAlignment -> {
             "Columns" -> {{Left, Right}}, "Rows" -> {{Center}}}, AutoDelete -> 
            False, GridBoxFrame -> {"Columns" -> None, "Rows" -> {{None}}}, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {"Columns" -> {{0}}, "Rows" -> {{0}}}], 
           "Grid"]& )}]}, Closed]]}, Visible -> False, FrontEndVersion -> 
  "14.3 for Mac OS X ARM (64-bit) (July 1, 2025)", StyleDefinitions -> 
  "PrivateStylesheetFormatting.nb"],
ETextbookTools`CreateNotebookCollection`Private`FileChangeProtection -> None,
ExpressionUUID->"eea0048a-26e1-491b-8563-745be5fead93"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[663, 24, 121, 1, 108, "Section",ExpressionUUID->"5f7cd867-0349-4198-9610-32586dd43656",
 CellID->276618326],
Cell[CellGroupData[{
Cell[809, 29, 38401, 1068, 4082, "Input",ExpressionUUID->"0280bde2-462d-4130-8f53-fef4b6a5a0b9",
 CellID->722611148],
Cell[39213, 1099, 96892, 2657, 4205, "Output",ExpressionUUID->"e3cb8387-e321-954f-ac21-6da1ceb11359",
 CellID->27975257]
}, {2}]]
}, Open  ]],
Cell[136129, 3760, 293, 6, 135, "SmallText",ExpressionUUID->"a1036ad9-deb3-4add-aacd-ab56c3790770",
 CellGroupingRules->"SectionGrouping"]
}
]
*)

(* NotebookSignature JSGcJD8C@@pLwkuyEvfXemUq *)
