(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 6.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[     95872,       2226]
NotebookOptionsPosition[     45344,       1250]
NotebookOutlinePosition[     94670,       2187]
CellTagsIndexPosition[     94337,       2175]
WindowFrame->Normal
ContainsDynamic->True *)

(* Beginning of Notebook Content *)
Notebook[{
Cell[GraphicsData["CompressedBitmap", "\<\
eJzd0bENgCAQBdAjXusOTKOVHQsQYgKF0SAFS7IEQ9Ai31jeBF7xcrl/3d9s
8vthU3BWr9FePrhbL2ccp0kRcSeiWRN2rB+9G2MkGODh73nOWYIB8lKKBAPk
tVYJBshbaxIM3gLkYTAaUg9sXRZb\
\>"], "ConferenceGraphicCell",
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{3.4044517282989883`*^9},
 ImageSize->{1279, 12},
 ImageMargins->0,
 CellMargin -> 0],

Cell[CellGroupData[{

Cell["Integrating Networks with Mathematica", "Title",
 Deletable->False,
 ShowCellBracket->False,
 CellMargins->0,
 CellFrameMargins->{{82, 9}, {9, 12}},
 CellChangeTimes->{{3.403263082620612*^9, 3.4032630828940496`*^9}, 
   3.4044517282993107`*^9, {3.4044557913138027`*^9, 3.404455822614788*^9}, {
   3.404562024007469*^9, 3.404562025070661*^9}, {3.4098242622370872`*^9, 
   3.4098242686022377`*^9}, {3.409832112299733*^9, 3.409832117863331*^9}},
 CellTags->"TitleCellTag"],

Cell["", "Subtitle",
 Deletable->False,
 CellFrame->True,
 ShowCellBracket->False,
 CellFrameMargins->{{22, 9}, {9, 12}},
 CellFrameColor->GrayLevel[1],
 CellChangeTimes->{
  3.403263736594829*^9, 3.4044517282995777`*^9, {3.4098325457085123`*^9, 
   3.4098326124021606`*^9}, {3.409832685519827*^9, 3.40983268931159*^9}, {
   3.4098327359614964`*^9, 3.409832736945375*^9}, {3.409832768879006*^9, 
   3.409832772014782*^9}, {3.409832870938908*^9, 3.4098328745459547`*^9}},
 FontColor->GrayLevel[0.3],
 CellTags->"SubtitleCellTag"],

Cell["Rudolf Strijkers", "Author",
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{
  3.4032637455746393`*^9, 3.4044517282998257`*^9, {3.404584517542654*^9, 
   3.404584518553927*^9}, {3.409832208681259*^9, 3.409832210838221*^9}, {
   3.417254095088941*^9, 3.417254095380669*^9}},
 CellTags->"AuthorsCellTag"],

Cell["University of Amsterdam", "Affiliation",
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{
  3.403263750852148*^9, 3.404451728300061*^9, 3.404584525685594*^9, {
   3.409832213310611*^9, 3.4098322164055*^9}},
 CellTags->"AffiliationCellTag"],

Cell["\<\
Please, insert in the above cells the title and subtitle of your submission, \
and fill in your name and affiliation.\
\>", "Text",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.40459075132924*^9, 3.404590829548059*^9}}],

Cell[CellGroupData[{

Cell["Address", "Subsection",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.403266626017964*^9, 3.403266627830145*^9}, {
  3.403269219880416*^9, 3.403269224261074*^9}}],

Cell["Please, provide your address.", "Text",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.403270401464829*^9, 3.403270425589073*^9}}],

Cell[BoxData[
 TagBox[GridBox[{
    {
     InterpretationBox[
      RowBox[{
       TagBox[
        DynamicModuleBox[{Typeset`i$$ = "Drs."}, 
         InputFieldBox[Dynamic[Typeset`i$$], String,
          FieldSize->3],
         DynamicModuleValues:>{}],
        InputField[
         Setting[#], String, FieldSize -> 3]& ], 
       "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", 
       TagBox[
        DynamicModuleBox[{Typeset`i$$ = "Rudolf"}, 
         InputFieldBox[Dynamic[Typeset`i$$], String,
          FieldSize->13],
         DynamicModuleValues:>{}],
        InputField[
         Setting[#], String, FieldSize -> 13]& ], 
       "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", 
       TagBox[
        DynamicModuleBox[{Typeset`i$$ = "Strijkers"}, 
         InputFieldBox[Dynamic[Typeset`i$$], String,
          FieldSize->24],
         DynamicModuleValues:>{}],
        InputField[
         Setting[#], String, FieldSize -> 24]& ]}],
      Row[{
        InputField["Title", String, FieldSize -> 3], " ", 
        InputField["First name", String, FieldSize -> 13], " ", 
        InputField["Family name", String, FieldSize -> 24]}]]},
    {
     InterpretationBox[
      TagBox[
       DynamicModuleBox[{Typeset`i$$ = "University of Amsterdam"}, 
        InputFieldBox[Dynamic[Typeset`i$$], String,
         FieldSize->42],
        DynamicModuleValues:>{}],
       InputField[
        Setting[#], String, FieldSize -> 42]& ],
      Row[{
        InputField["Company / Institution", String, FieldSize -> 42]}]]},
    {
     InterpretationBox[
      TagBox[
       DynamicModuleBox[{Typeset`i$$ = "Informatics Institute"}, 
        InputFieldBox[Dynamic[Typeset`i$$], String,
         FieldSize->42],
        DynamicModuleValues:>{}],
       InputField[
        Setting[#], String, FieldSize -> 42]& ],
      Row[{
        InputField["Department", String, FieldSize -> 42]}]]},
    {
     InterpretationBox[
      TagBox[
       DynamicModuleBox[{Typeset`i$$ = "Kruislaan 403"}, 
        InputFieldBox[Dynamic[Typeset`i$$], String,
         FieldSize->42],
        DynamicModuleValues:>{}],
       InputField[
        Setting[#], String, FieldSize -> 42]& ],
      Row[{
        InputField["Street", String, FieldSize -> 42]}]]},
    {
     InterpretationBox[
      RowBox[{
       TagBox[
        DynamicModuleBox[{Typeset`i$$ = "1098SJ"}, 
         InputFieldBox[Dynamic[Typeset`i$$], String,
          FieldSize->7],
         DynamicModuleValues:>{}],
        InputField[
         Setting[#], String, FieldSize -> 7]& ], 
       "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", 
       TagBox[
        DynamicModuleBox[{Typeset`i$$ = "Amsterdam"}, 
         InputFieldBox[Dynamic[Typeset`i$$], String,
          FieldSize->34],
         DynamicModuleValues:>{}],
        InputField[
         Setting[#], String, FieldSize -> 34]& ]}],
      Row[{
        InputField["Post code", String, FieldSize -> 7], " ", 
        InputField["City", String, FieldSize -> 34]}]]},
    {
     InterpretationBox[
      TagBox[
       DynamicModuleBox[{Typeset`i$$ = "Netherlands"}, 
        InputFieldBox[Dynamic[Typeset`i$$], String,
         FieldSize->42],
        DynamicModuleValues:>{}],
       InputField[
        Setting[#], String, FieldSize -> 42]& ],
      Row[{
        InputField["Country", String, FieldSize -> 42]}]]},
    {
     InterpretationBox[
      TagBox[
       DynamicModuleBox[{Typeset`i$$ = "+31622901201"}, 
        InputFieldBox[Dynamic[Typeset`i$$], String,
         FieldSize->42],
        DynamicModuleValues:>{}],
       InputField[
        Setting[#], String, FieldSize -> 42]& ],
      Row[{
        InputField["Phone", String, FieldSize -> 42]}]]},
    {
     InterpretationBox[
      TagBox[
       DynamicModuleBox[{Typeset`i$$ = "rjstrijk@science.uva.nl"}, 
        InputFieldBox[Dynamic[Typeset`i$$], String,
         FieldSize->42],
        DynamicModuleValues:>{}],
       InputField[
        Setting[#], String, FieldSize -> 42]& ],
      Row[{
        InputField["Email", String, FieldSize -> 42]}]]}
   },
   ColumnsEqual->False,
   GridBoxAlignment->{"Columns" -> {{Left}}},
   GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
   RowsEqual->False],
  "Column"]], "Output",
 Editable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.404567679495837*^9, 3.404567725798779*^9}, {
  3.4045678030614033`*^9, 3.40456782328544*^9}},
 CellTags->"AddressCellTag"]
}, Closed]],

Cell[CellGroupData[{

Cell["Classification", "Subsection",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.403266626017964*^9, 3.403266627830145*^9}}],

Cell[CellGroupData[{

Cell["Type of Submission", "Subsubsection",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.403266701891664*^9, 3.403266707004862*^9}}],

Cell["\<\
Please, identify the type of your contribution. Combinations are possible. \
Note, that only a journal paper will be a refereed publication. The other \
forms of contribution will be made available electronically.\
\>", "Text",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.403267287039316*^9, 3.403267301300005*^9}, {
   3.403267781488677*^9, 3.403267956921522*^9}, 3.4032682280600567`*^9, 
   3.4045679035581903`*^9}],

Cell[BoxData[
 TagBox[
  DynamicModuleBox[{BoxForm`var$$ = {1, 2, 4}}, 
   InterpretationBox[
    InterpretationBox[
     StyleBox[GridBox[{
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 1], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 1]& ]], 
             StyleBox["\<\" Journal Paper,\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 2], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 2]& ]], 
             StyleBox["\<\" 15 Minute Talk,\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 3], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 3]& ]], 
             StyleBox["\<\" 30 Minute Talk,\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 4], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 4]& ]], 
             
             StyleBox["\<\" \
\\!\\(\\*\\nStyleBox[\\\"MathPlayer\\\",\\nFontSlant->\\\"Italic\\\"]\\) \
Demonstration,\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 5], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 5]& ]], 
             StyleBox["\<\" Application Workshop,\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 6], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 6]& ]], 
             StyleBox["\<\" Discussion Panel.\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]}
       },
       GridBoxAlignment->{
        "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
          "RowsIndexed" -> {}}],
      Deployed->True],
     CheckboxBar[
      Dynamic[BoxForm`var$$], {
      1 -> Style[" Journal Paper,", "Text"], 2 -> 
       Style[" 15 Minute Talk,", "Text"], 3 -> 
       Style[" 30 Minute Talk,", "Text"], 4 -> 
       Style[" \!\(\*\nStyleBox[\"MathPlayer\",\nFontSlant->\"Italic\"]\) \
Demonstration,", "Text"], 5 -> Style[" Application Workshop,", "Text"], 6 -> 
       Style[" Discussion Panel.", "Text"]}, Appearance -> "Vertical"]],
    CheckboxBar[
    BoxForm`var$$, {
     1 -> Style[" Journal Paper,", "Text"], 2 -> 
      Style[" 15 Minute Talk,", "Text"], 3 -> 
      Style[" 30 Minute Talk,", "Text"], 4 -> 
      Style[" \!\(\*\nStyleBox[\"MathPlayer\",\nFontSlant->\"Italic\"]\) \
Demonstration,", "Text"], 5 -> Style[" Application Workshop,", "Text"], 6 -> 
      Style[" Discussion Panel.", "Text"]}, Appearance -> "Vertical"]],
   DynamicModuleValues:>{}],
  Setting[#, {0}]& ]], "Output",
 Editable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{
  3.403267255415381*^9, 3.403267375028865*^9, 3.403267437451901*^9, {
   3.403267705856166*^9, 3.40326771319215*^9}, {3.403267744841167*^9, 
   3.403267765064932*^9}, {3.404567365034992*^9, 3.404567370287383*^9}},
 CellTags->"SubmissionTypeCellTag"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Target Group", "Subsubsection",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 PageBreakAbove->True,
 CellChangeTimes->{{3.403266709486163*^9, 3.403266738352104*^9}}],

Cell["\<\
Check the appropriate session or target group(s) of your contribution. More \
than one selection is possible.\
\>", "Text",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.403266892487801*^9, 3.4032669124648323`*^9}, {
   3.403267492293839*^9, 3.403267530083167*^9}, {3.404562181888503*^9, 
   3.40456219052846*^9}, 3.404567291058028*^9}],

Cell[BoxData[
 TagBox[
  DynamicModuleBox[{BoxForm`var$$ = {4, 10, 19, 23, 25}}, 
   InterpretationBox[
    InterpretationBox[
     StyleBox[GridBox[{
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 1], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 1]& ]], 
             StyleBox["\<\" Geometry\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 2], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 2]& ]], 
             StyleBox["\<\" Calculus\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 3], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 3]& ]], 
             StyleBox["\<\" Algebra\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 4], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 4]& ]], 
             StyleBox["\<\" Combinatorics & Graphs\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 5], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 5]& ]], 
             StyleBox["\<\" Discrete Calculus\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 6], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 6]& ]], 
             StyleBox["\<\" Statistics & Stochastics\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 7], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 7]& ]], 
             StyleBox["\<\" Number Theory\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 8], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 8]& ]], 
             StyleBox["\<\" Symbolics\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 9], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 9]& ]], 
             StyleBox["\<\" Numerics & Functions\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 10], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 10]& ]], 
             StyleBox["\<\" Computer Science\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 11], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 11]& ]], 
             StyleBox["\<\" High-Performance Computing\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 12], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 12]& ]], 
             StyleBox["\<\" Physics\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 13], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 13]& ]], 
             StyleBox["\<\" Chemistry\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 14], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 14]& ]], 
             StyleBox["\<\" Biology\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 15], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 15]& ]], 
             StyleBox["\<\" Geology\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 16], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 16]& ]], 
             StyleBox["\<\" Life Science\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 17], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 17]& ]], 
             StyleBox["\<\" Engineering\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 18], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 18]& ]], 
             StyleBox["\<\" Education\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 19], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 19]& ]], 
             StyleBox["\<\" Graphics & Visualization\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 20], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 20]& ]], 
             StyleBox["\<\" Music, Art & Architecture\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 21], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 21]& ]], 
             StyleBox["\<\" Finance & Economics\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 22], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 22]& ]], 
             StyleBox["\<\" Data Sources\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 23], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 23]& ]], 
             StyleBox["\<\" Internet & Web-Technology\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 24], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 24]& ]], 
             StyleBox["\<\" Image Processing\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 25], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 25]& ]], 
             StyleBox["\<\" Dynamic & Interactive User Interfaces\"\>", 
              "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]},
        {
         TagBox[GridBox[{
            {
             CheckboxBox[Dynamic[
               MemberQ[BoxForm`var$$, 26], BoxForm`TogglerBarFunction[
               BoxForm`var$$, 26]& ]], 
             StyleBox["\<\" Miscellaneus & None of the above\"\>", "Text",
              StripOnInput->False]}
           },
           ColumnsEqual->False,
           
           GridBoxItemSize->{
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
           GridBoxSpacings->{"Columns" -> {
               Offset[0.27999999999999997`], {
                Offset[0.]}, 
               Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
             "Rows" -> {
               Offset[0.2], {
                Offset[0.4]}, 
               Offset[0.2]}, "RowsIndexed" -> {}},
           RowsEqual->False],
          "Grid"]}
       },
       GridBoxAlignment->{
        "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
          "RowsIndexed" -> {}}],
      Deployed->True],
     CheckboxBar[
      Dynamic[BoxForm`var$$], {
      1 -> Style[" Geometry", "Text"], 2 -> Style[" Calculus", "Text"], 3 -> 
       Style[" Algebra", "Text"], 4 -> 
       Style[" Combinatorics & Graphs", "Text"], 5 -> 
       Style[" Discrete Calculus", "Text"], 6 -> 
       Style[" Statistics & Stochastics", "Text"], 7 -> 
       Style[" Number Theory", "Text"], 8 -> Style[" Symbolics", "Text"], 9 -> 
       Style[" Numerics & Functions", "Text"], 10 -> 
       Style[" Computer Science", "Text"], 11 -> 
       Style[" High-Performance Computing", "Text"], 12 -> 
       Style[" Physics", "Text"], 13 -> Style[" Chemistry", "Text"], 14 -> 
       Style[" Biology", "Text"], 15 -> Style[" Geology", "Text"], 16 -> 
       Style[" Life Science", "Text"], 17 -> Style[" Engineering", "Text"], 
       18 -> Style[" Education", "Text"], 19 -> 
       Style[" Graphics & Visualization", "Text"], 20 -> 
       Style[" Music, Art & Architecture", "Text"], 21 -> 
       Style[" Finance & Economics", "Text"], 22 -> 
       Style[" Data Sources", "Text"], 23 -> 
       Style[" Internet & Web-Technology", "Text"], 24 -> 
       Style[" Image Processing", "Text"], 25 -> 
       Style[" Dynamic & Interactive User Interfaces", "Text"], 26 -> 
       Style[" Miscellaneus & None of the above", "Text"]}, Appearance -> 
      "Vertical"]],
    CheckboxBar[
    BoxForm`var$$, {
     1 -> Style[" Geometry", "Text"], 2 -> Style[" Calculus", "Text"], 3 -> 
      Style[" Algebra", "Text"], 4 -> 
      Style[" Combinatorics & Graphs", "Text"], 5 -> 
      Style[" Discrete Calculus", "Text"], 6 -> 
      Style[" Statistics & Stochastics", "Text"], 7 -> 
      Style[" Number Theory", "Text"], 8 -> Style[" Symbolics", "Text"], 9 -> 
      Style[" Numerics & Functions", "Text"], 10 -> 
      Style[" Computer Science", "Text"], 11 -> 
      Style[" High-Performance Computing", "Text"], 12 -> 
      Style[" Physics", "Text"], 13 -> Style[" Chemistry", "Text"], 14 -> 
      Style[" Biology", "Text"], 15 -> Style[" Geology", "Text"], 16 -> 
      Style[" Life Science", "Text"], 17 -> Style[" Engineering", "Text"], 18 -> 
      Style[" Education", "Text"], 19 -> 
      Style[" Graphics & Visualization", "Text"], 20 -> 
      Style[" Music, Art & Architecture", "Text"], 21 -> 
      Style[" Finance & Economics", "Text"], 22 -> 
      Style[" Data Sources", "Text"], 23 -> 
      Style[" Internet & Web-Technology", "Text"], 24 -> 
      Style[" Image Processing", "Text"], 25 -> 
      Style[" Dynamic & Interactive User Interfaces", "Text"], 26 -> 
      Style[" Miscellaneus & None of the above", "Text"]}, Appearance -> 
     "Vertical"]],
   DynamicModuleValues:>{}],
  Setting[#, {0}]& ]], "Output",
 Editable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{
  3.403266887290309*^9, {3.4032669474745607`*^9, 3.4032669703991003`*^9}, 
   3.403267078391968*^9, {3.403269056377727*^9, 3.403269069752613*^9}, 
   3.403269175843025*^9, 3.403270288161867*^9, 3.403270339730583*^9},
 ImageSize->{147, 17},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellTags->"TargetGroupCellTag"]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["Abstract", "Subsection",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 PageBreakAbove->True],

Cell["\<\
The abstract should be a brief, one page summary of your contribution, \
sufficient to judge the relevance, extent, and quality of your submission.\
\>", "Text",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.40326368390425*^9, 3.403263796540056*^9}, {
   3.403263840726473*^9, 3.403263843411931*^9}, 3.4032638768867064`*^9, {
   3.403263915539611*^9, 3.403263924124349*^9}, {3.403265971155119*^9, 
   3.403265986403715*^9}, {3.403266492149962*^9, 3.4032664941389027`*^9}, 
   3.403266612577817*^9, {3.4045622297042713`*^9, 3.404562267224968*^9}}],

Cell["\<\
We have developed a concept in which a network,as a whole,is considered as a \
collection of software services that can be used in computer programs. This \
way, networks can be programmed to support applications with specific service \
requirements.Furthermore, networks can be programmed to adapt automatically \
to new situations, as a changed topology or higher bandwidth requirements of \
a group of users. This article shows how these network programs can be \
developed in Mathematica, benefiting from Mathematica\[CloseCurlyQuote]s \
large collection of algorithms. As an illustration,we show how users can \
manipulate fiber-optic paths of the Starplane research network. Within \
notebooks, users can interact with the network for performing network \
analysis to find and resolve articulation vertices or to write complex \
provisioning algorithms such as k-disjoint shortest paths. Moreover,real-time \
visualization of the network resources, also in a Mathematica \
notebook,immediately shows the effects of the manipulations. Another example \
presents a Mathematica program, which moves running virtual operating systems \
to optimal locations in a continuous cycle of monitoring,optimization and \
adaptation. The optimal locations are modeled as a linear program with \
parameters such as energy consumption, which is solved every cycle with \
values retrieved from the ICT infrastructure. The presented examples make \
extensive use of Mathematica\[CloseCurlyQuote]s dynamic interactivity and \
Combinatorica package, but also of web services and the seamless interface to \
Java.\
\>", "Text",
 CellChangeTimes->{{3.417238839349231*^9, 3.417238847942878*^9}}],

Cell[TextData[{
 "After you are done, save this template notebook under the title of your \
contribution by hitting this button ",
 Cell[BoxData[
  ButtonBox["\<\"Save Abstract\"\>",
   Appearance->Automatic,
   ButtonFrame->"DialogBox",
   ButtonFunction:>
    Module[{$CellContext`titleString, $CellContext`authorString, \
$CellContext`nb = ButtonNotebook[]}, NotebookLocate["AuthorsCellTag"]; 
     SelectionMove[$CellContext`nb, All, 
       CellContents]; $CellContext`authorString = (StringTake[#, 
        Min[12, 
         StringLength[#]]]& )[
        First[
         StringCases[
          NotebookRead[$CellContext`nb], 
          Repeated[WordCharacter], 1]]]; NotebookLocate["TitleCellTag"]; 
     SelectionMove[$CellContext`nb, All, 
       CellContents]; $CellContext`titleString = (StringTake[#, 
        Min[32, 
         StringLength[#]]]& )[
        StringJoin[
         StringCases[
          NotebookRead[$CellContext`nb], 
          Repeated[WordCharacter]]]]; 
     NotebookLocate["SaveButtonCellTag"] NotebookSave[$CellContext`nb, 
        ToFileName[
         NotebookDirectory[], 
         StringJoin[
         "IMS abstract.", $CellContext`authorString, 
          ".", $CellContext`titleString, ".nb"]]]; DeleteFile[
       FileNames[
        ToFileName[
         NotebookDirectory[$CellContext`nb], "IMS abstract template.nb"]]]],
   Evaluator->Automatic,
   Method->"Preemptive"]],
  CellChangeTimes->{3.4045653751745768`*^9, 3.4045654284571943`*^9, 
   3.404565474974852*^9, 3.404565529308681*^9}],
 ",\nand upload the resulting notebook file via the ",
 ButtonBox["IMS submission website",
  BaseStyle->"Hyperlink",
  ButtonData->{
    URL["http://www.InternationalMathematicaSymposium.org"], None}],
 ". Thank you!"
}], "Text",
 Editable->False,
 Selectable->False,
 Deletable->False,
 ShowCellBracket->False,
 CellChangeTimes->{{3.403271092478403*^9, 3.403271164479529*^9}, {
   3.403271210964673*^9, 3.4032712220424213`*^9}, {3.404565664134261*^9, 
   3.404565696289783*^9}, 3.4045906073195963`*^9},
 CellTags->"SaveButtonCellTag"]
}, Closed]]
}, Open  ]]
},
WindowToolbars->{},
WindowSize->{1280, 976},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
ShowSelection->True,
FrontEndVersion->"6.0 for Mac OS X x86 (32-bit) (February 7, 2008)",
StyleDefinitions->Notebook[{
   Cell[
    StyleData[StyleDefinitions -> "Default.nb"]], 
   Cell[
    StyleData["Notebook"], DockedCells -> {
      Cell[
       GraphicsData[
       "CompressedBitmap", 
        "eJzFXQvQXVV1Pt5z7v3v/0p4tdViW6y2ik6xFFREdLRQGJypmj5sq7aWEh5O\n\
RVvCdHTqDI6dUadSOyKVxgc6OtKAoSqDSIiMAYVgQkw0JiQKCkjMJGMwEBry\n\
IDld39pr7bP2Pvuce+7/J3Bm7v3/u88++7ke315r7X3+9IIrLr3osguueNeF\n\
F5x03uUX/NOl77pwyUnnvvdySsqfk2VFmWXZ6Sdl+B//yldZ7t27N/VV4AsZ\n\
HnnkkdRXgS/cX7duXeqrwBfVkJe4frRxI/5kPf7Oy4cfeojT6a+k9TlN8kX3\n\
cp+OtFy+d+/4BT/j8lEO6uO6+9ZxXqTv3LqBH8wG5Wf/+5ry3//x0vLS836n\n\
vPDUE8p3/sk55dev+Y9eeccd35LSpfZsyN+5b03Vigmb5v+iFRvWr8/KxHUn\n\
P+eGoIfcrqDCd1+61I+SpVecu3D/UXU5eteT5lGV5RV/cU751lOOpQfpO0fH\n\
qKuXnXZy+dUPvNuPBDLSXx6a3BVDBRa+Sal23+XaHU+W+1VPc/mGPg1DosOj\n\
v+nKfU96aAy1FZm0nfjQbKAX/fLPX7xgwF3jXpVf/PD7q1nRETAPUlGYpsIP\n\
nv2bnhOZdWmamaJ+U6eZQLNJkJVvMDKhHUoQaCiaPUAPhvIvMpjJ5r86GaYf\n\
nrR7rXMj7U81MzVfvbDEqp9EztoD7YX+JvKhu9SDHD3g2XA0xoQlpWsh2is7\n\
JDKvjqdFAshjST5Z5fqUoi3T4LCcdGdLITNqGOYJBKU9xP/f+NAZzCbcO3r4\n\
kpcez/3CL54zajIILpoux5qRoOh5ZnrEVXv48OElrrX0Hw/Mc/Ff1NfzXV+t\n\
0LOX72iHua1N5lV/dT53CX8/eu7vlj9bfDr+Jrs7lLRvfmmpl6LxfPluCplq\n\
vtQcfsf1a9K3qbkXfRXPfm6owXSPmkf5r3rJb5d7PnJmufzdL5M5Kco3P2+a\n\
Gy8dmJRkCEAzcJVQowdxWZoUOTiKrwZRq/2AGPkd9wkD5JQD+F/biX5gAtZ8\n\
/MxkP+gzLSSHtulQxEQgEqoSD5UyHN0DFW+xgpErF7FJqpCbdMVLf6O8/g0v\n\
6ZU/f98rKRlJ1ED95Gg+Rp1y/csZJzKj0GRMCyFhMrZuuU+IppLHqqb93FRi\n\
2us57dFD0vYD2x8sV/zv18r7H9ufzUrawSceK9dveqDcHwiRda7TjaIvNxSn\n\
1YpAFq4ecjokmw7BzX/8MoxA+fj7XwX26dnOY1avPuuF3Hn6zBrhiDH55KV/\n\
hk+eYgCLXcwUus78VFq0a/V15dlnn12e9ebLy61PHZqRMp687/PlH73t2vLJ\n\
w2V2iaSV+3aU13/pNk6rBuRCNyBuymtUVbFIhQWyKd8cjAJmOx6FVW/5Q6Qz\n\
AVPJuP2RM0/SQWA9t0CEKH5jIPHX1Gx4082/UT6vkA7t3r27vH/zZoZTKnbu\n\
/+nPy507d/Ks/zbnGzAlKGuDdZCHBmGy223Qo9TCH9DUo0/sUzIrDx9g8nt6\n\
/V3UiEOb11Pa/ge3IplzDJWhaPSRTjnc31/uDRqo9/T+4b2H7W29RdW4rIcO\n\
/YHc1hZoFvxPSa+S23v3HfSTfeCpp3jUaHQWmPY//vjj5dMHD3qQYB7xcgWP\n\
Ih8Gdirx7Akdy5sw5UlTstk5tEWf7SWeFaWyZ88eqm5/GV2HnnAKb8WmbEYm\n\
58APv1ieftFnMe2+k0Wi45pGJZdPPLlPJ6CW9oJEo4pEWj/xrHZy1KC5SShc\n\
Pipz+d8tKpdu2nV8IusxibRirGrCZs+YfNrs1NBUY+4GSVd3ASZrE/KOMmwy\n\
/wYGUbFD+qf81Xuc2IH6dKsAyJ3cq1X6UF0AcrniGZY+VhqrmiUWV/ioqtQ3\n\
lRXAcToge7byGvHiiy+mu/jOy39YcnX54x1bkE6/kNYv3/OfX2a60uupLSuo\n\
StwblO/84P+UOw6Zm65M9+gESDQkXZqDH626vfy3JReRXHFVfuLT15drH9oR\n\
kCJVgbucY1aasfzHj/liIFBIh1N+V8bn7nlA2cTPo+SRp5vzbfvBSrQnyIcu\n\
kyrmHENDP+Wdnymffu/LqV58E6187uOQg0F5kJPlssWco5B8jy35+/Lgz36F\n\
ez7twK3reLjcL0n76H/5CVM2Kh+8FXc5R09q52ftdd8NoJ+BKYarM0MKCaHF\n\
zPJ3X/P4mTt87SJKdWUcXHJuefB7W/jpycYycluGlwb1Jve1rOpau5RYc5xu\n\
57bb2fP4eyG3G9YNkhyBFMQV/KZpAVgB1kDezcs/RuXSLxIubzjvL5k0as+M\n\
+A0ypbpdMdNMNSjqW9v3BdV9atmnqiKIijZ9folUPcP5lbI7VzUIqjLZ3ODN\n\
lP/3gxsYUG3Ao6QublzypvKMDyxztE8D9vY3voPvBaUu7NYBurR4wmvcoWos\n\
F7aO5Y+WXlResuz77gc1SyS+NiMbdyCregtuD/IHXcptUcKhg3L7vTcxyaBI\n\
fHCfJJVTxM/lkrFubqOCpp5gZFAc1gZatBdcbupdy/rhrd0bZEmIexNcFeRP\n\
UK2bR8kzW176tnP9vY7NE104R/roB/MSzll4L+zOAt+dNpoKuuDmVklKpzbu\n\
ZUCGpmiQn7B5JZIqMSGIa7K9vIC8ckvWlYiqRkrKHHA7AM4wmomuWO6YG4fN\n\
dJZWweTNNImM5ODf9cl/zoWvfLKbUx0PP6UBSnIc1mrrcbCoMn5rnmoV7RZy\n\
ukQH/KGVGVVJIIkIGGmwKuiHIdQrXuxNPfL3WGMBuuCFCxktpKxqbi5rluhj\n\
zRTHGOmid/9rDSMBB1mMhPnqy73Vu6r1i5TnnwsA0rY1fG9G6vnQl2+vgZU6\n\
MCoqIeKeHxoMI02q1hgui6AzB+FieAd58MUPv3/KQCa5KmaiLLBYQStPCiSp\n\
6XfKc+iDpw4NUkqqcyKrUQjIwo6e4CoPBYhaCbZ4JPGFr/vHPSAzSKKGWh68\n\
VXoQPjvR5VkzIq1NdPVMj9XDFNg5pwZ2xELCV/CbRhX5rl/7Y29g4Yl0Koh/\n\
gyxby4h+Q6fgf8B9rNAh5byIiurTZ7RupIMgSK74Z+Zal8nnhu9cr3VZnUlT\n\
/G+jzrp2wRif+LLljzOcsRpGfZi6eQ8laQ6obAjhlrLc8LyeiRiPvuV9V7Nt\n\
CMtCzATSLAJRTMQqPEENTd3B8OA5CLO9T+/xs4wmtVHAmo+fyeWr/v7Qea/n\n\
8u3wa9l4XrtnUU+H9jnQ85ojQiVt95q600ZZ9nfTDLdRoy0bhgvYkIkSW2DP\n\
gtqwdaTuZtTzOp9NUU8bkxwNRpuD7Kg9t/P2qypMTn0ENFNKa5xavdx4Zynv\n\
T897YbLcIp5MHTfwC+EC4rnst45TxOMAT8FWdgN2erDGU0lwd4m/glAR+48p\n\
R19gDzod1KP4NMI5jm82bpwX3qHJgQdV8Y5BDBHeySu8s20NoeEozUJrGmRt\n\
x6zk44kh4kF5U1JXMAnBvaK65wCtwipILK3OQwRnrzGAps8GELHtuGvllZmi\n\
GdzT/Pm80YzR9csWE/yTOipAFaw4knBE6p1KYIfBqGclX2cos2zx0YAy8XLE\n\
s6mIG5W+mu/pgweZSr63ejW8GZ3sNlomRAlEwoqNP+PfEEM+r6kvFit+iSyU\n\
3aX9bXW1QBlUD4mERyGJmEmMkhqnC/HCUiXsOMPZpPvnOpTI44eSViWwAis2\n\
SJSl1LXluosVWojyeY33HWjz7LBpWtfuIJ9CFzvLkD2tFECKBsthdsWtup3T\n\
Ub7tdpvu79g+v1zVmBz49QjSueQzjgj1tBJsQzfbKK7LzG+5u5lKTdneFN+A\n\
auZA6Oout6PDFy0Mna3jLI9q2vjlaPDcOGKkbcQt0QZE1zSbegmqMV6uIccS\n\
2EgWjaNiqlUHe5+DjxTMwDyz8+2nUzlANP3ytre+nNEM7ov5hu4hbidntKOw\n\
hqN4GPj0JG6Enzrt5MBolIo66I3yc43ENIJb+imckcI0xKPAQMdImi6hyjJ0\n\
8ELExZgGU+sQS9U2tfFomtqQ4Droj8j32PeXB84sMBjidGw++PlExlXgwoEI\n\
1tnTqvjVJuKsOeocgjVn/8qb4HPyvrB54x9navH+MWAs1FHe+RnvlIIfTeMS\n\
cjOsT1xzRg3XHL52Ua28GLMh7fBeNwyDEeVpP7riJKp//jhpQdLko9ophZNE\n\
vPfF9J5Saq3FkDwiYnHW36maKkfpsXgh3nAkPtO9sbaWfgoPZbErC4JVtTxU\n\
G54JhLYtcra14doiK5cdY7lnU2PW5PCRarNcXFejBgzMLvI4WOyAQVGCta+H\n\
1tsXsJx+9NFHPYXh9+blH/MuTW0X2qmmI14Fd+xLrEfsbMoz3rRv78lqWdr+\n\
687OJN4rC3CaVt4d2+ddLIKH1H0nxSgNzolgjJ+jIdn1Uf042sV4mlNslp72\n\
qVZyNOU2g57hKIq2QiC47DDIAKN10E4GBvbFc6Rz3JGP+iI72kRPbaSna0Ig\n\
9UhMhbEArKgwr6Yo5aEy0YIaOVd6k8xM4JiK/wLZALWImabc+tenOWCT41/1\n\
WVFRgDWDcum5v8+2Gg0gFYDT87DmOI71SUfNBwHs4+GZIsAzT21ZMRBQYFR/\n\
EsqE8GFQfuHmuxmdAq1C4vz8+6sRL6PowiAjL9Csl0oRB9xMNy5bhg+l4bsK\n\
/UETCsntrUFEHYSoCguy9nXOqjgrN522frjt997k8ZEJLKqw2sorI7DglDuD\n\
BVq0EBYqYgyxZ6vglESwy8orPYaZL05SXJNLXXhWMJHOaVhXS7naB+C5fTd+\n\
Gh9Kw7dLQ1erfEXVLxpxMwQpc9M41Ry65w4OPB1I+Gl50/vq0Iq6ibhRxI/a\n\
0TeOvGLecCs0SwUCuWw2S+naDP8jchDkr36UuIy2MnkDx71bea2mun1sWwpR\n\
luKBudbVYJZCF9duWcPDw+sbaRLSVDV07UJqWHQIxxnOYHlLmgyGeXR9PkNp\n\
ZCYLv5aybMzf6q98CTE5on/OrEIjiYe8V82Yk7p2xdp07AyjvLbZxzDiOfhZ\n\
EPf6C0KOMRJrQ2Ud26cWKYTSwgOFz959B61Far6E03avqZdtxNZl0tsItKNF\n\
ao407kbu7KAH6puCCoMJNLbVpVjlaLBbVwnSZcSVZhWbt8ymwW9iksoToTwu\n\
smjKpnnLFFze2MAB0HbLmS8tN55/ao9tUhO8ucVaqhCPLaCNiiS4poHXyCDR\n\
R9kJEqC9Yd2tWl/zBr0oTYPZ54LjaJAnJNnDGRty7fBYiH5cqZK9cnmJM97m\n\
s1YhzYdpVSyXGyyni1M1hwhsNL2pR0VVkeM534PZ16K0tvxoG3br2HakkJtt\n\
b8+CxyifdflpjLKJAHLX7g1VPLRxsylss+Yoa+XT2Kgj4RoEXorNVsYtWQUe\n\
rl1a/uJjSzg/8JRswfFWLdNd3wQT8OQDBqiY2rBUTeWLmpnEWhMd60p5XRfw\n\
9xDQTtP4Y4YYQ3g0IJ4GLmAvn3X6I0xYYy1VKCImb9vDm30+cIuWgQWnOjOa\n\
yoT5XUNlUI6P8Yjqs5E/Wj7qRnmwfegCua39bXW1QDwcHeAxAQ09HgPDq6bu\n\
2gUIBNs0m08jktqGE89BvGpUEupTaxcYfy5DqdMIIYk2AcOwd6e5rFz5SwJ7\n\
daZvuPkWmBcc+53BmstbLWTUUHLX3th8DzzyE34+nuQUAaiXD8toJTwQtvXz\n\
tDkeO7bPxVC9+ogQSdu9pu6kCMvy26gJjvmkiVgANrwYa8B0cyDqGNMpGlbF\n\
ZDFdG28cSf5KDV/b1LSJGhsBiP1U6NuIKa1jOmOTM3/FJrcwuGf/Rzs0CHz1\n\
OS8HquO/aqODGS4HqqNvY4zLcoF1H/zbk3nfHcKqjhdYBzwoYVlZHDkV1d8b\n\
P1zcQDoXOqWQzkdOhZAOs6il1gKprO6mlWYMfVC7oPAA+imUKhKQLgX9emIN\n\
rO3oczY5izSxubFqaqdHUtsQY/ekNSqOB+wG4UY3XM6dGRiROuCzetFHDtv1\n\
Es8uNBMmwCgJvFKAyoO3eKvgnq2ujCEsl/Qv9p0yOgtdvKP63wrY9oqmOfKA\n\
DVQA6hB/WfmmC5a4ZYDsYjpbjhIAzUNC6kYs4w3wlIRdn5Cm3/z2V9Jl4nKb\n\
b7xebKyPdKfdSQFJ3VT32HWVCcBWeKEr+s7R/wnBgQrM+R17ANmsql3TKJ8r\n\
9uTWwQQLa4dwD+pNsZIflCMwkBCbXG+6rGCXjACXymFJUgddgxqC8MPueXfv\n\
OO4bJgWqq0tftM8gIM33re37XHEnNc697KzhdNAd5LoWZ4uOHDf+d8ehnmqj\n\
j9O608cIikz1BtH/8WTGnDZqctVlGNFhisNboNqgqRylhwQ9C/08zxdnQ9px\n\
BTCNriRPdGMraeZvjiWkLOJumpYGAaPecX0MRaJou7s0RZv+qkBawjEqvTk+\n\
CdCABwCoYGgThynb4ADQkAbghnSEhdWMbw6l9TkC//rLT2Oktv6y0/nopGPl\n\
dBYY5cypQdyUXngGy5wBmsuvAA3LCt0jOwKgGW9jsC++DaD5fCb63drLFBKl\n\
IsoUbdljEpRNjXNUAsECTNf6yEAPR/AfAWepLYmuxGHy3Ac49WCgItTRCMvc\n\
Zr5xYVkjjjhSJre+b3SPQRMnanHJAHsLew4dOlSbtdCJ2whQZ+KWE3gbtBX9\n\
bAC03G/pgfi1IlncVpJvYNN4sQJHC7HTr8kj9synFMjxKrbwEloUwUSiAi2N\n\
Knh+e/3OID/03eDTP3AME60AsboU78iLtGfVk9mJYzXzhMTYFIlSB9GA2ONu\n\
7LNOXkwzRSEs4541G8rv3fpVv/RHSAnS1AS2n20YYdPEraQUZFRcNmJUF0at\n\
xCMao2Ij+Sqinua7rit6amEkuBkyVDE0pCd6/O+kVxP6MaqCXTvVmn6Sg2zu\n\
v+4s1hg7vvxa/h95oW6gdqA9Zo32gO9Wr5QrB2lKpd1USG5Rm5x1U1Tr2vox\n\
OfCf7tq1q3z0kUfYa4V5w+gpLYAYYx1jl8mDRPNUgiMfB6kb6WIEfE3+O7Wi\n\
KsPI/2aVMeqRUCHq+MI21Lam9wqRioePsWxd7MqeqWdBY9jd7bOJZ/3kmBDr\n\
QkQ/x+/sNVDL2ibSOtJrhiL0zezeMDAum6DQZYuzY55BhUBECNMrgK5XCNTw\n\
H956c6gQqjQbfaqsBqmqwkgVgq7tgJWfrDYG6d6halUQlm6Ken575cfKbbVj\n\
qlgHkCbR/ntmKLRtJ3Zv2wmJ0SgSRQ4SQ1Aknu0rn5hlBz6LFi0KjsaBWJVy\n\
/MF5ogGwEtamapxqIP7Tw7gw0cLjEmkVDYr4j44tLqsjXWNdoF57EtkSTzn0\n\
bnqsIGDmxWoCpzWKSujhAbNymMGxqqwHoAP23fTa8upLTuFjsZGOVQXSVS/Q\n\
MmVSTcCnnexNwLpJSMNF9UodW1pau92YqgKnhlizKNaMtTVF045aL2ZcLA7a\n\
/u2bb4Qo1lPSgGv0QBHPlbs3ROrCBUv6aCPZ2KKSvavLPaUBuj4r3Q4UTu2U\n\
EneSiTbL7rfRw/2OtLU29ayRnZ2XFLMJwWmnI1QQ/dAF7pRDVgt/bFgETBl9\n\
EFy7N8hCogjLX7tUq1WPvawx+MA2jQP1TXfNyW1JdU3SdZDsgCzXfETK+/fH\n\
Udx8ADVJkmHNK6Nb03D5be+zgQ0C0kP/QoJAekRSBGAxq0SJiwBayLASIgMi\n\
RGHlO15/YrnkLS/yUBN/4VK6dtGLuQaUCtdSj6XYhN/0ph8c5QgpbGVJ3bKS\n\
PktpPKuGkzMYSjC0Tfvlw3cGcob9UC1yxk/i9gdVxmRTCSa30XGhw6mo7Bmh\n\
feKZkC+ILktBaUT2E6EEp0CqvPQnvD5TQuXA6Geb3EeYFvq4CcpSMT0hr9lp\n\
Ct1MBl8mPGbRUNflTjgMvS7VlGVlASoC8EsjMA/x02E47ZCU4XU1JwY4AFed\n\
Tyd4ORpjlDVvZAlDeUgaUCkqZeCUZimTuXPOIF/sPpFlb32ZN3wqdIG8gXxB\n\
OuQNZA/SIW8Qd4YtmT2YSaktqAfLXmAoHDELKQd5Q9gm07iWlMVWTadZeG73\n\
XGCN7tmw4YnJtEDc1J3GcprrjHlEWdMf8Ou2gQRWUy5aIIxFVmpxVXqwYmLQ\n\
MV/P1CFGUC8FrbXW4+2jKDra+LKr6LCbYb3Hd4To0JNhZUNI0BbjVG7FS03j\n\
AtVPH0AR+s4rIGKfbaoXl3q6RTTo82MLkv6YgztakDQcVq9OmpTnBLIEcmTj\n\
+ad6tILfxOM9E90CVodA4Z301BWIEqTDb0JipAfMQrMGKYJFECQHUAykCX5D\n\
ssAP46QIdrVNck1IQzGQSnC/oAWQcJAmVctr7/k5kuAF2jgGKrqxkVbYgSbf\n\
ufuBwJ1jpcn2e2/S3ffGyVWtGhJSBMBirrHH8wEqft/mtjU0D+FasbQC+ahL\n\
loF1N1iWsVvAajvT4nBqz5ChsJk2Qx8zM3hO0/IWPkxaA02+mRF14ArimqXt\n\
VVq7tKhClPtNAxY6tzoJiVg50+rGn2JstzMY4dDDP5TJrmbULsKHiRHV6Kty\n\
8LYLXbcAR6hUULyBNJUK4PpKKvRTUiFzWyqcST3azpqp/S7qknWJdJUCwiqS\n\
r7CKGq4Oq+cRHtF0/phiCXsAveco44G1cObZkAKcT44ZUHzBZwTKs88Evugr\n\
IJdDObALk9BmsM80Or8D1SCbPb/D7gLwHGncpraJR4LrZxvriCznyxZbYSCj\n\
kdn9Gyrc7Pn4CJ0j7g8sKdh7gW5T/tQu3AZWDw8g5tfXlQxtY8OFLicAA/AX\n\
vw0EQDaFAI7bFzDnAv0LBOCzzcHVyu2q/9WSIQGxjtFn+THL7Ly4kXdWINYW\n\
rdJ3agXMHr8XQ/6Ot43dcbweX6McH2wU2rZG9TRi8uMi7ek8QyMwwPU4TGnv\n\
voP6xhFrC80bGTft/Nr0+SXj+svMI/YYICu+0CGwvVokrJnzmbBIzBq2501H\n\
TodpWILdh+SbYyyYdmURsnO32A8pekFj0aZluPbtCJxX991Q42JtxYRpmRY5\n\
Y9IUmkTs+knPrkrU/mUvJa+GtCkIydP4JrUCCMtmuZxnzprZ2SKdFcBh9gFz\n\
mi7XdflPQL0HbqWWgz9VYyuGh0bHO8x6ckp6iml1GYBi0RZaTscvfyvL+W1Z\n\
HIoHIVi9R8tv4PNYxen5dNWRW07dYn/pE0/uk/oLxlOwBMBRvr/0DrZ6HNQc\n\
Ap3m9Ig1Jdpdj/adODhrwtojni2TouabSMFz6hbe/jJpeEDfIKPmQR18+gSu\n\
yHi3o2hK06ZuAfjStYmxqgtthIRBJsfk9hblLNxu3pLaZzefvpZATHxUCLF3\n\
r1LDQ6uGNTaFnxDO7rE1cIYZG5yLv8rN+K0crVgcnEtYwzH3dOCssMyNdMgN\n\
MDcY3UayWDuejqbl8K6rceXwmC9wftbQcrMLdQy0GdStrR9EgEOPScNn7PXL\n\
0lEiulWZygjaJD5KzwyiQYO2p3yJR2cPi8Q6+0dqhy45yRH7fMtnWBLoa6eI\n\
jcKj+6Ly5FVXAeZFmEvtuDwnOTguMrAkRhZ3OVIvaF9dUiT2q5hXZlnN3J93\n\
/f26VFq22B/xPEp++DGGFCVqaBrPsILyGk7UtzFrtLLjiInaqZl3ve4UhQ9Z\n\
JWD4CPCcMf4sMz6EgcJxCAHezkYyhNf/RrZADF27CIdtUgo1AT4DiKQKOdSF\n\
C8QX/qJ89P+Hf3MeLzxcrELZbPWbm3yZMChB+VvLs0cMDIysUeO7RRjxXja7\n\
Ny62HpaRrIkX+anDPFOyBi/xCdPqRxq4c4qqdo46AiHOj52XR0vKlOxmyXL5\n\
NvFjmUVaqpR7kk+NXNWzRXgg1bY1OYwGyLp5fVKA8EtBKUdP8+FAKHmv3tDk\n\
i20C9YMQ0t2rHyiVCImITpDS2Or+vOtvhD+9NrkiHhDrxdDFDodCYtlbt2Qc\n\
2P5gMNgiBcPay09xYvJ1BcbqCCUoi5isVyEdjcDNci+MemJwwJIGwgOCiD65\n\
OxwPTs9JNjtg6QJBBKECAQXBBCEkBslMbQ4qyKwR0woiGC4BaSGIuL6tG3wk\n\
XMrX0NXmoNLHev79vBrrgJU+IlkCpKPmROum6nIoS12q1JcTiCfWNVI9kqEI\n\
9meZkFzreC1GZ0UEn5VLzS8BHV/IIMcrGvMlTrQjzlQIwq8Qjix5nrvca6na\n\
TqUbt7qk0dG8E0rtouNFJFj8VobX5zjRx15iSWrNfwIIeu4FIcQWubwOBBwC\n\
jnHnbON7gecg5SKoetgTwHWAAuAoREHqbzEi9OwSJcWBus6AIRhrDciE+z5x\n\
FTgt9Tb5cZkvuanbqOWA+YSi+8YwCKPZd1atgvgaGM0ZH2wkFF7jSTkuOzhm\n\
G0gEPkZ7pLa+MzYOQeyUj2SJTUtFH9mDNcflKrsYsGddw+1vX/Kq9GnT+EDG\n\
yENm9VzqgMcuddixt/p4bkE9o1moskErEWGXh+qzHGyUezbKXFCOBBTTL+Kg\n\
XqW9Cs8D4B/iE1V4YB893ZXYSw+CVf3lgn6gK6c8BymngoNgTQCgRr3A+aTH\n\
YkwtBsaufrKJiBpLo4Wsc6kfMduu1df5F/JYx1TqzIjpmFG3rZG0wmpOpNeS\n\
w3fx2NX+2JrD4LHpOB+JcJ+Weq1f27NRr2uhaubNg0THR4ZOqWUxbsH5K0qt\n\
BaiDiZD+lWgyJbKep1Xx+iooarFHRRYjpzByC7ky9+ikJ1mBdBxgCxGBWkCy\n\
EHdtYR5dCbdNVNstpirpPfE5T8psQmqmtkRNNuAZGGknE01Q2YGd6toEfXNm\n\
cJIyLlfPVMweZQcfreR7peYzrg59IVUtnGLt0urdlRWGqWKyamWEzOCHxx3y\n\
awT5dN0KQ3nE8BpTetad1HUpB0EiiEYWFoVfWOAvm1M5lgGGj5xBhlB7ppRu\n\
qLzJAdqTSCj1p1TYKEXqM0lSh5UG+UDqAGBmi0qn4Can6JNUb7GMXXDYnZ5K\n\
tsn3kLh9OT4mwJpYbVwe1J6tC/kkfiDgsLCuMDqqaz674FEbquVsXRh5h9II\n\
fniVKU9Ag7ey2TfUp971mgo6mO5Ynh+/lVe2tk8jguFrnD9fgJKA+Cu+GNr4\n\
Yd4+jw3JxqsofEJ3c3Yu9m3Qj3cv5sIJSINxECjF6I0FcbRQcFaDsgJaB5iP\n\
NQgKJi7u+RPq61ZAzwKkQzfde3d593e/S3XiO+fNrTgrhNKpxS4NkF3Jw+77\n\
xMZm5CgS+bRqGEqQDyRHA9jjHQl9f0YLYPj6TQ/w/mcHM4b+kRW33VZ+45Zb\n\
ypu/9jX+i3xEzQ4pTPgW4DYQOl6wuWLFSj4uZNg5z5BNNhgF5MECBX+RBz2h\n\
Zvk1Es6Wh/HrnjtosPAdgu9Xa5VEv2I04w9AN///4NagWcijJ4JqHipP+K+9\n\
HBeg4963ofc1D62LPYuI/S5oMq3S20neBW1PMdH85KtfYcLihsqTSMdsAqmw\n\
gYmImxWBiH5jh+pFZqjcm6E8GHdkPqkBs21knmnYCtgZZI4WbFi/XknSGszK\n\
xHWn699MIrsqDH2DhC7onXVfY/fysE/UEraWVS0tWIUVLjzgjVEUcN/vk1ct\n\
hqnUPoGNcQ99Ij5Juf9TfVpl5yzMXkifaIS4T6onneLW7hhTxSAwEmpchJ+j\n\
3M6um0oBBzpHpIEL6Q40GxyIQjApv2ZLdyYS2eMdWNW0Ff5AQUa9rzuFbaHc\n\
u4GMvG4kU8pxwR6g2bBXPekVZsKEdOur03DpS0mC42xSfbnH9YVnkjO5SZrg\n\
CBRtrQaOqSuJW104EkOD+r7ZuES7SNMrprEHLyhSE1ezGzEJi9F282tvu83I\n\
d10v3PD7Ti+UgYdKFDmArlRLd7jQpTH60XEWyufyRKW6+XKTYs3YbgyGvj8w\n\
wkqwrT1HPK/CADqTWNQh3Z8bzaXRolNcq+4NtHNn55C5HVPUDyYCH+dFcY1E\n\
UTqZhY9RoIfsviR8gCL7EringQKeFufZ2zQ+LsxImOnN0U3XtYmgxzqtoFPC\n\
X95hqlOrQdDqMHXz6jquZIGPFx4ukqNpM3dHIe+09kKfHchYBbtiNG1d3BvA\n\
MGzPUxmM5TgfP0/Yr2/WRMgPw02pR6aEby4KBEQ0AY1CQ5p/TFXoBAtwXJCn\n\
ymyo2xvL6BujCylBQ5cME9M0nBaA53FwSy6Eat3Z/EJIVrWlholWLbfzoD1E\n\
WqojIjdS08bwpF+t04asdlUq2nPH0KPtd99ZSLYEudqBKeRAWe0HARfXj4Hn\n\
YsPP4bkAqS58e0QXCq/ZevK6S8yUnkzgpH24iw9aUfqp3gGxzgeTFG48etie\n\
ltYy1At9piwMKsptE824JevTg4tSmw/h4QbyQzd08FLv+USaCc0KAypSPbjL\n\
9SB7zv8DvfxneQ=="], "ConferenceGraphicCell", ImageSize -> {1279, 52}, 
       ImageMargins -> 0]}, 
    CellBracketOptions -> {
     "Color" -> RGBColor[0.739193, 0.750317, 0.747173]}], 
   Cell[
    GraphicsData[
    "CompressedBitmap", 
     "eJzFXQvQXVV1Pt5z7v3v/0p4tdViW6y2ik6xFFREdLRQGJypmj5sq7aWEh5O\n\
RVvCdHTqDI6dUadSOyKVxgc6OtKAoSqDSIiMAYVgQkw0JiQKCkjMJGMwEBry\n\
IDld39pr7bP2Pvuce+7/J3Bm7v3/u88++7ke315r7X3+9IIrLr3osguueNeF\n\
F5x03uUX/NOl77pwyUnnvvdySsqfk2VFmWXZ6Sdl+B//yldZ7t27N/VV4AsZ\n\
HnnkkdRXgS/cX7duXeqrwBfVkJe4frRxI/5kPf7Oy4cfeojT6a+k9TlN8kX3\n\
cp+OtFy+d+/4BT/j8lEO6uO6+9ZxXqTv3LqBH8wG5Wf/+5ry3//x0vLS836n\n\
vPDUE8p3/sk55dev+Y9eeccd35LSpfZsyN+5b03Vigmb5v+iFRvWr8/KxHUn\n\
P+eGoIfcrqDCd1+61I+SpVecu3D/UXU5eteT5lGV5RV/cU751lOOpQfpO0fH\n\
qKuXnXZy+dUPvNuPBDLSXx6a3BVDBRa+Sal23+XaHU+W+1VPc/mGPg1DosOj\n\
v+nKfU96aAy1FZm0nfjQbKAX/fLPX7xgwF3jXpVf/PD7q1nRETAPUlGYpsIP\n\
nv2bnhOZdWmamaJ+U6eZQLNJkJVvMDKhHUoQaCiaPUAPhvIvMpjJ5r86GaYf\n\
nrR7rXMj7U81MzVfvbDEqp9EztoD7YX+JvKhu9SDHD3g2XA0xoQlpWsh2is7\n\
JDKvjqdFAshjST5Z5fqUoi3T4LCcdGdLITNqGOYJBKU9xP/f+NAZzCbcO3r4\n\
kpcez/3CL54zajIILpoux5qRoOh5ZnrEVXv48OElrrX0Hw/Mc/Ff1NfzXV+t\n\
0LOX72iHua1N5lV/dT53CX8/eu7vlj9bfDr+Jrs7lLRvfmmpl6LxfPluCplq\n\
vtQcfsf1a9K3qbkXfRXPfm6owXSPmkf5r3rJb5d7PnJmufzdL5M5Kco3P2+a\n\
Gy8dmJRkCEAzcJVQowdxWZoUOTiKrwZRq/2AGPkd9wkD5JQD+F/biX5gAtZ8\n\
/MxkP+gzLSSHtulQxEQgEqoSD5UyHN0DFW+xgpErF7FJqpCbdMVLf6O8/g0v\n\
6ZU/f98rKRlJ1ED95Gg+Rp1y/csZJzKj0GRMCyFhMrZuuU+IppLHqqb93FRi\n\
2us57dFD0vYD2x8sV/zv18r7H9ufzUrawSceK9dveqDcHwiRda7TjaIvNxSn\n\
1YpAFq4ecjokmw7BzX/8MoxA+fj7XwX26dnOY1avPuuF3Hn6zBrhiDH55KV/\n\
hk+eYgCLXcwUus78VFq0a/V15dlnn12e9ebLy61PHZqRMp687/PlH73t2vLJ\n\
w2V2iaSV+3aU13/pNk6rBuRCNyBuymtUVbFIhQWyKd8cjAJmOx6FVW/5Q6Qz\n\
AVPJuP2RM0/SQWA9t0CEKH5jIPHX1Gx4082/UT6vkA7t3r27vH/zZoZTKnbu\n\
/+nPy507d/Ks/zbnGzAlKGuDdZCHBmGy223Qo9TCH9DUo0/sUzIrDx9g8nt6\n\
/V3UiEOb11Pa/ge3IplzDJWhaPSRTjnc31/uDRqo9/T+4b2H7W29RdW4rIcO\n\
/YHc1hZoFvxPSa+S23v3HfSTfeCpp3jUaHQWmPY//vjj5dMHD3qQYB7xcgWP\n\
Ih8Gdirx7Akdy5sw5UlTstk5tEWf7SWeFaWyZ88eqm5/GV2HnnAKb8WmbEYm\n\
58APv1ieftFnMe2+k0Wi45pGJZdPPLlPJ6CW9oJEo4pEWj/xrHZy1KC5SShc\n\
Pipz+d8tKpdu2nV8IusxibRirGrCZs+YfNrs1NBUY+4GSVd3ASZrE/KOMmwy\n\
/wYGUbFD+qf81Xuc2IH6dKsAyJ3cq1X6UF0AcrniGZY+VhqrmiUWV/ioqtQ3\n\
lRXAcToge7byGvHiiy+mu/jOy39YcnX54x1bkE6/kNYv3/OfX2a60uupLSuo\n\
StwblO/84P+UOw6Zm65M9+gESDQkXZqDH626vfy3JReRXHFVfuLT15drH9oR\n\
kCJVgbucY1aasfzHj/liIFBIh1N+V8bn7nlA2cTPo+SRp5vzbfvBSrQnyIcu\n\
kyrmHENDP+Wdnymffu/LqV58E6187uOQg0F5kJPlssWco5B8jy35+/Lgz36F\n\
ez7twK3reLjcL0n76H/5CVM2Kh+8FXc5R09q52ftdd8NoJ+BKYarM0MKCaHF\n\
zPJ3X/P4mTt87SJKdWUcXHJuefB7W/jpycYycluGlwb1Jve1rOpau5RYc5xu\n\
57bb2fP4eyG3G9YNkhyBFMQV/KZpAVgB1kDezcs/RuXSLxIubzjvL5k0as+M\n\
+A0ypbpdMdNMNSjqW9v3BdV9atmnqiKIijZ9folUPcP5lbI7VzUIqjLZ3ODN\n\
lP/3gxsYUG3Ao6QublzypvKMDyxztE8D9vY3voPvBaUu7NYBurR4wmvcoWos\n\
F7aO5Y+WXlResuz77gc1SyS+NiMbdyCregtuD/IHXcptUcKhg3L7vTcxyaBI\n\
fHCfJJVTxM/lkrFubqOCpp5gZFAc1gZatBdcbupdy/rhrd0bZEmIexNcFeRP\n\
UK2bR8kzW176tnP9vY7NE104R/roB/MSzll4L+zOAt+dNpoKuuDmVklKpzbu\n\
ZUCGpmiQn7B5JZIqMSGIa7K9vIC8ckvWlYiqRkrKHHA7AM4wmomuWO6YG4fN\n\
dJZWweTNNImM5ODf9cl/zoWvfLKbUx0PP6UBSnIc1mrrcbCoMn5rnmoV7RZy\n\
ukQH/KGVGVVJIIkIGGmwKuiHIdQrXuxNPfL3WGMBuuCFCxktpKxqbi5rluhj\n\
zRTHGOmid/9rDSMBB1mMhPnqy73Vu6r1i5TnnwsA0rY1fG9G6vnQl2+vgZU6\n\
MCoqIeKeHxoMI02q1hgui6AzB+FieAd58MUPv3/KQCa5KmaiLLBYQStPCiSp\n\
6XfKc+iDpw4NUkqqcyKrUQjIwo6e4CoPBYhaCbZ4JPGFr/vHPSAzSKKGWh68\n\
VXoQPjvR5VkzIq1NdPVMj9XDFNg5pwZ2xELCV/CbRhX5rl/7Y29g4Yl0Koh/\n\
gyxby4h+Q6fgf8B9rNAh5byIiurTZ7RupIMgSK74Z+Zal8nnhu9cr3VZnUlT\n\
/G+jzrp2wRif+LLljzOcsRpGfZi6eQ8laQ6obAjhlrLc8LyeiRiPvuV9V7Nt\n\
CMtCzATSLAJRTMQqPEENTd3B8OA5CLO9T+/xs4wmtVHAmo+fyeWr/v7Qea/n\n\
8u3wa9l4XrtnUU+H9jnQ85ojQiVt95q600ZZ9nfTDLdRoy0bhgvYkIkSW2DP\n\
gtqwdaTuZtTzOp9NUU8bkxwNRpuD7Kg9t/P2qypMTn0ENFNKa5xavdx4Zynv\n\
T897YbLcIp5MHTfwC+EC4rnst45TxOMAT8FWdgN2erDGU0lwd4m/glAR+48p\n\
R19gDzod1KP4NMI5jm82bpwX3qHJgQdV8Y5BDBHeySu8s20NoeEozUJrGmRt\n\
x6zk44kh4kF5U1JXMAnBvaK65wCtwipILK3OQwRnrzGAps8GELHtuGvllZmi\n\
GdzT/Pm80YzR9csWE/yTOipAFaw4knBE6p1KYIfBqGclX2cos2zx0YAy8XLE\n\
s6mIG5W+mu/pgweZSr63ejW8GZ3sNlomRAlEwoqNP+PfEEM+r6kvFit+iSyU\n\
3aX9bXW1QBlUD4mERyGJmEmMkhqnC/HCUiXsOMPZpPvnOpTI44eSViWwAis2\n\
SJSl1LXluosVWojyeY33HWjz7LBpWtfuIJ9CFzvLkD2tFECKBsthdsWtup3T\n\
Ub7tdpvu79g+v1zVmBz49QjSueQzjgj1tBJsQzfbKK7LzG+5u5lKTdneFN+A\n\
auZA6Oout6PDFy0Mna3jLI9q2vjlaPDcOGKkbcQt0QZE1zSbegmqMV6uIccS\n\
2EgWjaNiqlUHe5+DjxTMwDyz8+2nUzlANP3ytre+nNEM7ov5hu4hbidntKOw\n\
hqN4GPj0JG6Enzrt5MBolIo66I3yc43ENIJb+imckcI0xKPAQMdImi6hyjJ0\n\
8ELExZgGU+sQS9U2tfFomtqQ4Droj8j32PeXB84sMBjidGw++PlExlXgwoEI\n\
1tnTqvjVJuKsOeocgjVn/8qb4HPyvrB54x9navH+MWAs1FHe+RnvlIIfTeMS\n\
cjOsT1xzRg3XHL52Ua28GLMh7fBeNwyDEeVpP7riJKp//jhpQdLko9ophZNE\n\
vPfF9J5Saq3FkDwiYnHW36maKkfpsXgh3nAkPtO9sbaWfgoPZbErC4JVtTxU\n\
G54JhLYtcra14doiK5cdY7lnU2PW5PCRarNcXFejBgzMLvI4WOyAQVGCta+H\n\
1tsXsJx+9NFHPYXh9+blH/MuTW0X2qmmI14Fd+xLrEfsbMoz3rRv78lqWdr+\n\
687OJN4rC3CaVt4d2+ddLIKH1H0nxSgNzolgjJ+jIdn1Uf042sV4mlNslp72\n\
qVZyNOU2g57hKIq2QiC47DDIAKN10E4GBvbFc6Rz3JGP+iI72kRPbaSna0Ig\n\
9UhMhbEArKgwr6Yo5aEy0YIaOVd6k8xM4JiK/wLZALWImabc+tenOWCT41/1\n\
WVFRgDWDcum5v8+2Gg0gFYDT87DmOI71SUfNBwHs4+GZIsAzT21ZMRBQYFR/\n\
EsqE8GFQfuHmuxmdAq1C4vz8+6sRL6PowiAjL9Csl0oRB9xMNy5bhg+l4bsK\n\
/UETCsntrUFEHYSoCguy9nXOqjgrN522frjt997k8ZEJLKqw2sorI7DglDuD\n\
BVq0EBYqYgyxZ6vglESwy8orPYaZL05SXJNLXXhWMJHOaVhXS7naB+C5fTd+\n\
Gh9Kw7dLQ1erfEXVLxpxMwQpc9M41Ry65w4OPB1I+Gl50/vq0Iq6ibhRxI/a\n\
0TeOvGLecCs0SwUCuWw2S+naDP8jchDkr36UuIy2MnkDx71bea2mun1sWwpR\n\
luKBudbVYJZCF9duWcPDw+sbaRLSVDV07UJqWHQIxxnOYHlLmgyGeXR9PkNp\n\
ZCYLv5aybMzf6q98CTE5on/OrEIjiYe8V82Yk7p2xdp07AyjvLbZxzDiOfhZ\n\
EPf6C0KOMRJrQ2Ud26cWKYTSwgOFz959B61Far6E03avqZdtxNZl0tsItKNF\n\
ao407kbu7KAH6puCCoMJNLbVpVjlaLBbVwnSZcSVZhWbt8ymwW9iksoToTwu\n\
smjKpnnLFFze2MAB0HbLmS8tN55/ao9tUhO8ucVaqhCPLaCNiiS4poHXyCDR\n\
R9kJEqC9Yd2tWl/zBr0oTYPZ54LjaJAnJNnDGRty7fBYiH5cqZK9cnmJM97m\n\
s1YhzYdpVSyXGyyni1M1hwhsNL2pR0VVkeM534PZ16K0tvxoG3br2HakkJtt\n\
b8+CxyifdflpjLKJAHLX7g1VPLRxsylss+Yoa+XT2Kgj4RoEXorNVsYtWQUe\n\
rl1a/uJjSzg/8JRswfFWLdNd3wQT8OQDBqiY2rBUTeWLmpnEWhMd60p5XRfw\n\
9xDQTtP4Y4YYQ3g0IJ4GLmAvn3X6I0xYYy1VKCImb9vDm30+cIuWgQWnOjOa\n\
yoT5XUNlUI6P8Yjqs5E/Wj7qRnmwfegCua39bXW1QDwcHeAxAQ09HgPDq6bu\n\
2gUIBNs0m08jktqGE89BvGpUEupTaxcYfy5DqdMIIYk2AcOwd6e5rFz5SwJ7\n\
daZvuPkWmBcc+53BmstbLWTUUHLX3th8DzzyE34+nuQUAaiXD8toJTwQtvXz\n\
tDkeO7bPxVC9+ogQSdu9pu6kCMvy26gJjvmkiVgANrwYa8B0cyDqGNMpGlbF\n\
ZDFdG28cSf5KDV/b1LSJGhsBiP1U6NuIKa1jOmOTM3/FJrcwuGf/Rzs0CHz1\n\
OS8HquO/aqODGS4HqqNvY4zLcoF1H/zbk3nfHcKqjhdYBzwoYVlZHDkV1d8b\n\
P1zcQDoXOqWQzkdOhZAOs6il1gKprO6mlWYMfVC7oPAA+imUKhKQLgX9emIN\n\
rO3oczY5izSxubFqaqdHUtsQY/ekNSqOB+wG4UY3XM6dGRiROuCzetFHDtv1\n\
Es8uNBMmwCgJvFKAyoO3eKvgnq2ujCEsl/Qv9p0yOgtdvKP63wrY9oqmOfKA\n\
DVQA6hB/WfmmC5a4ZYDsYjpbjhIAzUNC6kYs4w3wlIRdn5Cm3/z2V9Jl4nKb\n\
b7xebKyPdKfdSQFJ3VT32HWVCcBWeKEr+s7R/wnBgQrM+R17ANmsql3TKJ8r\n\
9uTWwQQLa4dwD+pNsZIflCMwkBCbXG+6rGCXjACXymFJUgddgxqC8MPueXfv\n\
OO4bJgWqq0tftM8gIM33re37XHEnNc697KzhdNAd5LoWZ4uOHDf+d8ehnmqj\n\
j9O608cIikz1BtH/8WTGnDZqctVlGNFhisNboNqgqRylhwQ9C/08zxdnQ9px\n\
BTCNriRPdGMraeZvjiWkLOJumpYGAaPecX0MRaJou7s0RZv+qkBawjEqvTk+\n\
CdCABwCoYGgThynb4ADQkAbghnSEhdWMbw6l9TkC//rLT2Oktv6y0/nopGPl\n\
dBYY5cypQdyUXngGy5wBmsuvAA3LCt0jOwKgGW9jsC++DaD5fCb63drLFBKl\n\
IsoUbdljEpRNjXNUAsECTNf6yEAPR/AfAWepLYmuxGHy3Ac49WCgItTRCMvc\n\
Zr5xYVkjjjhSJre+b3SPQRMnanHJAHsLew4dOlSbtdCJ2whQZ+KWE3gbtBX9\n\
bAC03G/pgfi1IlncVpJvYNN4sQJHC7HTr8kj9synFMjxKrbwEloUwUSiAi2N\n\
Knh+e/3OID/03eDTP3AME60AsboU78iLtGfVk9mJYzXzhMTYFIlSB9GA2ONu\n\
7LNOXkwzRSEs4541G8rv3fpVv/RHSAnS1AS2n20YYdPEraQUZFRcNmJUF0at\n\
xCMao2Ij+Sqinua7rit6amEkuBkyVDE0pCd6/O+kVxP6MaqCXTvVmn6Sg2zu\n\
v+4s1hg7vvxa/h95oW6gdqA9Zo32gO9Wr5QrB2lKpd1USG5Rm5x1U1Tr2vox\n\
OfCf7tq1q3z0kUfYa4V5w+gpLYAYYx1jl8mDRPNUgiMfB6kb6WIEfE3+O7Wi\n\
KsPI/2aVMeqRUCHq+MI21Lam9wqRioePsWxd7MqeqWdBY9jd7bOJZ/3kmBDr\n\
QkQ/x+/sNVDL2ibSOtJrhiL0zezeMDAum6DQZYuzY55BhUBECNMrgK5XCNTw\n\
H956c6gQqjQbfaqsBqmqwkgVgq7tgJWfrDYG6d6halUQlm6Ken575cfKbbVj\n\
qlgHkCbR/ntmKLRtJ3Zv2wmJ0SgSRQ4SQ1Aknu0rn5hlBz6LFi0KjsaBWJVy\n\
/MF5ogGwEtamapxqIP7Tw7gw0cLjEmkVDYr4j44tLqsjXWNdoF57EtkSTzn0\n\
bnqsIGDmxWoCpzWKSujhAbNymMGxqqwHoAP23fTa8upLTuFjsZGOVQXSVS/Q\n\
MmVSTcCnnexNwLpJSMNF9UodW1pau92YqgKnhlizKNaMtTVF045aL2ZcLA7a\n\
/u2bb4Qo1lPSgGv0QBHPlbs3ROrCBUv6aCPZ2KKSvavLPaUBuj4r3Q4UTu2U\n\
EneSiTbL7rfRw/2OtLU29ayRnZ2XFLMJwWmnI1QQ/dAF7pRDVgt/bFgETBl9\n\
EFy7N8hCogjLX7tUq1WPvawx+MA2jQP1TXfNyW1JdU3SdZDsgCzXfETK+/fH\n\
Udx8ADVJkmHNK6Nb03D5be+zgQ0C0kP/QoJAekRSBGAxq0SJiwBayLASIgMi\n\
RGHlO15/YrnkLS/yUBN/4VK6dtGLuQaUCtdSj6XYhN/0ph8c5QgpbGVJ3bKS\n\
PktpPKuGkzMYSjC0Tfvlw3cGcob9UC1yxk/i9gdVxmRTCSa30XGhw6mo7Bmh\n\
feKZkC+ILktBaUT2E6EEp0CqvPQnvD5TQuXA6Geb3EeYFvq4CcpSMT0hr9lp\n\
Ct1MBl8mPGbRUNflTjgMvS7VlGVlASoC8EsjMA/x02E47ZCU4XU1JwY4AFed\n\
Tyd4ORpjlDVvZAlDeUgaUCkqZeCUZimTuXPOIF/sPpFlb32ZN3wqdIG8gXxB\n\
OuQNZA/SIW8Qd4YtmT2YSaktqAfLXmAoHDELKQd5Q9gm07iWlMVWTadZeG73\n\
XGCN7tmw4YnJtEDc1J3GcprrjHlEWdMf8Ou2gQRWUy5aIIxFVmpxVXqwYmLQ\n\
MV/P1CFGUC8FrbXW4+2jKDra+LKr6LCbYb3Hd4To0JNhZUNI0BbjVG7FS03j\n\
AtVPH0AR+s4rIGKfbaoXl3q6RTTo82MLkv6YgztakDQcVq9OmpTnBLIEcmTj\n\
+ad6tILfxOM9E90CVodA4Z301BWIEqTDb0JipAfMQrMGKYJFECQHUAykCX5D\n\
ssAP46QIdrVNck1IQzGQSnC/oAWQcJAmVctr7/k5kuAF2jgGKrqxkVbYgSbf\n\
ufuBwJ1jpcn2e2/S3ffGyVWtGhJSBMBirrHH8wEqft/mtjU0D+FasbQC+ahL\n\
loF1N1iWsVvAajvT4nBqz5ChsJk2Qx8zM3hO0/IWPkxaA02+mRF14ArimqXt\n\
VVq7tKhClPtNAxY6tzoJiVg50+rGn2JstzMY4dDDP5TJrmbULsKHiRHV6Kty\n\
8LYLXbcAR6hUULyBNJUK4PpKKvRTUiFzWyqcST3azpqp/S7qknWJdJUCwiqS\n\
r7CKGq4Oq+cRHtF0/phiCXsAveco44G1cObZkAKcT44ZUHzBZwTKs88Evugr\n\
IJdDObALk9BmsM80Or8D1SCbPb/D7gLwHGncpraJR4LrZxvriCznyxZbYSCj\n\
kdn9Gyrc7Pn4CJ0j7g8sKdh7gW5T/tQu3AZWDw8g5tfXlQxtY8OFLicAA/AX\n\
vw0EQDaFAI7bFzDnAv0LBOCzzcHVyu2q/9WSIQGxjtFn+THL7Ly4kXdWINYW\n\
rdJ3agXMHr8XQ/6Ot43dcbweX6McH2wU2rZG9TRi8uMi7ek8QyMwwPU4TGnv\n\
voP6xhFrC80bGTft/Nr0+SXj+svMI/YYICu+0CGwvVokrJnzmbBIzBq2501H\n\
TodpWILdh+SbYyyYdmURsnO32A8pekFj0aZluPbtCJxX991Q42JtxYRpmRY5\n\
Y9IUmkTs+knPrkrU/mUvJa+GtCkIydP4JrUCCMtmuZxnzprZ2SKdFcBh9gFz\n\
mi7XdflPQL0HbqWWgz9VYyuGh0bHO8x6ckp6iml1GYBi0RZaTscvfyvL+W1Z\n\
HIoHIVi9R8tv4PNYxen5dNWRW07dYn/pE0/uk/oLxlOwBMBRvr/0DrZ6HNQc\n\
Ap3m9Ig1Jdpdj/adODhrwtojni2TouabSMFz6hbe/jJpeEDfIKPmQR18+gSu\n\
yHi3o2hK06ZuAfjStYmxqgtthIRBJsfk9hblLNxu3pLaZzefvpZATHxUCLF3\n\
r1LDQ6uGNTaFnxDO7rE1cIYZG5yLv8rN+K0crVgcnEtYwzH3dOCssMyNdMgN\n\
MDcY3UayWDuejqbl8K6rceXwmC9wftbQcrMLdQy0GdStrR9EgEOPScNn7PXL\n\
0lEiulWZygjaJD5KzwyiQYO2p3yJR2cPi8Q6+0dqhy45yRH7fMtnWBLoa6eI\n\
jcKj+6Ly5FVXAeZFmEvtuDwnOTguMrAkRhZ3OVIvaF9dUiT2q5hXZlnN3J93\n\
/f26VFq22B/xPEp++DGGFCVqaBrPsILyGk7UtzFrtLLjiInaqZl3ve4UhQ9Z\n\
JWD4CPCcMf4sMz6EgcJxCAHezkYyhNf/RrZADF27CIdtUgo1AT4DiKQKOdSF\n\
C8QX/qJ89P+Hf3MeLzxcrELZbPWbm3yZMChB+VvLs0cMDIysUeO7RRjxXja7\n\
Ny62HpaRrIkX+anDPFOyBi/xCdPqRxq4c4qqdo46AiHOj52XR0vKlOxmyXL5\n\
NvFjmUVaqpR7kk+NXNWzRXgg1bY1OYwGyLp5fVKA8EtBKUdP8+FAKHmv3tDk\n\
i20C9YMQ0t2rHyiVCImITpDS2Or+vOtvhD+9NrkiHhDrxdDFDodCYtlbt2Qc\n\
2P5gMNgiBcPay09xYvJ1BcbqCCUoi5isVyEdjcDNci+MemJwwJIGwgOCiD65\n\
OxwPTs9JNjtg6QJBBKECAQXBBCEkBslMbQ4qyKwR0woiGC4BaSGIuL6tG3wk\n\
XMrX0NXmoNLHev79vBrrgJU+IlkCpKPmROum6nIoS12q1JcTiCfWNVI9kqEI\n\
9meZkFzreC1GZ0UEn5VLzS8BHV/IIMcrGvMlTrQjzlQIwq8Qjix5nrvca6na\n\
TqUbt7qk0dG8E0rtouNFJFj8VobX5zjRx15iSWrNfwIIeu4FIcQWubwOBBwC\n\
jnHnbON7gecg5SKoetgTwHWAAuAoREHqbzEi9OwSJcWBus6AIRhrDciE+z5x\n\
FTgt9Tb5cZkvuanbqOWA+YSi+8YwCKPZd1atgvgaGM0ZH2wkFF7jSTkuOzhm\n\
G0gEPkZ7pLa+MzYOQeyUj2SJTUtFH9mDNcflKrsYsGddw+1vX/Kq9GnT+EDG\n\
yENm9VzqgMcuddixt/p4bkE9o1moskErEWGXh+qzHGyUezbKXFCOBBTTL+Kg\n\
XqW9Cs8D4B/iE1V4YB893ZXYSw+CVf3lgn6gK6c8BymngoNgTQCgRr3A+aTH\n\
YkwtBsaufrKJiBpLo4Wsc6kfMduu1df5F/JYx1TqzIjpmFG3rZG0wmpOpNeS\n\
w3fx2NX+2JrD4LHpOB+JcJ+Weq1f27NRr2uhaubNg0THR4ZOqWUxbsH5K0qt\n\
BaiDiZD+lWgyJbKep1Xx+iooarFHRRYjpzByC7ky9+ikJ1mBdBxgCxGBWkCy\n\
EHdtYR5dCbdNVNstpirpPfE5T8psQmqmtkRNNuAZGGknE01Q2YGd6toEfXNm\n\
cJIyLlfPVMweZQcfreR7peYzrg59IVUtnGLt0urdlRWGqWKyamWEzOCHxx3y\n\
awT5dN0KQ3nE8BpTetad1HUpB0EiiEYWFoVfWOAvm1M5lgGGj5xBhlB7ppRu\n\
qLzJAdqTSCj1p1TYKEXqM0lSh5UG+UDqAGBmi0qn4Can6JNUb7GMXXDYnZ5K\n\
tsn3kLh9OT4mwJpYbVwe1J6tC/kkfiDgsLCuMDqqaz674FEbquVsXRh5h9II\n\
fniVKU9Ag7ey2TfUp971mgo6mO5Ynh+/lVe2tk8jguFrnD9fgJKA+Cu+GNr4\n\
Yd4+jw3JxqsofEJ3c3Yu9m3Qj3cv5sIJSINxECjF6I0FcbRQcFaDsgJaB5iP\n\
NQgKJi7u+RPq61ZAzwKkQzfde3d593e/S3XiO+fNrTgrhNKpxS4NkF3Jw+77\n\
xMZm5CgS+bRqGEqQDyRHA9jjHQl9f0YLYPj6TQ/w/mcHM4b+kRW33VZ+45Zb\n\
ypu/9jX+i3xEzQ4pTPgW4DYQOl6wuWLFSj4uZNg5z5BNNhgF5MECBX+RBz2h\n\
Zvk1Es6Wh/HrnjtosPAdgu9Xa5VEv2I04w9AN///4NagWcijJ4JqHipP+K+9\n\
HBeg4963ofc1D62LPYuI/S5oMq3S20neBW1PMdH85KtfYcLihsqTSMdsAqmw\n\
gYmImxWBiH5jh+pFZqjcm6E8GHdkPqkBs21knmnYCtgZZI4WbFi/XknSGszK\n\
xHWn699MIrsqDH2DhC7onXVfY/fysE/UEraWVS0tWIUVLjzgjVEUcN/vk1ct\n\
hqnUPoGNcQ99Ij5Juf9TfVpl5yzMXkifaIS4T6onneLW7hhTxSAwEmpchJ+j\n\
3M6um0oBBzpHpIEL6Q40GxyIQjApv2ZLdyYS2eMdWNW0Ff5AQUa9rzuFbaHc\n\
u4GMvG4kU8pxwR6g2bBXPekVZsKEdOur03DpS0mC42xSfbnH9YVnkjO5SZrg\n\
CBRtrQaOqSuJW104EkOD+r7ZuES7SNMrprEHLyhSE1ezGzEJi9F282tvu83I\n\
d10v3PD7Ti+UgYdKFDmArlRLd7jQpTH60XEWyufyRKW6+XKTYs3YbgyGvj8w\n\
wkqwrT1HPK/CADqTWNQh3Z8bzaXRolNcq+4NtHNn55C5HVPUDyYCH+dFcY1E\n\
UTqZhY9RoIfsviR8gCL7EringQKeFufZ2zQ+LsxImOnN0U3XtYmgxzqtoFPC\n\
X95hqlOrQdDqMHXz6jquZIGPFx4ukqNpM3dHIe+09kKfHchYBbtiNG1d3BvA\n\
MGzPUxmM5TgfP0/Yr2/WRMgPw02pR6aEby4KBEQ0AY1CQ5p/TFXoBAtwXJCn\n\
ymyo2xvL6BujCylBQ5cME9M0nBaA53FwSy6Eat3Z/EJIVrWlholWLbfzoD1E\n\
WqojIjdS08bwpF+t04asdlUq2nPH0KPtd99ZSLYEudqBKeRAWe0HARfXj4Hn\n\
YsPP4bkAqS58e0QXCq/ZevK6S8yUnkzgpH24iw9aUfqp3gGxzgeTFG48etie\n\
ltYy1At9piwMKsptE824JevTg4tSmw/h4QbyQzd08FLv+USaCc0KAypSPbjL\n\
9SB7zv8DvfxneQ=="], "ConferenceGraphicCell", ImageSize -> {1279, 52}, 
    ImageMargins -> 0], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Title"], CellMargins -> 0, 
       CellGroupingRules -> {"TitleGrouping", 0}, PageBreakBelow -> False, 
       CellFrameMargins -> {{82, 9}, {9, 12}}, DefaultNewInlineCellStyle -> 
       "None", InputAutoReplacements -> {"TeX" -> StyleBox[
           RowBox[{"T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "LaTeX" -> StyleBox[
           RowBox[{"L", 
             StyleBox[
              AdjustmentBox[
              "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, 
               BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", 
         "MMA" -> "Mathematica", "gridMathematica" -> FormBox[
           RowBox[{"grid", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], 
         "webMathematica" -> FormBox[
           RowBox[{"web", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, 
       LineSpacing -> {1, 11}, LanguageCategory -> "NaturalLanguage", 
       CounterIncrements -> "Title", 
       CounterAssignments -> {{"Section", 0}, {"Equation", 0}, {
         "Figure", 0}, {"Subtitle", 0}, {"Subsubtitle", 0}}, FontFamily -> 
       "Helvetica", FontSize -> 36, FontWeight -> "Bold", FontColor -> 
       RGBColor[1, 0.44, 0.19], Background -> RGBColor[0.31, 0.33, 0.37]], 
      Cell[
       StyleData["Title", "Presentation"], 
       CellMargins -> {{72, 50}, {10, 80}}, LineSpacing -> {1, 0}, FontSize -> 
       45], 
      Cell[
       StyleData["Title", "SlideShow"], CellMargins -> {{72, 50}, {10, 80}}, 
       FontSize -> 45], 
      Cell[
       StyleData["Title", "Printout"], CellMargins -> {{2, 10}, {12, 30}}, 
       FontSize -> 24]}, Open]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Subtitle"], CellMargins -> {{60, Inherited}, {20, 15}}, 
       CellGroupingRules -> {"TitleGrouping", 10}, PageBreakBelow -> False, 
       DefaultNewInlineCellStyle -> "None", 
       InputAutoReplacements -> {"TeX" -> StyleBox[
           RowBox[{"T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "LaTeX" -> StyleBox[
           RowBox[{"L", 
             StyleBox[
              AdjustmentBox[
              "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, 
               BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", 
         "MMA" -> "Mathematica", "gridMathematica" -> FormBox[
           RowBox[{"grid", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], 
         "webMathematica" -> FormBox[
           RowBox[{"web", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, 
       LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Subtitle",
        CounterAssignments -> {{"Section", 0}, {"Equation", 0}, {
         "Figure", 0}, {"Subsubtitle", 0}}, FontFamily -> "Helvetica", 
       FontSize -> 24], 
      Cell[
       StyleData["Subtitle", "Presentation"], LineSpacing -> {1, 0}, FontSize -> 
       30], 
      Cell[
       StyleData["Subtitle", "SlideShow"], FontSize -> 30], 
      Cell[
       StyleData["Subtitle", "Printout"], CellMargins -> {{2, 10}, {12, 8}}, 
       FontSize -> 18]}, {3}]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Subsubtitle"], CellMargins -> {{27, Inherited}, {8, 2}}, 
       CellGroupingRules -> {"TitleGrouping", 20}, PageBreakBelow -> False, 
       DefaultNewInlineCellStyle -> "None", 
       InputAutoReplacements -> {"TeX" -> StyleBox[
           RowBox[{"T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "LaTeX" -> StyleBox[
           RowBox[{"L", 
             StyleBox[
              AdjustmentBox[
              "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, 
               BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", 
         "MMA" -> "Mathematica", "gridMathematica" -> FormBox[
           RowBox[{"grid", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], 
         "webMathematica" -> FormBox[
           RowBox[{"web", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, 
       LanguageCategory -> "NaturalLanguage", CounterIncrements -> 
       "Subsubtitle", 
       CounterAssignments -> {{"Section", 0}, {"Equation", 0}, {"Figure", 0}},
        StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 16], 
      
      Cell[
       StyleData["Subsubtitle", "Presentation"], 
       CellMargins -> {{54, 10}, {20, 20}}, LineSpacing -> {1, 0}, FontSize -> 
       24], 
      Cell[
       StyleData["Subsubtitle", "SlideShow"], 
       CellMargins -> {{72, 25}, {30, 10}}], 
      Cell[
       StyleData["Subsubtitle", "Printout"], 
       CellMargins -> {{2, 10}, {12, 8}}, FontSize -> 14]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Section"], CellMargins -> {{27, Inherited}, {8, 34}}, 
       CellGroupingRules -> {"SectionGrouping", 30}, PageBreakBelow -> False, 
       CellFrameMargins -> 4, DefaultNewInlineCellStyle -> "None", 
       InputAutoReplacements -> {"TeX" -> StyleBox[
           RowBox[{"T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "LaTeX" -> StyleBox[
           RowBox[{"L", 
             StyleBox[
              AdjustmentBox[
              "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, 
               BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", 
         "MMA" -> "Mathematica", "gridMathematica" -> FormBox[
           RowBox[{"grid", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], 
         "webMathematica" -> FormBox[
           RowBox[{"web", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, 
       LineSpacing -> {1, 2}, LanguageCategory -> "NaturalLanguage", 
       CounterIncrements -> "Section", 
       CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}}, 
       FontFamily -> "Helvetica", FontSize -> 20, FontWeight -> "Bold", 
       FontColor -> RGBColor[0.4, 0.4, 0.4]], 
      Cell[
       StyleData["Section", "Presentation"], CellFrame -> {{0, 0}, {0, 2}}, 
       ShowGroupOpener -> True, CellMargins -> {{72, 50}, {11, 30}}, 
       CellFrameColor -> RGBColor[1, 0.796078, 0.501961], FontSize -> 30], 
      Cell[
       StyleData["Section", "SlideShow"], CellMargins -> {{71, 50}, {11, 35}},
        FontSize -> 30], 
      Cell[
       StyleData["Section", "Printout"], CellMargins -> {{2, 0}, {7, 22}}, 
       FontSize -> 14]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Subsection"], CellDingbat -> None, ShowGroupOpener -> True, 
       CellMargins -> {{60, Inherited}, {8, 12}}, 
       CellGroupingRules -> {"SectionGrouping", 40}, PageBreakBelow -> False, 
       DefaultNewInlineCellStyle -> "None", 
       InputAutoReplacements -> {"TeX" -> StyleBox[
           RowBox[{"T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "LaTeX" -> StyleBox[
           RowBox[{"L", 
             StyleBox[
              AdjustmentBox[
              "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, 
               BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", 
         "MMA" -> "Mathematica", "gridMathematica" -> FormBox[
           RowBox[{"grid", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], 
         "webMathematica" -> FormBox[
           RowBox[{"web", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, 
       LanguageCategory -> "NaturalLanguage", CounterIncrements -> 
       "Subsection", CounterAssignments -> {{"Subsubsection", 0}}, FontFamily -> 
       "Helvetica", FontSize -> 16, FontWeight -> "Bold", FontColor -> 
       RGBColor[1, 0.44, 0.19]], 
      Cell[
       RawData[
       "Cell[StyleData[\"Subsection\", \"Presentation\"],\n \
CellMargins->{{72, 50}, {6, 15}},\n LineSpacing->{1, 0},\n FontSize->24]"], 
       CellMargins -> {{72, 50}, {6, 15}}, LineSpacing -> {1, 0}, FontSize -> 
       24], 
      Cell[
       RawData[
       "Cell[StyleData[\"Subsection\", \"SlideShow\"],\n CellMargins->{{99, \
50}, {8, 12}},\n LineSpacing->{1, 0},\n FontSize->24]"], 
       CellMargins -> {{99, 50}, {8, 12}}, LineSpacing -> {1, 0}, FontSize -> 
       24], 
      Cell[
       RawData[
       "Cell[StyleData[\"Subsection\", \"Printout\"],\n CellMargins->{{21, \
0}, {8, 22}},\n FontSize->12]"], CellMargins -> {{21, 0}, {8, 22}}, FontSize -> 
       12]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Subsubsection"], CellMargins -> {{60, Inherited}, {2, 12}}, 
       CellGroupingRules -> {"SectionGrouping", 50}, PageBreakBelow -> False, 
       DefaultNewInlineCellStyle -> "None", 
       InputAutoReplacements -> {"TeX" -> StyleBox[
           RowBox[{"T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "LaTeX" -> StyleBox[
           RowBox[{"L", 
             StyleBox[
              AdjustmentBox[
              "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, 
               BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", 
         "MMA" -> "Mathematica", "gridMathematica" -> FormBox[
           RowBox[{"grid", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], 
         "webMathematica" -> FormBox[
           RowBox[{"web", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, 
       LanguageCategory -> "NaturalLanguage", CounterIncrements -> 
       "Subsubsection", FontFamily -> "Helvetica", FontWeight -> "Bold", 
       FontColor -> RGBColor[0, 0.3, 0.6]], 
      Cell[
       StyleData["Subsubsection", "Presentation"], 
       CellMargins -> {{72, 50}, {6, 20}}, LineSpacing -> {1, 0}, FontSize -> 
       18], 
      Cell[
       StyleData["Subsubsection", "SlideShow"], 
       CellMargins -> {{99, 50}, {6, 20}}, FontSize -> 18], 
      Cell[
       StyleData["Subsubsection", "Printout"], 
       CellMargins -> {{2, 0}, {7, 14}}, FontSize -> 11]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Text"], CellMargins -> {{60, 10}, {7, 7}}, 
       InputAutoReplacements -> {"TeX" -> StyleBox[
           RowBox[{"T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "LaTeX" -> StyleBox[
           RowBox[{"L", 
             StyleBox[
              AdjustmentBox[
              "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, 
               BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", 
             AdjustmentBox[
             "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 
              0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", 
         "MMA" -> "Mathematica", "gridMathematica" -> FormBox[
           RowBox[{"grid", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], 
         "webMathematica" -> FormBox[
           RowBox[{"web", 
             AdjustmentBox[
              StyleBox["Mathematica", FontSlant -> "Italic"], 
              BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, 
       LineSpacing -> {1, 3}, CounterIncrements -> "Text", FontFamily -> 
       "Helvetica"], 
      Cell[
       StyleData["Text", "Presentation"], CellMargins -> {{72, 50}, {10, 10}},
        LineSpacing -> {1, 5}, FontSize -> 17], 
      Cell[
       StyleData["Text", "SlideShow"], CellMargins -> {{100, 50}, {10, 10}}, 
       FontSize -> 17], 
      Cell[
       StyleData["Text", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, 
       TextJustification -> 0.5, Hyphenation -> True, FontSize -> 10]}, 
     Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["SmallText"], CellMargins -> {{60, 10}, {6, 6}}, 
       DefaultNewInlineCellStyle -> "None", LineSpacing -> {1, 3}, 
       LanguageCategory -> "NaturalLanguage", CounterIncrements -> 
       "SmallText", FontFamily -> "Helvetica", FontSize -> 9], 
      Cell[
       StyleData["SmallText", "Presentation"], 
       CellMargins -> {{72, 50}, {8, 8}}, LineSpacing -> {1, 5}, FontSize -> 
       10], 
      Cell[
       StyleData["SmallText", "SlideShow"], 
       CellMargins -> {{100, 50}, {8, 8}}, LineSpacing -> {1, 5}, FontSize -> 
       10], 
      Cell[
       StyleData["SmallText", "Printout"], CellMargins -> {{2, 2}, {5, 5}}, 
       TextJustification -> 0.5, Hyphenation -> True, FontSize -> 7]}, 
     Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Author"], CellMargins -> {{90, 27}, {2, 20}}, FontFamily -> 
       "Times", FontSize -> 24, FontSlant -> "Italic"], 
      Cell[
       StyleData["Author", "Presentation"], FontSize -> 32], 
      Cell[
       StyleData["Author", "SlideShow"], FontSize -> 32], 
      Cell[
       StyleData["Author", "Printout"], CellMargins -> {{100, 27}, {2, 20}}, 
       FontSize -> 14]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Affiliation"], CellMargins -> {{90, 27}, {30, 12}}, 
       FontFamily -> "Times", FontSize -> 24, FontSlant -> "Italic"], 
      Cell[
       StyleData["Affiliation", "Presentation"], FontSize -> 32], 
      Cell[
       StyleData["Affiliation", "SlideShow"], FontSize -> 32], 
      Cell[
       StyleData["Affiliation", "Printout"], 
       CellMargins -> {{100, 27}, {2, 12}}, FontSize -> 14]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["ConferenceGraphicCell"], ShowCellBracket -> True, 
       CellMargins -> {{0, 0}, {0, 0}}, Evaluatable -> False, PageBreakBelow -> 
       False, ImageMargins -> {{0, 0}, {0, 0}}, 
       ImageRegion -> {{0, 1}, {0, 1}}, Magnification -> 1, Background -> 
       GrayLevel[1]], 
      Cell[
       StyleData["ConferenceGraphicCell", "Presentation"], ShowCellBracket -> 
       False], 
      Cell[
       StyleData["ConferenceGraphicCell", "SlideShow"], ShowCellBracket -> 
       False], 
      Cell[
       StyleData["ConferenceGraphicCell", "Printout"], FontSize -> 8, 
       Magnification -> 0.75]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["GraphicNoMagnification"], CellMargins -> {{60, 10}, {7, 7}},
        LineSpacing -> {1, 3}, CounterIncrements -> "Text", FontFamily -> 
       "Helvetica", Magnification -> 1], 
      Cell[
       StyleData["GraphicNoMagnification", "Presentation"], 
       CellMargins -> {{72, 50}, {10, 10}}, LineSpacing -> {1, 5}, FontSize -> 
       17], 
      Cell[
       StyleData["GraphicNoMagnification", "SlideShow"], 
       CellMargins -> {{100, 50}, {10, 10}}, FontSize -> 17], 
      Cell[
       StyleData["GraphicNoMagnification", "Printout"], 
       CellMargins -> {{2, 2}, {6, 6}}, FontSize -> 10]}, Closed]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Input"], ShowCellBracket -> True, 
       CellMargins -> {{66, 10}, {5, 7}}, 
       CellBracketOptions -> {
        "Color" -> RGBColor[0.734936, 0.713848, 0.694041]}, Evaluatable -> 
       True, CellGroupingRules -> "InputGrouping", CellHorizontalScrolling -> 
       True, PageBreakWithin -> False, GroupPageBreakWithin -> False, 
       DefaultFormatType -> DefaultInputFormatType, 
       "TwoByteSyntaxCharacterAutoReplacement" -> True, 
       HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, 
       AutoItalicWords -> {}, LanguageCategory -> "Mathematica", FormatType -> 
       InputForm, ShowStringCharacters -> True, NumberMarks -> True, 
       LinebreakAdjustments -> {0.85, 2, 10, 0, 1}, CounterIncrements -> 
       "Input", FontWeight -> "Bold"], 
      Cell[
       StyleData["Input", "Presentation"], CellMargins -> {{72, 50}, {8, 10}},
        LineSpacing -> {1, 0}, FontSize -> 18], 
      Cell[
       StyleData["Input", "SlideShow"], CellMargins -> {{100, 50}, {8, 10}}, 
       LineSpacing -> {1, 0}, FontSize -> 18], 
      Cell[
       StyleData["Input", "Printout"], CellMargins -> {{39, 0}, {4, 6}}, 
       LinebreakAdjustments -> {0.85, 2, 10, 1, 1}, FontSize -> 9]}, Closed]],
    
   Cell[
    CellGroupData[{
      Cell[
       StyleData["InputOnly"], ShowCellBracket -> True, 
       CellMargins -> {{66, 10}, {7, 7}}, 
       CellBracketOptions -> {
        "Color" -> RGBColor[0.734936, 0.713848, 0.694041]}, Evaluatable -> 
       True, CellGroupingRules -> "InputGrouping", CellHorizontalScrolling -> 
       True, DefaultFormatType -> DefaultInputFormatType, 
       "TwoByteSyntaxCharacterAutoReplacement" -> True, 
       HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, 
       AutoItalicWords -> {}, LanguageCategory -> "Mathematica", FormatType -> 
       InputForm, ShowStringCharacters -> True, NumberMarks -> True, 
       LinebreakAdjustments -> {0.85, 2, 10, 0, 1}, CounterIncrements -> 
       "Input", StyleMenuListing -> None, FontWeight -> "Bold"], 
      Cell[
       StyleData["InputOnly", "Presentation"], 
       CellMargins -> {{72, Inherited}, {8, 10}}, LineSpacing -> {1, 0}, 
       FontSize -> 18], 
      Cell[
       StyleData["InputOnly", "SlideShow"], 
       CellMargins -> {{100, Inherited}, {8, 10}}, LineSpacing -> {1, 0}, 
       FontSize -> 18], 
      Cell[
       StyleData["InputOnly", "Printout"], CellMargins -> {{39, 0}, {4, 6}}, 
       LinebreakAdjustments -> {0.85, 2, 10, 1, 1}, FontSize -> 9]}, Closed]],
    
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Output"], ShowCellBracket -> True, 
       CellMargins -> {{66, 10}, {7, 5}}, 
       CellBracketOptions -> {
        "Color" -> RGBColor[0.734936, 0.713848, 0.694041]}, CellEditDuplicate -> 
       True, CellGroupingRules -> "OutputGrouping", CellHorizontalScrolling -> 
       True, PageBreakWithin -> False, GroupPageBreakWithin -> False, 
       GeneratedCell -> True, CellAutoOverwrite -> True, DefaultFormatType -> 
       DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> 
       True, HyphenationOptions -> {
        "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, 
       LanguageCategory -> None, FormatType -> InputForm, CounterIncrements -> 
       "Output"], 
      Cell[
       StyleData["Output", "Presentation"], 
       CellMargins -> {{72, 50}, {10, 8}}, LineSpacing -> {1, 0}, FontSize -> 
       18], 
      Cell[
       StyleData["Output", "SlideShow"], CellMargins -> {{100, 50}, {10, 8}}, 
       LineSpacing -> {1, 0}, FontSize -> 18], 
      Cell[
       StyleData["Output", "Printout"], CellMargins -> {{39, 0}, {6, 4}}, 
       FontSize -> 9]}, Closed]]}, Visible -> False, FrontEndVersion -> 
  "6.0 for Mac OS X x86 (32-bit) (February 7, 2008)", StyleDefinitions -> 
  "PrivateStylesheetFormatting.nb"]
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "TitleCellTag"->{
  Cell[966, 35, 475, 9, 57, "Title",
   CellTags->"TitleCellTag"]},
 "SubtitleCellTag"->{
  Cell[1444, 46, 528, 12, 80, "Subtitle",
   CellTags->"SubtitleCellTag"]},
 "AuthorsCellTag"->{
  Cell[1975, 60, 324, 7, 46, "Author",
   CellTags->"AuthorsCellTag"]},
 "AffiliationCellTag"->{
  Cell[2302, 69, 260, 6, 66, "Affiliation",
   CellTags->"AffiliationCellTag"]},
 "AddressCellTag"->{
  Cell[3303, 104, 4462, 130, 194, "Output",
   CellTags->"AddressCellTag"]},
 "SubmissionTypeCellTag"->{
  Cell[8695, 268, 6553, 177, 166, "Output",
   CellTags->"SubmissionTypeCellTag"]},
 "TargetGroupCellTag"->{
  Cell[15903, 470, 24852, 670, 686, "Output",
   CellTags->"TargetGroupCellTag"]},
 "SaveButtonCellTag"->{
  Cell[43250, 1193, 2066, 53, 58, "Text",
   CellTags->"SaveButtonCellTag"]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"TitleCellTag", 93529, 2148},
 {"SubtitleCellTag", 93619, 2151},
 {"AuthorsCellTag", 93716, 2154},
 {"AffiliationCellTag", 93813, 2157},
 {"AddressCellTag", 93915, 2160},
 {"SubmissionTypeCellTag", 94020, 2163},
 {"TargetGroupCellTag", 94129, 2166},
 {"SaveButtonCellTag", 94236, 2169}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[568, 21, 373, 10, 12, "ConferenceGraphicCell"],
Cell[CellGroupData[{
Cell[966, 35, 475, 9, 57, "Title",
 CellTags->"TitleCellTag"],
Cell[1444, 46, 528, 12, 80, "Subtitle",
 CellTags->"SubtitleCellTag"],
Cell[1975, 60, 324, 7, 46, "Author",
 CellTags->"AuthorsCellTag"],
Cell[2302, 69, 260, 6, 66, "Affiliation",
 CellTags->"AffiliationCellTag"],
Cell[2565, 77, 288, 8, 26, "Text"],
Cell[CellGroupData[{
Cell[2878, 89, 226, 6, 36, "Subsection"],
Cell[3107, 97, 193, 5, 26, "Text"],
Cell[3303, 104, 4462, 130, 194, "Output",
 CellTags->"AddressCellTag"]
}, Closed]],
Cell[CellGroupData[{
Cell[7802, 239, 184, 5, 28, "Subsection"],
Cell[CellGroupData[{
Cell[8011, 248, 191, 5, 27, "Subsubsection"],
Cell[8205, 255, 487, 11, 41, "Text"],
Cell[8695, 268, 6553, 177, 166, "Output",
 CellTags->"SubmissionTypeCellTag"]
}, Open  ]],
Cell[CellGroupData[{
Cell[15285, 450, 208, 6, 27, "Subsubsection",
 PageBreakAbove->True],
Cell[15496, 458, 404, 10, 26, "Text"],
Cell[15903, 470, 24852, 670, 686, "Output",
 CellTags->"TargetGroupCellTag"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[40804, 1146, 135, 5, 28, "Subsection",
 PageBreakAbove->True],
Cell[40942, 1153, 614, 12, 26, "Text"],
Cell[41559, 1167, 1688, 24, 146, "Text"],
Cell[43250, 1193, 2066, 53, 58, "Text",
 CellTags->"SaveButtonCellTag"]
}, Closed]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)