(* 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[ 263149, 5980] NotebookOptionsPosition[ 257993, 5809] NotebookOutlinePosition[ 258408, 5827] CellTagsIndexPosition[ 258365, 5824] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Assembly File for the Places Gallery", "Title", CellChangeTimes->{{3.390322707078125*^9, 3.390322709875*^9}, 3.394688847765625*^9}], Cell[CellGroupData[{ Cell["To do", "Subsubsection", CellChangeTimes->{{3.391409903*^9, 3.3914099185625*^9}, {3.39140998228125*^9, 3.391409983015625*^9}, {3.39474705721875*^9, 3.394747060453125*^9}}], Cell["Make \"Place\" pages adjust to window size.", "Text", CellChangeTimes->{{3.39614470809825*^9, 3.396144725926375*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Actions", "Section", CellChangeTimes->{{3.3903227483125*^9, 3.390322767125*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ "SetDirectory", "[", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Make", " ", "/@", " ", "AllPages"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"files", "=", RowBox[{ RowBox[{"Page", "[", "0", "]"}], "[", "AllFiles", "]"}]}], ";"}], "\n", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"OrphanedFiles", " ", "=", " ", RowBox[{"Complement", "[", RowBox[{ RowBox[{"FileNames", "[", "]"}], ",", " ", RowBox[{"files", "~", "Join", "~", RowBox[{"{", "\"\\"", "}"}]}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"MissingFiles", " ", "=", " ", RowBox[{"Complement", "[", RowBox[{"files", ",", " ", RowBox[{"FileNames", "[", "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "}"}]}], "Input", CellChangeTimes->{{3.39032295353125*^9, 3.3903229980625*^9}, { 3.39640646628125*^9, 3.39640648146875*^9}, {3.491068863635*^9, 3.4910688665220003`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.3964080656875*^9, 3.396408124203125*^9, 3.396408299734375*^9, 3.396408362890625*^9, 3.396408591796875*^9, 3.39640879684375*^9, 3.3964088803125*^9, 3.39653295075*^9, 3.3965330115625*^9, 3.396533207703125*^9, 3.396533845703125*^9, 3.39653396053125*^9, 3.396534090203125*^9, 3.396534382421875*^9, 3.396534499734375*^9, 3.396557667625*^9, 3.396557770859375*^9, 3.3965592060625*^9, 3.39655929071875*^9, 3.396567594875*^9, 3.3965676835*^9, 3.396567776171875*^9, 3.39656802471875*^9, 3.39656828659375*^9, 3.396568585296875*^9, 3.3966105345*^9, 3.396612966046875*^9, 3.396613078*^9, 3.396613134953125*^9, 3.39661331240625*^9, 3.396613482328125*^9, 3.39661398909375*^9, 3.396614105671875*^9, 3.396614203359375*^9, 3.396614342640625*^9, 3.396614612859375*^9, 3.396614679953125*^9, 3.396615005859375*^9, 3.396960633640625*^9, 3.39696111025*^9, 3.396961303796875*^9, {3.3969617549375*^9, 3.396961760921875*^9}, 3.396961908109375*^9, 3.396961950703125*^9, { 3.4470248714715*^9, 3.4470248970935*^9}, {3.4470250226495*^9, 3.4470250372425003`*^9}, 3.4470252078775*^9, 3.4470256304925003`*^9, 3.4470263018325*^9, {3.4487448694890003`*^9, 3.448744889975*^9}, { 3.448745018705*^9, 3.448745029677*^9}, 3.448745342454*^9, 3.448745469385*^9, {3.448745517584*^9, 3.4487455277609997`*^9}, 3.448746197849*^9, {3.4487462349709997`*^9, 3.4487462508529997`*^9}, 3.448746449212*^9, 3.4487469683199997`*^9, {3.473812963799*^9, 3.473812986007*^9}, 3.49091262533*^9, 3.490912702743*^9, 3.4909127512209997`*^9, 3.4909127918380003`*^9, 3.490912990079*^9, 3.490913089513*^9, 3.4909134274230003`*^9, 3.490913638244*^9, 3.4909143529630003`*^9, 3.49091442854*^9, 3.4909980890480003`*^9, { 3.490998171791*^9, 3.490998186267*^9}, 3.4909985269630003`*^9, 3.490999043929*^9, 3.490999316925*^9, 3.4909998888599997`*^9, 3.4909999898059998`*^9, 3.491000246627*^9, 3.4910012335439997`*^9, 3.491065760227*^9, 3.4910686096730003`*^9, 3.491068761137*^9, 3.491069048256*^9, 3.4910692538310003`*^9, 3.49106949419*^9, 3.491069559389*^9, 3.49106959925*^9, 3.491069657685*^9, 3.491069738665*^9, {3.491070192507*^9, 3.4910702105439997`*^9}, 3.495477529877*^9}] }, Open ]], Cell[BoxData[ RowBox[{"DeleteFile", "[", "OrphanedFiles", "]"}]], "Input", CellChangeTimes->{3.39032300415625*^9, 3.3950821101875*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#", " ", "\[Rule]", " ", "#"}], ")"}], "&"}], " ", "/@", " ", RowBox[{"SortBy", "[", RowBox[{ RowBox[{"Select", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#", "[", "HTMLFile", "]"}], ")"}], "&"}], " ", "/@", " ", "AllPages"}], ",", " ", RowBox[{ RowBox[{ RowBox[{"StringLength", "[", "#", "]"}], ">", "39"}], "&"}]}], "]"}], ",", " ", RowBox[{ RowBox[{"(", RowBox[{"-", RowBox[{"StringLength", "[", "#", "]"}]}], ")"}], "&"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.396960006453125*^9, 3.39696004275*^9}, { 3.39696007665625*^9, 3.39696010021875*^9}, {3.396960198484375*^9, 3.396960252953125*^9}, {3.396960304390625*^9, 3.3969603579375*^9}, { 3.39696108328125*^9, 3.396961091*^9}, {3.396961441625*^9, 3.396961513515625*^9}, {3.396961734921875*^9, 3.396961743234375*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"\<\"BO0902-Bucaramanga-Lara_Simone_Suarez_Lopez.html\"\>", "\[Rule]", "\<\"BO0902-Bucaramanga-Lara_Simone_Suarez_Lopez.html\"\>"}], ",", RowBox[{"\<\"BO0902-Bucaramanga-Puente_de_Boyaca.html\"\>", "\[Rule]", "\<\"BO0902-Bucaramanga-Puente_de_Boyaca.html\"\>"}], ",", RowBox[{"\<\"HN0708-TayPhuong-Along_the_Road_(1).html\"\>", "\[Rule]", "\<\"HN0708-TayPhuong-Along_the_Road_(1).html\"\>"}], ",", RowBox[{"\<\"HN0708-TayPhuong-Along_the_Road_(2).html\"\>", "\[Rule]", "\<\"HN0708-TayPhuong-Along_the_Road_(2).html\"\>"}], ",", RowBox[{"\<\"HN0708-TayPhuong-Along_the_Road_(3).html\"\>", "\[Rule]", "\<\"HN0708-TayPhuong-Along_the_Road_(3).html\"\>"}], ",", RowBox[{"\<\"HN0708-TayPhuong-Along_the_Road_(4).html\"\>", "\[Rule]", "\<\"HN0708-TayPhuong-Along_the_Road_(4).html\"\>"}], ",", RowBox[{"\<\"Kyoto0705-A_Vertical_Parking_Garage.html\"\>", "\[Rule]", "\<\"Kyoto0705-A_Vertical_Parking_Garage.html\"\>"}], ",", RowBox[{"\<\"Kyoto0705-Conference-Joel_Kamnitzer.html\"\>", "\[Rule]", "\<\"Kyoto0705-Conference-Joel_Kamnitzer.html\"\>"}], ",", RowBox[{"\<\"Kyoto0705-Outside_the_Kyoto_Station.html\"\>", "\[Rule]", "\<\"Kyoto0705-Outside_the_Kyoto_Station.html\"\>"}], ",", RowBox[{"\<\"TJ0707-A_Street_Scene_in_Jixian_(1).html\"\>", "\[Rule]", "\<\"TJ0707-A_Street_Scene_in_Jixian_(1).html\"\>"}], ",", RowBox[{"\<\"TJ0707-A_Street_Scene_in_Jixian_(2).html\"\>", "\[Rule]", "\<\"TJ0707-A_Street_Scene_in_Jixian_(2).html\"\>"}], ",", RowBox[{"\<\"TJ0707-A_Street_Scene_in_Jixian_(3).html\"\>", "\[Rule]", "\<\"TJ0707-A_Street_Scene_in_Jixian_(3).html\"\>"}], ",", RowBox[{"\<\"TJ0707-A_Street_Scene_in_Jixian_(4).html\"\>", "\[Rule]", "\<\"TJ0707-A_Street_Scene_in_Jixian_(4).html\"\>"}], ",", RowBox[{"\<\"TJ0707-A_Street_Scene_in_Jixian_(5).html\"\>", "\[Rule]", "\<\"TJ0707-A_Street_Scene_in_Jixian_(5).html\"\>"}]}], "}"}]], "Output", CellChangeTimes->{{3.396960031109375*^9, 3.39696004328125*^9}, 3.396960077046875*^9, {3.39696021971875*^9, 3.396960229859375*^9}, { 3.39696031125*^9, 3.3969603585*^9}, {3.3969610859375*^9, 3.396961091640625*^9}, 3.39696132128125*^9, 3.396961449328125*^9, { 3.39696148521875*^9, 3.396961514046875*^9}, {3.396961728484375*^9, 3.396961743578125*^9}, 3.4470256431545*^9, 3.4910701993120003`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["The Images", "Section", CellChangeTimes->{{3.390322787203125*^9, 3.390322810125*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Aliases", " ", "=", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ "\"\\"", " ", "\[Rule]", " ", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ "\"\\"", " ", "\[Rule]", " ", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ "\"\\"", " ", "\[Rule]", " ", "\"\\""}]}], "\[IndentingNewLine]", "}"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.39696042615625*^9, 3.39696048209375*^9}, 3.396960513453125*^9, {3.3969612684375*^9, 3.3969612898125*^9}, { 3.396961457890625*^9, 3.396961459546875*^9}, {3.396961525609375*^9, 3.3969617155625*^9}, {3.473812913849*^9, 3.473812927981*^9}}], Cell[BoxData[ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", "\[IndentingNewLine]", RowBox[{"Title", " ", "\[Rule]", " ", "\"\\""}], ",", " ", RowBox[{"(*", " ", RowBox[{ "Defaults", " ", "to", " ", "ImageFile", " ", "with", " ", "the", " ", "extension", " ", "removed"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ "HTMLName", " ", "\[Rule]", " ", "\"\\""}], ",", " ", RowBox[{"(*", " ", RowBox[{ "Defaults", " ", "to", " ", "Title", " ", "with", " ", "spaces", " ", "replaced", " ", "by", " ", "underscores", " ", RowBox[{"and", " ", ".", "html"}], " ", "added"}], "*)"}], "\[IndentingNewLine]", RowBox[{"Text", " ", "\[Rule]", " ", "\"\\""}], ",", " ", RowBox[{"(*", " ", RowBox[{"Defaults", " ", "to", " ", "\"\<\>\""}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ "ExtraText", " ", "\[Rule]", " ", "\"\\""}], ",", " ", RowBox[{"(*", " ", RowBox[{"Defaults", " ", "to", " ", "\"\<\>\""}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ "ImageFile", " ", "\[Rule]", " ", "\"\\""}], ",", " ", RowBox[{"(*", " ", RowBox[{"Must", " ", "be", " ", RowBox[{"present", "!"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"FullSize", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{"w", ",", " ", "h"}], "}"}]}], ",", " ", RowBox[{"(*", " ", RowBox[{ "Read", " ", "from", " ", "image", " ", "file", " ", "if", " ", "not", " ", "given"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"DisplaySize", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{"w", ",", " ", "h"}], "}"}]}]}], " ", RowBox[{"(*", " ", RowBox[{"Defaults", " ", "to", " ", "640", " ", "by", " ", "640", " ", RowBox[{"(", "max", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", "]"}]], "Input", Evaluatable->False, CellChangeTimes->{{3.389794482203125*^9, 3.38979448271875*^9}, 3.389824130640625*^9, {3.390322787203125*^9, 3.390322810125*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "FullTitle", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLFile", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullPrefix", "\[Rule]", "\"\<\>\""}], ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], ",", " ", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", " ", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", " ", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", " ", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", " ", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", " ", RowBox[{"Pages", "[", "\"\\"", "]"}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.395248515453125*^9, 3.395248536328125*^9}, { 3.4470243998245*^9, 3.4470244154985*^9}, {3.4909125905039997`*^9, 3.490912597675*^9}, {3.490912729888*^9, 3.4909127343780003`*^9}, { 3.490997783649*^9, 3.490997809534*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", "\[IndentingNewLine]", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3000", ",", "2700"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"IconFile", " ", "\[Rule]", " ", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"ExtraText", " ", "\[Rule]", " ", RowBox[{"StringReplace", "[", RowBox[{ RowBox[{ "ExtractDataCell", "[", "\"\\"", "]"}], ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\"\<<*\>\"", "~~", RowBox[{"ShortestMatch", "[", "s___", "]"}], "~~", "\"\<*>\>\""}], " ", "\[RuleDelayed]", " ", RowBox[{"StringJoin", "[", "\[IndentingNewLine]", RowBox[{ "\"\<\"", ",", " ", "s", ",", " ", "\"\<\\\">\>\"", ",", "s", ",", " ", "\"\<\>\""}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\<<#\>\"", "~~", RowBox[{"ShortestMatch", "[", "u___", "]"}], "~~", "\"\<; \>\"", "~~", RowBox[{"ShortestMatch", "[", "s___", "]"}], "~~", "\"\<#>\>\""}], " ", "\[RuleDelayed]", " ", RowBox[{"StringJoin", "[", "\[IndentingNewLine]", RowBox[{ "\"\<\"", ",", " ", "u", ",", " ", "\"\<\\\">\>\"", ",", "s", ",", " ", "\"\<\>\""}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.490912433252*^9, {3.4909124898640003`*^9, 3.490912607146*^9}, { 3.490912771566*^9, 3.490912775974*^9}, {3.490913569224*^9, 3.490913607762*^9}, {3.4909144089700003`*^9, 3.490914411571*^9}, { 3.49099784398*^9, 3.490997930368*^9}, {3.4909979664700003`*^9, 3.490997987686*^9}, {3.490998033321*^9, 3.4909980565699997`*^9}, { 3.490998140605*^9, 3.490998150035*^9}, {3.490998352888*^9, 3.490998393769*^9}, {3.490998775545*^9, 3.490998878398*^9}, { 3.4909989130290003`*^9, 3.490998993156*^9}, {3.490999668626*^9, 3.490999672072*^9}, {3.4909997191070004`*^9, 3.490999776111*^9}, { 3.4909999462279997`*^9, 3.4909999492799997`*^9}, 3.49100121551*^9, { 3.4910657248859997`*^9, 3.491065739987*^9}, {3.491070162611*^9, 3.491070175157*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"StringReplace", "::", "\<\"strse\"\>"}], RowBox[{ ":", " "}], "\<\"\\!\\(\\*StyleBox[\\\"\\\\\\\"String or list of strings \ expected at position \\\\\\\"\\\", \\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\ \\!\\(1\\), \\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\" in \ \\\\\\\"\\\", \ \\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\!\\(StringReplace[\\(\\(\\(\\(\ ExtractDataCell[\\\"AllOver-1008 Extra Text\\\"]\\)\\), \\(\\({\\(\\(\\(\\(\\\ \"<*\\\" ~~ \\(\\(ShortestMatch[s___]\\)\\) ~~ \\\"*>\\\"\\)\\) \ \[RuleDelayed] \\(\\(\\\" s <> \\\"\\\\\\\">\\\" <> s \ <> \\\"\\\"\\)\\)\\)\\), \\(\\(\\(\\(\\\"<#\\\" ~~ \ \\(\\(ShortestMatch[u___]\\)\\) ~~ \\\"; \\\" ~~ \\(\\(ShortestMatch[s___]\\)\ \\) ~~ \\\"#>\\\"\\)\\) \[RuleDelayed] \\(\\(\\\" u <> \\\"\\\\\\\">\\\" <> s \ <> \\\"\\\"\\)\\)\\)\\)}\\)\\)\\)\\)]\\), \ \\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\".\\\\\\\"\\\", \\\"MT\\\ \"]\\) \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/strse\\\", ButtonNote -> \ \\\"StringReplace::strse\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.491001224168*^9, 3.4910657509700003`*^9, 3.491068603947*^9, 3.4910687565559998`*^9, 3.491069043637*^9, 3.491069249023*^9, 3.491069489309*^9, 3.491069552906*^9, 3.491069594416*^9, 3.491069732973*^9, 3.491070186658*^9, 3.495477518657*^9}] }, Open ]], Cell["\<\ Data Cell AllOver-1008 Extra Text: On August 7, 2010 Assaf and I visited <*Hamburg*>, <*Boston*>, <*Corfu*>, \ <*Alabama*>, <*Medina*>, <*Elba*>, <*Bergen*>, <*Lima*>, <*Bristol*>, \ <*Naples*>, <*Italy*>, <*Geneva*>, <#Waterloo, Belgium; Waterloo#>, <#Tyre, \ Lebanon; Tyre#>, <*Jordan*>, <*Memphis*>, <*Liverpool*>, <*Verona*>, \ <*Vienna*>, <*Rome*>, <*Paris*>, <*Poland*>, <*Russia*>, <*Norway*>, \ <*Ephratah*>, <#Perth, Western Australia; Perth#>, <*Amsterdam*>, \ <*Rotterdam*>, <*Troy*>, and <*Berlin*>.

Extras. Before lunch map: (@google) and after lunch map: (@google). Starting picture: , ending picture: . In Italy, we met the leader and the first lady: . The evening before, we've been to South Park: . Another poster: . Higher resolution images are here and here. In full screen mode, hit \"t\" to make this text \ box disappear.
\ \>", "Text", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmViYGAQA2IQzcDgqjXT5aUjQ8NyCM0wzwDCvwOhGZQD27xBdHkY mG5oj4LwN6ZA+CWbIXT+Dgi9iX87WD5BGEw3fEl57Quiv2eC6CkSCSy9TK8c L/uysYHouF2CAiBa7GaVMIi22uIiA6K//BWQBdFhfF+jQfSkt1NiQbRc6+QC EL1stkw9RPzJXhB9tWLhcRAtsk78Nog+oqAApj0eXvJfD6QXSLEHgOgZeVlp IHqaczOYLpm8omM92P5jPSCagcFlMYjeIXd0GYiOsPywG0SfPbPjCIhunMp+ CkQH9PafAdFLCk5eANGnF7JeAtEhj2Mfg+g9JevBNABALKDs "]], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: \ Montpellier-1006.\>\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3000", ",", "3000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3000", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"4000", ",", "3000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"4000", ",", "3000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{ RowBox[{"{", RowBox[{"3240", ",", "4320"}], "}"}], "/", "2"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{ RowBox[{"{", RowBox[{"4320", ",", "3240"}], "}"}], "/", "2"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.490912433252*^9, {3.4909124898640003`*^9, 3.490912607146*^9}, { 3.490912771566*^9, 3.490912775974*^9}, {3.490913569224*^9, 3.490913607762*^9}, {3.4909144089700003`*^9, 3.490914411571*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: \ Bogota-0902.\>\""}], ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1024", ",", "768"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4470244233135*^9, 3.4470244367035*^9}, { 3.4470244685985003`*^9, 3.4470246699545*^9}, 3.4470256089775*^9, { 3.4470256559084997`*^9, 3.4470256924475*^9}, {3.44874453067*^9, 3.448744549449*^9}, 3.448746789151*^9}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "ExtraText", " ", "\[Rule]", " ", "\"\<(The photos in the Bucaramanga Excusrsion group are joint with \ Lara Simone Lopez.)\>\""}], ",", " ", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3604", ",", "3606"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3500", ",", "3500"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3005", ",", "2000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3204", ",", "2404"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3204", ",", "2404"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2403", ",", "1800"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3602", ",", "2401"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3004", ",", "2000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3204", ",", "2404"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3204", ",", "2404"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2402", ",", "1600"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}], " ", "/.", " ", RowBox[{ RowBox[{"Page", "[", "p__", "]"}], " ", "\[RuleDelayed]", " ", RowBox[{"Page", "[", RowBox[{"p", ",", " ", RowBox[{ "ExtraText", " ", "\[Rule]", " ", "\"\<(All photos in the Bucaramanga Excusrsion group are joint with \ Lara Simone Lopez.)\>\""}]}], "]"}]}]}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4487442507860003`*^9, 3.448744307719*^9}, { 3.4487443406070004`*^9, 3.448744469524*^9}, {3.448744620984*^9, 3.4487448041619997`*^9}, {3.448744841751*^9, 3.4487448569040003`*^9}, { 3.448745137033*^9, 3.4487453151619997`*^9}, 3.448745422144*^9, { 3.448746225414*^9, 3.448746226134*^9}, {3.448746414862*^9, 3.4487464351940002`*^9}, {3.448746821841*^9, 3.448746947769*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: \ Hanoi-0708.\>\""}], ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"mct", "=", RowBox[{"awk", "=", RowBox[{"veg", "=", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2048", ",", "1536"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\<1 2 3 4\>\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1600", ",", "1200"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3318", ",", "2490"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3260", ",", "2445"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2048", ",", "1536"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1600", ",", "1200"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{ "ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{ "ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.395010892609375*^9, 3.395011132578125*^9}, { 3.39501119371875*^9, 3.395011225734375*^9}, {3.395011282703125*^9, 3.395011293078125*^9}, {3.39503978328125*^9, 3.395039820125*^9}, { 3.395040254046875*^9, 3.395040255140625*^9}, {3.395082603640625*^9, 3.395082650609375*^9}, {3.3950827433125*^9, 3.39508276803125*^9}, 3.39508293971875*^9, 3.395083638671875*^9, {3.395084192265625*^9, 3.3950842168125*^9}, {3.395248206265625*^9, 3.395248270375*^9}, { 3.39524838246875*^9, 3.395248445578125*^9}, {3.39566262375*^9, 3.395662649890625*^9}, {3.395719978*^9, 3.39572013103125*^9}, { 3.3957203801875*^9, 3.395720416*^9}, {3.3957251221875*^9, 3.39572512475*^9}, {3.395868948*^9, 3.39586896009375*^9}, { 3.39613345228575*^9, 3.39613348172325*^9}, {3.396133690942*^9, 3.396133739207625*^9}, {3.396134851692*^9, 3.39613485366075*^9}, { 3.396135788488875*^9, 3.396135792395125*^9}, {3.396135843207625*^9, 3.396135843988875*^9}, {3.396144675738875*^9, 3.3961446896295*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2048", ",", "1536"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2048", ",", "1536"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "ExtraText", " ", "\[Rule]", " ", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.3957249165625*^9, 3.395724988*^9}, {3.3957250324375*^9, 3.395725095203125*^9}, {3.3957251344375*^9, 3.39572529203125*^9}, { 3.39572551640625*^9, 3.395725521640625*^9}, {3.39572559646875*^9, 3.39572559775*^9}, {3.395725976484375*^9, 3.395726054234375*^9}, { 3.395726140015625*^9, 3.39572616271875*^9}, {3.395726415484375*^9, 3.39572644471875*^9}, {3.395726519453125*^9, 3.39572652021875*^9}, { 3.39572663634375*^9, 3.3957266481875*^9}, {3.395726761453125*^9, 3.395726771546875*^9}, {3.395726817953125*^9, 3.395726829140625*^9}, { 3.395726872109375*^9, 3.395726894359375*^9}, {3.39586923990625*^9, 3.395869334515625*^9}, {3.395869459171875*^9, 3.39586945953125*^9}, { 3.396134604582625*^9, 3.396134702707625*^9}, {3.396134740801375*^9, 3.396134836270125*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"ExtraFiles", " ", "\[Rule]", " ", RowBox[{"{", "\"\\"", "}"}]}], ",", RowBox[{ "TopText", " ", "\[Rule]", " ", "\"\<

On August 10, 2007, Jana Comstock, Scott Morrison, Dylan \ Thurston and I rode west out of Hanoi to chao Tay Phuong (Tay Phuong pagoda) \ on a bicycle, bicycle, bicycle and a moped (see map \ below).\>\""}], ",", RowBox[{ "ExtraText", " ", "\[Rule]", " ", "\"\<

\>\""}], ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fw", "=", "0"}], ";", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\<100 Hands\>\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\<1 2 3 4 5\>\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1600", ",", "1200"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2272", ",", "1704"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3072", ",", "2304"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"4568", ",", "2312"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "IconFile", " ", "\[Rule]", " ", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.3957249165625*^9, 3.395724988*^9}, {3.3957250324375*^9, 3.395725095203125*^9}, {3.3957251344375*^9, 3.39572529203125*^9}, { 3.39572551640625*^9, 3.395725521640625*^9}, {3.39572559646875*^9, 3.39572559775*^9}, {3.395725976484375*^9, 3.395726054234375*^9}, { 3.395726140015625*^9, 3.39572616271875*^9}, {3.395726415484375*^9, 3.39572644471875*^9}, {3.395726519453125*^9, 3.39572652021875*^9}, { 3.39572663634375*^9, 3.3957266481875*^9}, {3.395726761453125*^9, 3.395726771546875*^9}, {3.395726817953125*^9, 3.395726829140625*^9}, { 3.395726872109375*^9, 3.395726894359375*^9}, {3.39586923990625*^9, 3.395869334515625*^9}, {3.395869459171875*^9, 3.39586945953125*^9}, { 3.396408111640625*^9, 3.396408112171875*^9}, {3.39655751609375*^9, 3.396557529984375*^9}, 3.4738129353190002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Banner", "\[Rule]", " ", RowBox[{"ExtractDataCell", "[", "\"\\"", "]"}]}], ",", " ", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ "ExtraText", "\[Rule]", "\"\Dylan and I spent our time \ between Tianjin and Hanoi.\>\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2048", ",", "1536"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3020", ",", "2570"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3265", ",", "2450"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2540", ",", "2465"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\74.\>\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1536", ",", "2048"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.395010892609375*^9, 3.395011132578125*^9}, { 3.39501119371875*^9, 3.395011225734375*^9}, {3.395011282703125*^9, 3.395011293078125*^9}, {3.39503978328125*^9, 3.395039820125*^9}, { 3.395040254046875*^9, 3.395040255140625*^9}, {3.395082603640625*^9, 3.395082650609375*^9}, {3.3950827433125*^9, 3.39508276803125*^9}, 3.39508293971875*^9, 3.395083638671875*^9, {3.395084192265625*^9, 3.3950842168125*^9}}], Cell["\<\ Data Cell Beijing-0708 Banner:
 
\">>>> Beijing >>>
11 images
\ \>", "Text", CellChangeTimes->{{3.39140846615625*^9, 3.391408469234375*^9}, { 3.3914085169375*^9, 3.391408518890625*^9}, {3.39503988109375*^9, 3.39503992371875*^9}, {3.395039956234375*^9, 3.39504003753125*^9}, { 3.395040667640625*^9, 3.395040707484375*^9}, {3.395139709578125*^9, 3.395139739*^9}, {3.396295463640625*^9, 3.396295503734375*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: \ Tianjin-0707.\>\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1200", ",", "1600"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1024", ",", "768"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3200", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1024", ",", "768"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "ExtraText", " ", "\[Rule]", " ", "\"\<Ken says that the sign \ says \\\"going-out-of-business sale\\\".\>\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", " ", RowBox[{ "ExtraText", " ", "\[Rule]", " ", "\"\<Ken says that the sign \ says \\\"supermarket entrance\\\".\>\""}], ",", " ", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1600", ",", "1200"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2048", ",", "1536"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1600", ",", "1200"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2048", ",", "1536"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\<The Chern \ Institue, July 30, 2007.\>\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.394684463734375*^9, 3.39468448196875*^9}, { 3.394684550734375*^9, 3.39468466734375*^9}, 3.394684838953125*^9, { 3.394684987609375*^9, 3.394685017171875*^9}, {3.3946892866875*^9, 3.3946894064375*^9}, {3.39468961871875*^9, 3.394689620890625*^9}, { 3.394746804859375*^9, 3.394746819375*^9}, {3.394747227296875*^9, 3.394747239328125*^9}, {3.394752813171875*^9, 3.3947528768125*^9}, { 3.39475291290625*^9, 3.394752998625*^9}, {3.39488657159375*^9, 3.3948866046875*^9}, {3.3949510416875*^9, 3.3949510665625*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\<Århus, June 2007\>\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: \ Aarhus-0706.\>\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3560", ",", "2670"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3000", ",", "2250"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", " ", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.391503410484375*^9, 3.391503595109375*^9}, { 3.391503831109375*^9, 3.391503845921875*^9}, 3.391503994140625*^9, 3.391504370625*^9, {3.391504443265625*^9, 3.391504447140625*^9}, { 3.39150517184375*^9, 3.391505205984375*^9}, {3.391506224796875*^9, 3.391506247265625*^9}, {3.39154220925*^9, 3.391542242125*^9}, { 3.3915422773125*^9, 3.391542289578125*^9}, {3.39154232490625*^9, 3.391542336*^9}, {3.391542374453125*^9, 3.391542375203125*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<<*k*>.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\)\>\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<<*k*>.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<3.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1824", ",", "1368"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<4.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1280", ",", "960"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<5.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<6.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<7.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2340", ",", "1755"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<8.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1705", ",", "1280"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\<9.html\>\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1824", ",", "1368"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{ "IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: Kyoto-0705.\ \>\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1824", ",", "1368"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1280", ",", "960"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1824", ",", "1368"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1824", ",", "1368"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1824", ",", "1368"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1824", ",", "1368"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<1.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<2.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<3.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<4.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<5.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<6.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<7.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<8.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<9.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<10.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<11.html\>\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<1.html\>\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<2.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<3.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<4.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<5.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<6.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<7.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<8.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<9.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<10.html\>\""}]}], "]"}]}], "}"}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<1.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<2.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<3.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<4.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<5.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<6.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<7.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<8.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<9.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<10.html\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"HTMLName", " ", "\[Rule]", " ", "\"\<11.html\>\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: Kyoto-0705.\ \>\""}], ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Pages", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3072", ",", "2304"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Pages", "[", "\"\\"", "]"}], " ", "=", " ", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"Prefix", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{ "ExtraText", "\[Rule]", "\"\Talks: \ TiTech-070508.\>\""}], ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{ "Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1024", ",", "768"}], "}"}]}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3072", ",", "2304"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3072", ",", "2304"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3072", ",", "2304"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"DisplaySize", "\[Rule]", RowBox[{"{", RowBox[{"480", ",", "640"}], "}"}]}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2304", ",", "3072"}], "}"}]}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"IconFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"2736", ",", "3648"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{ "Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{ "HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"1280", ",", "960"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", RowBox[{"Title", "\[Rule]", "\"\\""}], ",", RowBox[{"HTMLName", "\[Rule]", "\"\\""}], ",", RowBox[{"Text", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageFile", "\[Rule]", "\"\\""}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3648", ",", "2736"}], "}"}]}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.389794432890625*^9, 3.389794472234375*^9}, { 3.389796047453125*^9, 3.389796048*^9}, {3.389824142375*^9, 3.3898241849375*^9}, {3.39032278721875*^9, 3.390322810140625*^9}, { 3.390322894859375*^9, 3.390322898*^9}, {3.391433909078125*^9, 3.39143394625*^9}, {3.39150106728125*^9, 3.39150106746875*^9}, { 3.391503652265625*^9, 3.391503666*^9}, {3.391505226203125*^9, 3.39150523365625*^9}, {3.391543449609375*^9, 3.391543453109375*^9}, { 3.394684707484375*^9, 3.39468471040625*^9}, {3.395040078390625*^9, 3.39504008028125*^9}, {3.395248476828125*^9, 3.39524848053125*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Programs", "Section"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"PathOf", "[", "\"\\"", "]"}], " ", "=", " ", "\"\\""}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4459430294820004`*^9, 3.445943078479*^9}, { 3.445943112804*^9, 3.445943113047*^9}}], Cell[CellGroupData[{ Cell["Utilities", "Subsection", CellChangeTimes->{{3.391415030875*^9, 3.391415032921875*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"StringSplice", "[", RowBox[{"this_Page", ",", " ", "ss_String"}], "]"}], " ", ":=", " ", RowBox[{"StringReplace", "[", RowBox[{"ss", ",", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\"\<<#\>\"", "~~", RowBox[{"ShortestMatch", "[", "s___", "]"}], "~~", "\"\<#>\>\""}], " ", "\[RuleDelayed]", " ", RowBox[{"ToString", "[", RowBox[{"this", "[", RowBox[{"ToExpression", "[", "s", "]"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\<<*\>\"", "~~", RowBox[{"ShortestMatch", "[", "s___", "]"}], "~~", "\"\<*>\>\""}], " ", "\[RuleDelayed]", " ", RowBox[{"ToString", "[", RowBox[{"ToExpression", "[", "s", "]"}], "]"}]}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"RemoveRepetitions", "[", "l_List", "]"}], " ", ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "a", "}"}], ",", " ", RowBox[{ RowBox[{ RowBox[{"a", "[", "x_", "]"}], ":=", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"a", "[", "x", "]"}], "=", RowBox[{"Sequence", "[", "]"}]}], ";", " ", "x"}], ")"}]}], ";", " ", RowBox[{"a", " ", "/@", " ", "l"}]}]}], "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.391415053265625*^9, 3.39141510025*^9}, { 3.391433387875*^9, 3.391433412921875*^9}, {3.39143378303125*^9, 3.39143380634375*^9}, {3.396407342109375*^9, 3.39640734428125*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Completing the Pages List", "Subsection"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"ReadImage", "[", "im_String", "]"}], " ", ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"fs", ",", " ", "s"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"fs", "=", RowBox[{"Import", "[", RowBox[{"im", ",", " ", "\"\\""}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", " ", "=", " ", RowBox[{"Import", "[", RowBox[{ RowBox[{"\"\\"", "<>", RowBox[{"PathOf", "[", "\"\\"", "]"}], "<>", "\"\\"", "<>", "im"}], ",", " ", "\"\\""}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", "s", "]"}], ";", "\[IndentingNewLine]", RowBox[{"Page", "[", RowBox[{"\"\\"", ",", " ", RowBox[{"ToExpression", "[", RowBox[{"\"\\"", "<>", "s", "<>", "\"\<]\>\""}], "]"}], ",", " ", RowBox[{"FullSize", " ", "\[Rule]", " ", "fs"}], ",", " ", RowBox[{"ImageFile", " ", "\[Rule]", " ", RowBox[{"Last", "[", RowBox[{"FileNameSplit", "[", "im", "]"}], "]"}]}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.445943127668*^9, 3.4459431352790003`*^9}, { 3.445943226381*^9, 3.4459432330299997`*^9}, {3.445943265201*^9, 3.445943265979*^9}, {3.445944498582*^9, 3.445944502928*^9}, { 3.445944566365*^9, 3.445944574333*^9}, 3.4470247493605003`*^9, { 3.4470255365835*^9, 3.4470255415565*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Object Orientation", "Subsection"], Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", "Page", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ObjectOrient", "[", RowBox[{"parent_Page", ",", " ", RowBox[{"Page", "[", RowBox[{"type_String", ",", " ", "attribs___Rule"}], "]"}]}], "]"}], " ", ":=", " ", RowBox[{"ObjectOrient", "[", RowBox[{"parent", ",", " ", RowBox[{"Page", "[", RowBox[{"type", ",", " ", "attribs", ",", " ", RowBox[{"{", "}"}]}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ObjectOrient", "[", RowBox[{"parent_Page", ",", " ", RowBox[{"Page", "[", RowBox[{ "type_String", ",", " ", "attribs___Rule", ",", " ", "subs_List"}], "]"}]}], "]"}], " ", ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "this", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"this", "=", RowBox[{"Page", "[", RowBox[{"n", "++"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"this", "[", "Parent", "]"}], " ", "=", " ", "parent"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "=", " ", "type"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"this", "[", "#1", "]"}], " ", "=", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "#2", "]"}], "===", "String"}], ",", " ", RowBox[{"StringSplice", "[", RowBox[{"this", ",", " ", "#2"}], "]"}], ",", " ", "#2"}], "]"}]}], ")"}], "&"}], " ", "@@@", " ", RowBox[{"{", "attribs", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"this", "[", "Subpages", "]"}], " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"ObjectOrient", "[", RowBox[{"this", ",", " ", "#"}], "]"}], "&"}], " ", "/@", " ", "subs"}]}], ";", "\[IndentingNewLine]", "this"}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"this_Page", "[", RowBox[{"a_", "[", "b_", "]"}], "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "a", "]"}], "[", "b", "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.391409663140625*^9, 3.391409665671875*^9}, 3.391409864046875*^9, {3.391433973421875*^9, 3.391434011171875*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Cell Extraction", "Subsection"], Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", "ExtractDataCell", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ExtractDataCell", "[", "cn_String", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"ExtractDataCell", "[", "cn", "]"}], " ", "=", " ", RowBox[{"First", "[", RowBox[{"Cases", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"NotebookGet", "[", RowBox[{"EvaluationNotebook", "[", "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"cc_String", "?", RowBox[{"(", RowBox[{ RowBox[{"StringMatchQ", "[", RowBox[{"#", ",", " ", RowBox[{ RowBox[{"(", RowBox[{ "\"\\"", "<>", "cn", "<>", "\"\<:\\n\>\""}], ")"}], "~~", "___"}]}], "]"}], "&"}], ")"}]}], ",", "\[IndentingNewLine]", "\"\\"", " ", ",", " ", "___"}], "\[IndentingNewLine]", "]"}], " ", "\[RuleDelayed]", " ", RowBox[{"Last", "[", RowBox[{"StringSplit", "[", RowBox[{"cc", ",", " ", "\"\<\\n\>\"", ",", " ", "2"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", "Infinity"}], "\[IndentingNewLine]", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ExtractDataCell", " ", "/@", " ", RowBox[{"{", RowBox[{ "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\""}], "}"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.396534073796875*^9, 3.3965340745625*^9}, { 3.491000226916*^9, 3.491000227349*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["The Index Page", "Subsection"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Page", "[", "0", "]"}], "[", "UpNavigator", "]"}], " ", "=", " ", RowBox[{"ExtractDataCell", "[", "\"\\"", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Files", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], ":=", " ", RowBox[{ RowBox[{"this", "[", "Files", "]"}], " ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"this", "[", "HTMLFile", "]"}], ",", " ", RowBox[{"this", "[", "IconFile", "]"}], ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\<.htaccess\>\""}], "}"}]}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.390323203453125*^9, 3.39032320784375*^9}, { 3.396406344234375*^9, 3.396406345140625*^9}, {3.396407984703125*^9, 3.396407992015625*^9}, {3.396961206578125*^9, 3.39696121146875*^9}}], Cell["\<\ Data Cell Top UpNavigator: © | Dror Bar-Natan's Image Gallery:\ \>", "Text"] }, Open ]], Cell[CellGroupData[{ Cell["The Index Template", "Subsection"], Cell["\<\ Data Cell Index Template: ] of <*Length[AllPages]*> in this Make > <#FullTitle#> <#Navigator#>

<#MainContent#>

The html files in the Places gallery were created from an abstract data \ structure by Assemble.nb on <*Floor[Date[]]*>.

Mirroring / File Lists. \ \>", "Text", CellChangeTimes->{{3.389563831*^9, 3.389563835171875*^9}, { 3.389563995578125*^9, 3.389564028125*^9}, 3.389649794265625*^9, 3.389650347625*^9, 3.38965095446875*^9, {3.39032315165625*^9, 3.390323183625*^9}, 3.390323328390625*^9, 3.39140841503125*^9, 3.391408445234375*^9, {3.39140848853125*^9, 3.391408543171875*^9}, { 3.391409404421875*^9, 3.391409431171875*^9}, {3.3914095700625*^9, 3.391409591171875*^9}, 3.39140982271875*^9, {3.391415115921875*^9, 3.391415121734375*^9}, 3.3914331905625*^9, {3.396092536520125*^9, 3.396092537957625*^9}, {3.39640847090625*^9, 3.3964085344375*^9}, { 3.396408715703125*^9, 3.3964087345*^9}, {3.39661062221875*^9, 3.396610639828125*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Place Pages", "Subsection"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "IconFile", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], ":=", " ", RowBox[{ RowBox[{"this", "[", "IconFile", "]"}], " ", "=", " ", RowBox[{ RowBox[{"First", "[", RowBox[{"this", "[", "Subpages", "]"}], "]"}], "[", "IconFile", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Banner", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], ":=", " ", RowBox[{ RowBox[{"this", "[", "Banner", "]"}], " ", "=", " ", RowBox[{"StringSplice", "[", RowBox[{"this", ",", " ", RowBox[{"ExtractDataCell", "[", "\"\\"", "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Files", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], ":=", " ", RowBox[{ RowBox[{"this", "[", "Files", "]"}], " ", "=", " ", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"this", "[", "HTMLFile", "]"}], ",", " ", RowBox[{"this", "[", "IconFile", "]"}], ",", " ", RowBox[{ RowBox[{"this", "[", "FullPrefix", "]"}], "<>", "\"\\""}]}], "\[IndentingNewLine]", "}"}], "~", "Join", "~", RowBox[{"this", "[", "ExtraFiles", "]"}]}]}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{ 3.3914084655625*^9, 3.39140851640625*^9, {3.391415196171875*^9, 3.391415208*^9}, 3.391433730140625*^9, 3.39143376559375*^9, { 3.396408003375*^9, 3.396408030171875*^9}, {3.396557477078125*^9, 3.3965574886875*^9}}], Cell["\<\ Data Cell Place Page Banner:
\"><#NumberOfLeafs#> images
\"> \ height=180 alt=\"<#Title#>\">
<#Title#>
\ \>", "Text", CellChangeTimes->{{3.39140846615625*^9, 3.391408469234375*^9}, { 3.3914085169375*^9, 3.391408518890625*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["The Place Template", "Subsection"], Cell["\<\ Data Cell Place Template: ] > <#FullTitle#> <#Navigator#> <#TopText#>

<#MainContent#>

<#ExtraText#>

Mirroring.html\">Mirroring / File Lists. \ \>", "Text", CellChangeTimes->{ 3.389564051890625*^9, 3.3896497833125*^9, 3.389650340671875*^9, 3.38965094878125*^9, {3.391408470078125*^9, 3.39140847165625*^9}, { 3.3914085193125*^9, 3.3914085216875*^9}, {3.39140961721875*^9, 3.39140961878125*^9}, {3.3914097699375*^9, 3.3914097815625*^9}, 3.3914331985*^9, {3.394753114359375*^9, 3.394753125234375*^9}, { 3.395869159625*^9, 3.395869173390625*^9}, {3.396092567270125*^9, 3.39609256784825*^9}, {3.396408543375*^9, 3.396408570515625*^9}, { 3.396408743734375*^9, 3.396408754171875*^9}, {3.3966106579375*^9, 3.3966106640625*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Image Pages", "Subsection"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Leafs", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "Leafs", "]"}], " ", "=", " ", "this"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "DisplaySize", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "DisplaySize", "]"}], " ", "=", " ", RowBox[{"Round", "[", RowBox[{"640", "*", RowBox[{ RowBox[{"this", "[", "FullSize", "]"}], "/", RowBox[{"Max", "[", RowBox[{"this", "[", "FullSize", "]"}], "]"}]}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "IconSize", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "IconSize", "]"}], " ", "=", " ", RowBox[{"Round", "[", RowBox[{"180", "*", RowBox[{ RowBox[{"this", "[", "FullSize", "]"}], "/", RowBox[{ RowBox[{"this", "[", "FullSize", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Title", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "Title", "]"}], " ", "=", " ", RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"this", "[", "ImageFile", "]"}], ",", " ", RowBox[{ RowBox[{"RegularExpression", "[", "\"\<\\\\..*\>\"", "]"}], " ", "\[Rule]", " ", "\"\<\>\""}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "FullSize", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "FullSize", "]"}], " ", "=", " ", RowBox[{ RowBox[{"Dimensions", "[", RowBox[{ RowBox[{"Import", "[", RowBox[{"this", "[", "ImageFile", "]"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "FullWidth", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "FullWidth", "]"}], " ", "=", " ", RowBox[{ RowBox[{"this", "[", "FullSize", "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "FullHeight", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "FullHeight", "]"}], " ", "=", " ", RowBox[{ RowBox[{"this", "[", "FullSize", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "FullSizeString", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "FullSizeString", "]"}], " ", "=", " ", RowBox[{"StringJoin", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ToString", "[", RowBox[{"this", "[", "FullWidth", "]"}], "]"}], ",", " ", "\"\\"", ",", " ", RowBox[{"ToString", "[", RowBox[{"this", "[", "FullHeight", "]"}], "]"}]}], "\[IndentingNewLine]", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "DisplaySizeString", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "DisplaySizeString", "]"}], " ", "=", " ", RowBox[{"StringJoin", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ToString", "[", RowBox[{ RowBox[{"this", "[", "DisplaySize", "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], ",", " ", "\"\\"", ",", " ", RowBox[{"ToString", "[", RowBox[{ RowBox[{"this", "[", "DisplaySize", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "]"}]}], "\[IndentingNewLine]", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "IconSizeString", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "IconSizeString", "]"}], " ", "=", " ", RowBox[{"StringJoin", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ToString", "[", RowBox[{ RowBox[{"this", "[", "IconSize", "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], ",", " ", "\"\\"", ",", " ", RowBox[{"ToString", "[", RowBox[{ RowBox[{"this", "[", "IconSize", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "]"}]}], "\[IndentingNewLine]", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "DisplayImageFile", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "DisplayImageFile", "]"}], " ", "=", " ", RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"this", "[", "ImageFile", "]"}], ",", " ", RowBox[{ RowBox[{"\"\<.jpg\>\"", "|", "\"\<.JPG\>\""}], " ", "\[Rule]", " ", RowBox[{"\"\<_\>\"", "<>", RowBox[{"this", "[", "DisplaySizeString", "]"}], "<>", "\"\<.jpg\>\""}]}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "IconFile", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "IconFile", "]"}], " ", "=", " ", RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"this", "[", "ImageFile", "]"}], ",", " ", RowBox[{ RowBox[{"\"\<.jpg\>\"", "|", "\"\<.JPG\>\""}], " ", "\[Rule]", " ", RowBox[{"\"\<_\>\"", "<>", RowBox[{"this", "[", "IconSizeString", "]"}], "<>", "\"\<.jpg\>\""}]}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Banner", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], ":=", " ", RowBox[{ RowBox[{"this", "[", "Banner", "]"}], " ", "=", " ", RowBox[{"StringSplice", "[", RowBox[{"this", ",", " ", RowBox[{"ExtractDataCell", "[", "\"\\"", "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Files", "]"}], " ", "/;", " ", RowBox[{ RowBox[{"this", "[", "Type", "]"}], " ", "\[Equal]", " ", "\"\\""}]}], ":=", " ", RowBox[{ RowBox[{"this", "[", "Files", "]"}], " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"this", "[", "#", "]"}], ")"}], "&"}], " ", "/@", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "HTMLFile", ",", " ", "ImageFile", ",", " ", "DisplayImageFile", ",", " ", "IconFile"}], "\[IndentingNewLine]", "}"}]}]}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.389645892765625*^9, 3.389645969859375*^9}, 3.391408472078125*^9, 3.39140852225*^9, {3.39141522290625*^9, 3.39141523309375*^9}, 3.391433732125*^9, 3.391433766734375*^9, { 3.39661352465625*^9, 3.396613535890625*^9}}], Cell["\<\ Data Cell Image Page Banner:
\">Text and \ <#DisplaySizeString#> \"><#ImageFile#> \ (<#FullSizeString#>)
\"> \ height=180 alt=\"<#Title#>\">
<#Title#>
\ \>", "Text", CellChangeTimes->{{3.3914084725*^9, 3.39140847584375*^9}, { 3.39140852278125*^9, 3.391408526890625*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["The Image Template", "Subsection"], Cell["\<\ Data Cell Image Template: ] > <#FullTitle#>

\" style=\"z-index:0;\">
<#UpNavigator#> <#Title#>
<#Text#>
<#ExtraText#>
Best viewed at full screen (F11)
\ \>", "Text", CellChangeTimes->{ 3.3895640614375*^9, {3.389640050640625*^9, 3.389640146875*^9}, { 3.389641426640625*^9, 3.3896414364375*^9}, {3.38964391134375*^9, 3.38964398953125*^9}, {3.389644780984375*^9, 3.38964480896875*^9}, { 3.38964500953125*^9, 3.389645017671875*^9}, 3.389645437421875*^9, { 3.389645980609375*^9, 3.389646030046875*^9}, {3.389646380390625*^9, 3.389646389390625*^9}, {3.389646444140625*^9, 3.389646448*^9}, { 3.3896475120625*^9, 3.389647557015625*^9}, {3.389647643234375*^9, 3.389647654765625*^9}, {3.389647809828125*^9, 3.389647819625*^9}, { 3.38964785990625*^9, 3.389647860828125*^9}, {3.389649814375*^9, 3.3896498169375*^9}, {3.3896498590625*^9, 3.38964988703125*^9}, { 3.3896499240625*^9, 3.389649925*^9}, {3.38964998865625*^9, 3.38965001475*^9}, {3.38965026396875*^9, 3.38965032278125*^9}, { 3.38965093103125*^9, 3.389650938*^9}, {3.389792636265625*^9, 3.38979268734375*^9}, {3.389792830390625*^9, 3.389792897140625*^9}, { 3.3897929821875*^9, 3.3897930044375*^9}, {3.3897930633125*^9, 3.3897931564375*^9}, {3.38979332465625*^9, 3.38979332515625*^9}, { 3.389793566125*^9, 3.389793613859375*^9}, {3.389793789921875*^9, 3.38979389634375*^9}, {3.389793929078125*^9, 3.389793930265625*^9}, { 3.389793965046875*^9, 3.38979397121875*^9}, {3.38979405840625*^9, 3.38979415371875*^9}, {3.389794339515625*^9, 3.3897943540625*^9}, { 3.389794404375*^9, 3.38979440509375*^9}, {3.389794529859375*^9, 3.389794614984375*^9}, {3.38979465409375*^9, 3.3897946975625*^9}, { 3.389794989953125*^9, 3.389794994671875*^9}, {3.389795058796875*^9, 3.389795076390625*^9}, {3.389795192453125*^9, 3.38979523515625*^9}, 3.389795286078125*^9, {3.389795324109375*^9, 3.389795325140625*^9}, { 3.389795385703125*^9, 3.389795443125*^9}, {3.38979557021875*^9, 3.3897956409375*^9}, {3.38979570359375*^9, 3.389795729109375*^9}, { 3.389796851625*^9, 3.389796911484375*^9}, {3.389797000265625*^9, 3.389797010703125*^9}, {3.389822688390625*^9, 3.389822733375*^9}, { 3.389822788953125*^9, 3.38982281171875*^9}, {3.389822865828125*^9, 3.38982287090625*^9}, 3.38982315084375*^9, {3.38982318459375*^9, 3.389823215046875*^9}, {3.389823321546875*^9, 3.389823330078125*^9}, { 3.389823499578125*^9, 3.389823523390625*^9}, {3.3898236224375*^9, 3.38982364534375*^9}, {3.3898238239375*^9, 3.38982382640625*^9}, { 3.3898241*^9, 3.38982410528125*^9}, {3.389832508203125*^9, 3.389832510859375*^9}, {3.38983264834375*^9, 3.389832666359375*^9}, { 3.389832926609375*^9, 3.389832958515625*^9}, {3.38983347028125*^9, 3.38983347196875*^9}, {3.3898741955*^9, 3.38987422309375*^9}, { 3.38987426521875*^9, 3.389874266859375*^9}, {3.389908813015625*^9, 3.389908835296875*^9}, {3.389908880921875*^9, 3.389909105984375*^9}, { 3.389909141625*^9, 3.38990914553125*^9}, {3.389909183203125*^9, 3.389909207921875*^9}, {3.389909275*^9, 3.38990927703125*^9}, { 3.38990972365625*^9, 3.38990972453125*^9}, {3.38990980715625*^9, 3.38990984146875*^9}, {3.38990989609375*^9, 3.38990992759375*^9}, { 3.389909962609375*^9, 3.389909985703125*^9}, {3.3901587695653753`*^9, 3.3901588064403753`*^9}, {3.39032247209375*^9, 3.39032248234375*^9}, { 3.3904335294957757`*^9, 3.3904335543395257`*^9}, {3.391408476265625*^9, 3.39140848396875*^9}, {3.391408527375*^9, 3.39140853590625*^9}, { 3.391409629265625*^9, 3.391409630203125*^9}, 3.3914098375*^9, 3.3914332055*^9, {3.39475314125*^9, 3.394753142125*^9}, { 3.3960925968795*^9, 3.3960926196295*^9}, {3.396092817926375*^9, 3.396092818926375*^9}, {3.396408769234375*^9, 3.396408780484375*^9}, 3.3964088628125*^9}] }, Open ]], Cell[CellGroupData[{ Cell["Mirroring / File Lists Pages", "Subsection", CellChangeTimes->{{3.396533457875*^9, 3.396533459171875*^9}, { 3.39653371053125*^9, 3.396533722171875*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"FileTable", "[", RowBox[{"c_Integer", ",", " ", "l_List"}], "]"}], " ", ":=", " ", RowBox[{"StringJoin", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\"\<\>\"", "<>", RowBox[{"StringJoin", "[", "#", "]"}], "<>", "\"\<\>\""}], ")"}], "&"}], " ", "/@", " ", "\[IndentingNewLine]", RowBox[{"Partition", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"PadRight", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ "\"\<\"", "<>", "#", "<>", "\"\<>\>\"", "<>", "#", "<>", "\"\<
\\n\>\""}], ")"}], "&"}], " ", "/@", " ", "l"}], ",", " ", RowBox[{"c", "*", RowBox[{"Ceiling", "[", RowBox[{ RowBox[{"Length", "[", "l", "]"}], "/", "c"}], "]"}]}], ",", " ", "\"\<\>\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Ceiling", "[", RowBox[{ RowBox[{"Length", "[", "l", "]"}], "/", "c"}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "DisplayedImages", "]"}], " ", ":=", " ", RowBox[{ RowBox[{ RowBox[{"(", "this", ")"}], "[", "DisplayedImages", "]"}], " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"#", "[", "DisplayImageFile", "]"}], "&"}], " ", "/@", " ", RowBox[{"this", "[", "Leafs", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "DisplayedImagesFileList", "]"}], " ", ":=", " ", RowBox[{"FileTable", "[", RowBox[{"5", ",", " ", RowBox[{"this", "[", "DisplayedImages", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Images", "]"}], " ", ":=", " ", RowBox[{ RowBox[{ RowBox[{"(", "this", ")"}], "[", "Images", "]"}], " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"#", "[", "ImageFile", "]"}], "&"}], " ", "/@", " ", RowBox[{"this", "[", "Leafs", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "ImagesFileList", "]"}], " ", ":=", " ", RowBox[{"FileTable", "[", RowBox[{"5", ",", " ", RowBox[{"this", "[", "Images", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "RemainingFileList", "]"}], " ", ":=", " ", RowBox[{"FileTable", "[", RowBox[{"5", ",", " ", RowBox[{"Select", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"this", "[", "AllFiles", "]"}], ",", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Union", "[", RowBox[{ RowBox[{"this", "[", "DisplayedImages", "]"}], ",", " ", RowBox[{"this", "[", "Images", "]"}]}], "]"}], ",", " ", "#"}], "]"}]}], "&"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.396533767421875*^9, 3.396533797078125*^9}, { 3.396534025984375*^9, 3.396534032*^9}, {3.396534158265625*^9, 3.39653417534375*^9}, 3.396559120390625*^9, {3.3965664199375*^9, 3.396566420890625*^9}, {3.396566483640625*^9, 3.3965665685625*^9}, { 3.39656746565625*^9, 3.39656755278125*^9}, {3.396568235265625*^9, 3.396568272078125*^9}, {3.39661047621875*^9, 3.396610499953125*^9}, { 3.396613645328125*^9, 3.3966137665*^9}, {3.39661380471875*^9, 3.3966138880625*^9}, 3.396614165796875*^9, {3.396614278921875*^9, 3.3966143058125*^9}, {3.3966144484375*^9, 3.396614522625*^9}, { 3.39661462678125*^9, 3.39661462734375*^9}, {3.396961879*^9, 3.3969618824375*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["The Mirroring Template", "Subsection", CellChangeTimes->{{3.396533457875*^9, 3.396533459171875*^9}}], Cell["\<\ Data Cell Mirroring Template: <#FullTitle#> <#UpNavigator#> ><#Title#>:

Mirroring / File Lists

Mirroring

You can mirror all or part of the ><#Title#> section \ of this image gallery by copying some or all of the files in the lists below \ into a single directory on your computer. You may wish to find an automated \ way of doing so. A nice possibility is to use the command wget, available on \ several operating systems (see also). On a unix \ machine, for example, you may copy-paste one or more of the lists below into \ a text file file_list and then issue the command
wget -i file_list \ --base=http://www.math.toronto.edu/~drorbn/Gallery/Places/
Alternatively, you may issue the command
wget -i - \ --base=http://www.math.toronto.edu/~drorbn/Gallery/Places/
and then copy-paste one or more of the lists below into standard input.

File Lists

<#RemainingFileList#> <#DisplayedImagesFileList#> <#ImagesFileList#>
HTML files, \ Scripts and Icons
Medium-Size \ (roughly VGA) Images
Full-Size \ (large!) Images
\ \>", "Text", CellChangeTimes->{ 3.389564051890625*^9, 3.3896497833125*^9, 3.389650340671875*^9, 3.38965094878125*^9, {3.391408470078125*^9, 3.39140847165625*^9}, { 3.3914085193125*^9, 3.3914085216875*^9}, {3.39140961721875*^9, 3.39140961878125*^9}, {3.3914097699375*^9, 3.3914097815625*^9}, 3.3914331985*^9, {3.394753114359375*^9, 3.394753125234375*^9}, { 3.395869159625*^9, 3.395869173390625*^9}, {3.396092567270125*^9, 3.39609256784825*^9}, {3.396408543375*^9, 3.396408570515625*^9}, { 3.396408743734375*^9, 3.396408754171875*^9}, {3.39653346571875*^9, 3.396533634015625*^9}, {3.39653380328125*^9, 3.396533820859375*^9}, { 3.39653393953125*^9, 3.39653394140625*^9}, {3.39653428853125*^9, 3.396534364875*^9}, {3.396534458484375*^9, 3.396534482265625*^9}, { 3.396557543515625*^9, 3.396557579640625*^9}, {3.3965577490625*^9, 3.3965577495625*^9}, {3.396559162765625*^9, 3.396559186359375*^9}, 3.396559275234375*^9, {3.396567565421875*^9, 3.396567584859375*^9}, { 3.396567650984375*^9, 3.396567655203125*^9}, {3.39656774434375*^9, 3.396567763015625*^9}, {3.39656799734375*^9, 3.39656800584375*^9}, { 3.3965685650625*^9, 3.396568567671875*^9}, {3.396610749359375*^9, 3.3966108888125*^9}, {3.39661094875*^9, 3.39661095178125*^9}, { 3.396610989359375*^9, 3.39661100634375*^9}, {3.3966110430625*^9, 3.396611055453125*^9}, {3.39661116234375*^9, 3.39661126534375*^9}, { 3.396611455390625*^9, 3.3966114583125*^9}, {3.396612103796875*^9, 3.396612104796875*^9}, {3.39661262103125*^9, 3.39661289703125*^9}, { 3.396612992734375*^9, 3.396613054640625*^9}, {3.39661311271875*^9, 3.396613121078125*^9}, {3.39661316465625*^9, 3.39661328221875*^9}, { 3.39661340875*^9, 3.396613416796875*^9}, {3.396613450640625*^9, 3.396613454484375*^9}, {3.39661390034375*^9, 3.39661394846875*^9}, { 3.39661414725*^9, 3.396614148515625*^9}, {3.396614540171875*^9, 3.396614566515625*^9}, {3.396614925078125*^9, 3.396614933484375*^9}, { 3.3969618921875*^9, 3.396961895625*^9}, {3.495477484777*^9, 3.4954774877799997`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["DataCompletion (General)", "Subsection"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"this_Page", "[", "N", "]"}], " ", ":=", " ", RowBox[{"First", "[", "this", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Text", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "Text", "]"}], " ", "=", " ", "\"\<\>\""}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "TopText", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "TopText", "]"}], " ", "=", " ", "\"\<\>\""}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "ExtraText", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "ExtraText", "]"}], " ", "=", " ", "\"\<\>\""}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "ExtraFiles", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "ExtraFiles", "]"}], " ", "=", " ", RowBox[{"{", "}"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Leafs", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "Leafs", "]"}], " ", "=", " ", RowBox[{"Flatten", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#", "[", "Leafs", "]"}], ")"}], "&"}], " ", "/@", " ", RowBox[{"this", "[", "Subpages", "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "NumberOfLeafs", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "NumberOfLeafs", "]"}], " ", "=", " ", RowBox[{"Length", "[", RowBox[{"this", "[", "Leafs", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Prefix", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "Prefix", "]"}], " ", "=", " ", "\"\<\>\""}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "FullPrefix", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "FullPrefix", "]"}], " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"this", "[", "Parent", "]"}], "[", "FullPrefix", "]"}], "<>", RowBox[{"this", "[", "Prefix", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "HTMLFile", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "HTMLFile", "]"}], " ", "=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"this", "[", "FullPrefix", "]"}], "<>", RowBox[{"this", "[", "HTMLName", "]"}]}], ")"}], " ", "/.", " ", "Aliases"}]}]}], ";", RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "FullTitle", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "FullTitle", "]"}], " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"this", "[", "Parent", "]"}], "[", "FullTitle", "]"}], "<>", "\"\<: \>\"", "<>", RowBox[{"this", "[", "Title", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "UpNavigator", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "UpNavigator", "]"}], " ", "=", " ", RowBox[{"StringJoin", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"this", "[", "Parent", "]"}], "[", "UpNavigator", "]"}], ",", " ", "\"\<\\n\>\"", ",", "\[IndentingNewLine]", "\"\<\"", ",", " ", RowBox[{ RowBox[{"this", "[", "Parent", "]"}], "[", "HTMLFile", "]"}], ",", " ", "\"\<>\>\"", ",", " ", RowBox[{ RowBox[{"this", "[", "Parent", "]"}], "[", "Title", "]"}], ",", " ", "\"\<:\>\""}], "\[IndentingNewLine]", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "Navigator", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "Navigator", "]"}], " ", "=", " ", RowBox[{"StringSplice", "[", RowBox[{"this", ",", " ", RowBox[{"ExtractDataCell", "[", "\"\\"", "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "HTMLName", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "HTMLName", "]"}], " ", "=", " ", RowBox[{ RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"this", "[", "Title", "]"}], ",", " ", RowBox[{"{", RowBox[{ RowBox[{"\"\< \>\"", " ", "\[Rule]", " ", "\"\<_\>\""}], ",", " ", RowBox[{"\"\<Å\>\"", " ", "\[Rule]", " ", "\"\\""}]}], "}"}]}], "]"}], "<>", "\"\<.html\>\""}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "MainContent", "]"}], " ", ":=", " ", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"banners", ",", " ", RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"out", "=", RowBox[{"{", "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"banners", " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"#", "[", "Banner", "]"}], "&"}], " ", "/@", " ", RowBox[{"this", "[", "Subpages", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"While", "[", RowBox[{ RowBox[{"i", " ", "\[LessEqual]", " ", RowBox[{"Length", "[", "banners", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"out", ",", " ", RowBox[{"\"\<\>\"", "<>", RowBox[{"Switch", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "banners", "]"}], "-", "i"}], ",", "\[IndentingNewLine]", "0", ",", " ", RowBox[{"\"\<\>\"", "<>", RowBox[{"banners", "[", RowBox[{"[", RowBox[{"i", "++"}], "]"}], "]"}], "<>", "\"\<\>\""}], ",", "\[IndentingNewLine]", "1", ",", " ", RowBox[{ RowBox[{"banners", "[", RowBox[{"[", RowBox[{"i", "++"}], "]"}], "]"}], "<>", "\"\<\>\"", "<>", RowBox[{"banners", "[", RowBox[{"[", RowBox[{"i", "++"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", "_", ",", " ", RowBox[{ RowBox[{"banners", "[", RowBox[{"[", RowBox[{"i", "++"}], "]"}], "]"}], "<>", RowBox[{"banners", "[", RowBox[{"[", RowBox[{"i", "++"}], "]"}], "]"}], "<>", RowBox[{"banners", "[", RowBox[{"[", RowBox[{"i", "++"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"StringJoin", " ", "@@", " ", "out"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "HTMLForm", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "HTMLForm", "]"}], " ", "=", " ", RowBox[{"StringSplice", "[", RowBox[{"this", ",", " ", RowBox[{"ExtractDataCell", "[", RowBox[{ RowBox[{"this", "[", "Type", "]"}], "<>", "\"\< Template\>\""}], "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "this_Page", ")"}], "[", "AllFiles", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"this", "[", "AllFiles", "]"}], " ", "=", " ", RowBox[{"RemoveRepetitions", "[", RowBox[{"Flatten", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"this", "[", "Files", "]"}], ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", "\"\\"", ",", " ", RowBox[{ RowBox[{ RowBox[{"#", "[", "AllFiles", "]"}], "&"}], " ", "/@", " ", RowBox[{"this", "[", "Subpages", "]"}]}]}], "\[IndentingNewLine]", "}"}], "]"}], "]"}]}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->CompressedData[" 1:eJxTTMoPSmViYGAQA2IQzdCQlS/i+NKRgaGtCEKrqMx0AdINtepgmqFfB0Iv hNIyxhB5QwjNkJwzB0x35kHotkow3VBRBeGL1y8F0wcbwHTDpxYIX6AVQjfm nQCLqxRCaHEnaV8QHesMoZ/PVvQDqUtZDaF/7ATTDacOQGiB0xD6MIRm0LwO 4f+C0sYcSmBxUS4w3bDTPxtMxwZCaIcMMM2QkAWhN5dDxA9D6ahtbWDxZXsg tOg3CD0LQjdUaBn4g/2vDaETEiD0k2QQDQDQm4U+ "]], Cell["\<\ Data Cell Navigator:
<#UpNavigator#>

<#Title#>
> width=120 height=90 alt=\"Previous\">
previous		   keyboard
shortcuts
in \ red

fitted \ view
random

  > \ width=120 height=90 alt=\"Next\">
next
\ \>", "Text", CellChangeTimes->{{3.389564474234375*^9, 3.389564541734375*^9}, { 3.3895648193125*^9, 3.389564915015625*^9}, {3.389565007390625*^9, 3.389565007609375*^9}, {3.389795822625*^9, 3.38979592140625*^9}, 3.389795956609375*^9, {3.39140848578125*^9, 3.391408488*^9}, { 3.3914085383125*^9, 3.391408541171875*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Make", "Section"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Make", "[", "this_Page", "]"}], " ", ":=", " ", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "htmlfile", ",", " ", "fulldate", ",", " ", "displaydate", ",", " ", "icondate", ",", " ", "f", ",", " ", "s1", ",", " ", "s2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"this", "[", "Type", "]"}], "===", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"f", "=", RowBox[{"OpenWrite", "[", "\"\\"", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"f", ",", " ", "\"\\""}], "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"WriteString", "[", RowBox[{"f", ",", " ", RowBox[{"\"\< \\\"\>\"", "<>", RowBox[{"#", "@", "HTMLFile"}], "<>", "\"\<\\\",\\n\>\""}]}], "]"}], "&"}], " ", "/@", " ", RowBox[{"Drop", "[", RowBox[{"AllPages", ",", " ", RowBox[{"-", "1"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"WriteString", "[", RowBox[{"f", ",", " ", RowBox[{"\"\< \\\"\>\"", "<>", RowBox[{"#", "@", "HTMLFile"}], "<>", "\"\<\\\"\\n\>\""}]}], "]"}], "&"}], " ", "/@", " ", RowBox[{"Take", "[", RowBox[{"AllPages", ",", " ", RowBox[{"-", "1"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"f", ",", " ", "\"\<]\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Close", "[", "f", "]"}], ";", "\[IndentingNewLine]", RowBox[{"f", "=", RowBox[{"OpenWrite", "[", "\"\<.htaccess\>\"", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"WriteString", "[", RowBox[{"f", ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "<>", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "<>", "\"\< \>\"", "<>", "\"\\"", "<>", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "<>", "\"\<\\n\>\""}]}], "\[IndentingNewLine]", "]"}], "&"}], " ", "/@", " ", "Aliases"}], ";", "\[IndentingNewLine]", RowBox[{"Close", "[", "f", "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"this", "[", "Type", "]"}], "===", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"fulldate", "=", RowBox[{"Date", " ", "/.", " ", RowBox[{"FileInformation", "[", RowBox[{"this", "[", "ImageFile", "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"displaydate", "=", RowBox[{"Date", " ", "/.", " ", RowBox[{"FileInformation", "[", RowBox[{"this", "[", "DisplayImageFile", "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"icondate", "=", RowBox[{"Date", " ", "/.", " ", RowBox[{"FileInformation", "[", RowBox[{"this", "[", "IconFile", "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"displaydate", "===", "Date"}], " ", "||", " ", RowBox[{"displaydate", "<", "fulldate"}]}], ",", " ", RowBox[{"Run", "[", RowBox[{"StringReplace", "[", "\[IndentingNewLine]", RowBox[{ "\"\\"", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", " ", "\[Rule]", " ", RowBox[{"this", "[", "DisplaySizeString", "]"}]}], ",", " ", RowBox[{"\"\\"", " ", "\[Rule]", " ", RowBox[{"this", "[", "ImageFile", "]"}]}], ",", " ", RowBox[{"\"\\"", " ", "\[Rule]", " ", RowBox[{"this", "[", "DisplayImageFile", "]"}]}]}], "}"}]}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"icondate", "===", "Date"}], ",", " ", RowBox[{"Run", "[", RowBox[{"StringReplace", "[", "\[IndentingNewLine]", RowBox[{ "\"\\"", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", " ", "\[Rule]", " ", RowBox[{"this", "[", "ImageFile", "]"}]}], ",", " ", RowBox[{"\"\\"", " ", "\[Rule]", " ", RowBox[{"this", "[", "IconFile", "]"}]}]}], "}"}]}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", " ", "\"\\""}], "}"}], ",", RowBox[{"this", "[", "Type", "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"f", " ", "=", " ", RowBox[{"OpenWrite", "[", RowBox[{ RowBox[{"this", "[", "FullPrefix", "]"}], "<>", "\"\\""}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"f", ",", " ", RowBox[{"StringSplice", "[", RowBox[{"this", ",", " ", RowBox[{ "ExtractDataCell", "[", "\"\\"", "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Close", "[", "f", "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"StringJoin", "[", RowBox[{"ReadList", "[", RowBox[{ RowBox[{"this", "[", "HTMLFile", "]"}], ",", " ", "String"}], "]"}], "]"}], " ", "=!=", " ", RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"this", "[", "HTMLForm", "]"}], ",", " ", RowBox[{"\"\<\\n\>\"", " ", "\[Rule]", " ", "\"\<\>\""}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"htmlfile", " ", "=", " ", RowBox[{"OpenWrite", "[", RowBox[{"this", "[", "HTMLFile", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"htmlfile", ",", " ", RowBox[{"this", "[", "HTMLForm", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Close", "[", "htmlfile", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"this", "[", "AllFiles", "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "=", "0"}], ";", " ", RowBox[{"ObjectOrient", "[", RowBox[{ RowBox[{"Page", "[", "]"}], ",", " ", RowBox[{"Pages", "[", "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AllSubpages", "[", "this_Page", "]"}], " ", ":=", " ", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"this", ",", " ", RowBox[{"AllSubpages", " ", "/@", " ", RowBox[{"this", "[", "Subpages", "]"}]}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AllPages", " ", "=", " ", RowBox[{"AllSubpages", "[", RowBox[{"Page", "[", "0", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"MapThread", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"#1", "[", "NextLeaf", "]"}], " ", "=", " ", "#2"}], ";", " ", RowBox[{ RowBox[{"#2", "[", "PreviousLeaf", "]"}], "=", "#1"}]}], ")"}], "&"}], ",", " ", RowBox[{"{", RowBox[{"AllPages", ",", " ", RowBox[{"RotateLeft", "[", "AllPages", "]"}]}], "}"}]}], "]"}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.39032291728125*^9, 3.390322922984375*^9}, { 3.394754387140625*^9, 3.394754491765625*^9}, {3.396406393515625*^9, 3.39640639390625*^9}, {3.396407566890625*^9, 3.3964076720625*^9}, { 3.396407708140625*^9, 3.3964078114375*^9}, {3.396407884890625*^9, 3.3964078855625*^9}, {3.396408227359375*^9, 3.396408278140625*^9}, { 3.39653289353125*^9, 3.396532927765625*^9}, {3.396533190953125*^9, 3.3965331911875*^9}, {3.396533331640625*^9, 3.396533381171875*^9}, 3.39653365584375*^9, {3.396534053375*^9, 3.39653405371875*^9}, { 3.39696069971875*^9, 3.396960929578125*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"General", "::", "\<\"stop\"\>"}], ":", " ", "\<\"Further output of \\!\\(PreIncrement :: \\\"rvalue\\\"\\) will be \ suppressed during this calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\ \", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.395725323078125*^9}], Cell[BoxData[ RowBox[{ RowBox[{"PreIncrement", "::", "\<\"rvalue\"\>"}], ":", " ", "\<\"\\!\\(fw\\) is not a variable with a value, so its value cannot \ be changed. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/rvalue\\\", ButtonNote -> \ \\\"PreIncrement::rvalue\\\"]\\)\"\>"}]], "Message", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.395725323015625*^9}], Cell[BoxData[ RowBox[{ RowBox[{"PreIncrement", "::", "\<\"rvalue\"\>"}], ":", " ", "\<\"\\!\\(fw\\) is not a variable with a value, so its value cannot \ be changed. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/rvalue\\\", ButtonNote -> \ \\\"PreIncrement::rvalue\\\"]\\)\"\>"}]], "Message", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.395725323015625*^9}], Cell[BoxData[ RowBox[{ RowBox[{"PreIncrement", "::", "\<\"rvalue\"\>"}], ":", " ", "\<\"\\!\\(fw\\) is not a variable with a value, so its value cannot \ be changed. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/rvalue\\\", ButtonNote -> \ \\\"PreIncrement::rvalue\\\"]\\)\"\>"}]], "Message", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.395725322890625*^9}], Cell[BoxData[ RowBox[{ RowBox[{"General", "::", "\<\"spell1\"\>"}], ":", " ", "\<\"Possible spelling error: new symbol name \\\"P\\\" is similar to \ existing symbol \\\"Take\\\". \!\( \*ButtonBox[\(More\[Ellipsis]\), ButtonData:>\\\"General::spell1\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->\\\"None\\\"]\)\"\>"}]], "Message", GeneratedCell->False, CellAutoOverwrite->False] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Code Recycling", "Section"], Cell[BoxData[ RowBox[{ RowBox[{ "SetDirectory", "[", "\"\\"", "]"}], ";"}]], "Input"] }, Open ]], Cell[CellGroupData[{ Cell["Experiments", "Section", CellChangeTimes->{{3.445944799757*^9, 3.445944801432*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SetDirectory", "[", RowBox[{ "GalleryDirectory", "=", "\"\\""}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ReadImage", "[", RowBox[{"FileNameJoin", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"GalleryDirectory", ",", "\[IndentingNewLine]", RowBox[{"Last", "[", RowBox[{"FileNameSplit", "[", "#", "]"}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}], "]"}], "&"}], " ", "/@", " ", RowBox[{"Take", "[", RowBox[{ RowBox[{"FileNames", "[", "\[IndentingNewLine]", RowBox[{"\"\<*.jpg\>\"", ",", "\[IndentingNewLine]", RowBox[{ "{", "\"\\"", "}"}]}], "\[IndentingNewLine]", "]"}], ",", "All"}], "]"}]}]}], "Input", CellChangeTimes->{{3.4470247261855*^9, 3.4470247327815*^9}, 3.4470254319665003`*^9, 3.448743882804*^9, {3.4487439263310003`*^9, 3.4487439326400003`*^9}, {3.490912014895*^9, 3.490912039755*^9}}], Cell[CellGroupData[{ Cell[BoxData["\<\"Title -> \\\"Horizontal\\\", Text -> \\\"Horizontal in \ Montpellier, June 2010\\\"\\r\\n\"\>"], "Print", CellChangeTimes->{ 3.4470242833645*^9, 3.4470255578035*^9, 3.4487439430030003`*^9, 3.448744073928*^9, {3.4909120239890003`*^9, 3.49091204219*^9}, 3.490912391999*^9}], Cell[BoxData["\<\"Title -> \\\"Pink\\\", Text -> \\\"Pink in Montpellier, \ June 2010\\\"\\r\\n\"\>"], "Print", CellChangeTimes->{ 3.4470242833645*^9, 3.4470255578035*^9, 3.4487439430030003`*^9, 3.448744073928*^9, {3.4909120239890003`*^9, 3.49091204219*^9}, 3.490912393676*^9}], Cell[BoxData["\<\"Title -> \\\"Red\\\", Text -> \\\"Red in Montpellier, June \ 2010\\\"\\r\\n\"\>"], "Print", CellChangeTimes->{ 3.4470242833645*^9, 3.4470255578035*^9, 3.4487439430030003`*^9, 3.448744073928*^9, {3.4909120239890003`*^9, 3.49091204219*^9}, 3.4909123953789997`*^9}], Cell[BoxData["\<\"Title -> \\\"Vertical\\\", Text -> \\\"Vertical in \ Montpellier, June 2010\\\"\\r\\n\"\>"], "Print", CellChangeTimes->{ 3.4470242833645*^9, 3.4470255578035*^9, 3.4487439430030003`*^9, 3.448744073928*^9, {3.4909120239890003`*^9, 3.49091204219*^9}, 3.490912396453*^9}], Cell[BoxData["\<\"Title -> \\\"Brass\\\", Text -> \\\"Brass in Montpellier, \ June 2010\\\"\\r\\n\"\>"], "Print", CellChangeTimes->{ 3.4470242833645*^9, 3.4470255578035*^9, 3.4487439430030003`*^9, 3.448744073928*^9, {3.4909120239890003`*^9, 3.49091204219*^9}, 3.4909123987469997`*^9}], Cell[BoxData["\<\"Title -> \\\"Rainbow\\\", Text -> \\\"Rainbow in \ Montpellier, June 2010\\\"\\r\\n\"\>"], "Print", CellChangeTimes->{ 3.4470242833645*^9, 3.4470255578035*^9, 3.4487439430030003`*^9, 3.448744073928*^9, {3.4909120239890003`*^9, 3.49091204219*^9}, 3.490912400745*^9}] }, Open ]], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"Page", "[", RowBox[{"\<\"Image\"\>", ",", RowBox[{"Title", "\[Rule]", "\<\"Horizontal\"\>"}], ",", RowBox[{ "Text", "\[Rule]", "\<\"Horizontal in Montpellier, June 2010\"\>"}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3000", ",", "3000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\<\"MontpellierH.jpg\"\>"}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\<\"Image\"\>", ",", RowBox[{"Title", "\[Rule]", "\<\"Pink\"\>"}], ",", RowBox[{"Text", "\[Rule]", "\<\"Pink in Montpellier, June 2010\"\>"}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"4000", ",", "3000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\<\"MontpellierPink.jpg\"\>"}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\<\"Image\"\>", ",", RowBox[{"Title", "\[Rule]", "\<\"Red\"\>"}], ",", RowBox[{"Text", "\[Rule]", "\<\"Red in Montpellier, June 2010\"\>"}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"4000", ",", "3000"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\<\"MontpellierRed.jpg\"\>"}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\<\"Image\"\>", ",", RowBox[{"Title", "\[Rule]", "\<\"Vertical\"\>"}], ",", RowBox[{ "Text", "\[Rule]", "\<\"Vertical in Montpellier, June 2010\"\>"}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3000", ",", "2400"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\<\"MontpellierV.jpg\"\>"}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\<\"Image\"\>", ",", RowBox[{"Title", "\[Rule]", "\<\"Brass\"\>"}], ",", RowBox[{"Text", "\[Rule]", "\<\"Brass in Montpellier, June 2010\"\>"}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"3240", ",", "4320"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\<\"P1010087.JPG\"\>"}]}], "]"}], ",", RowBox[{"Page", "[", RowBox[{"\<\"Image\"\>", ",", RowBox[{"Title", "\[Rule]", "\<\"Rainbow\"\>"}], ",", RowBox[{"Text", "\[Rule]", "\<\"Rainbow in Montpellier, June 2010\"\>"}], ",", RowBox[{"FullSize", "\[Rule]", RowBox[{"{", RowBox[{"4320", ",", "3240"}], "}"}]}], ",", RowBox[{"ImageFile", "\[Rule]", "\<\"P1010100.JPG\"\>"}]}], "]"}]}], "}"}]], "Output", CellChangeTimes->{ 3.4470243147135*^9, 3.4470255850155*^9, 3.448743954679*^9, 3.448744143625*^9, {3.490912025237*^9, 3.490912043009*^9}, 3.490912400758*^9}] }, Open ]] }, Open ]] }, Open ]] }, AutoGeneratedPackage->None, WindowSize->{1157, 899}, WindowMargins->{{92, Automatic}, {Automatic, -24}}, ShowSelection->True, Magnification->1., FrontEndVersion->"7.0 for Microsoft Windows (32-bit) (February 18, 2009)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 142, 2, 83, "Title"], Cell[CellGroupData[{ Cell[734, 28, 181, 2, 27, "Subsubsection"], Cell[918, 32, 124, 1, 29, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[1079, 38, 87, 1, 71, "Section"], Cell[CellGroupData[{ Cell[1191, 43, 1044, 27, 152, "Input"], Cell[2238, 72, 2370, 39, 30, "Output"] }, Open ]], Cell[4623, 114, 136, 2, 31, "Input"], Cell[CellGroupData[{ Cell[4784, 120, 972, 27, 31, "Input"], Cell[5759, 149, 2433, 38, 278, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[8241, 193, 92, 1, 71, "Section"], Cell[8336, 196, 3202, 67, 412, "Input", InitializationCell->True], Cell[11541, 265, 2150, 51, 192, "Input", Evaluatable->False], Cell[13694, 318, 1607, 32, 152, "Input", InitializationCell->True], Cell[CellGroupData[{ Cell[15326, 354, 3053, 61, 272, "Input", InitializationCell->True], Cell[18382, 417, 1588, 26, 56, "Message"] }, Open ]], Cell[19985, 446, 4086, 74, 551, "Text"], Cell[24074, 522, 3859, 86, 192, "Input", InitializationCell->True], Cell[27936, 610, 11779, 265, 652, "Input", InitializationCell->True], Cell[39718, 877, 15577, 339, 912, "Input", InitializationCell->True], Cell[55298, 1218, 21967, 472, 1152, "Input", InitializationCell->True], Cell[77268, 1692, 7069, 144, 352, "Input", InitializationCell->True], Cell[84340, 1838, 14442, 301, 792, "Input", InitializationCell->True], Cell[98785, 2141, 6942, 145, 412, "Input", InitializationCell->True], Cell[105730, 2288, 728, 15, 137, "Text"], Cell[106461, 2305, 14530, 315, 972, "Input", InitializationCell->True], Cell[120994, 2622, 15971, 343, 832, "Input", InitializationCell->True], Cell[136968, 2967, 53452, 1088, 3452, "Input", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ Cell[190457, 4060, 27, 0, 71, "Section"], Cell[190487, 4062, 326, 8, 31, "Input", InitializationCell->True], Cell[CellGroupData[{ Cell[190838, 4074, 94, 1, 36, "Subsection"], Cell[190935, 4077, 1702, 44, 132, "Input", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ Cell[192674, 4126, 47, 0, 36, "Subsection"], Cell[192724, 4128, 1634, 36, 132, "Input", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ Cell[194395, 4169, 40, 0, 36, "Subsection"], Cell[194438, 4171, 2494, 65, 232, "Input", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ Cell[196969, 4241, 37, 0, 36, "Subsection"], Cell[197009, 4243, 2007, 46, 232, "Input", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ Cell[199053, 4294, 36, 0, 36, "Subsection"], Cell[199092, 4296, 1058, 27, 52, "Input", InitializationCell->True], Cell[200153, 4325, 192, 5, 83, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[200382, 4335, 40, 0, 36, "Subsection"], Cell[200425, 4337, 1592, 40, 479, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[202054, 4382, 33, 0, 36, "Subsection"], Cell[202090, 4384, 1985, 54, 112, "Input", InitializationCell->True], Cell[204078, 4440, 521, 11, 119, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[204636, 4456, 40, 0, 36, "Subsection"], Cell[204679, 4458, 1339, 38, 479, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[206055, 4501, 33, 0, 36, "Subsection"], Cell[206091, 4503, 7657, 214, 492, "Input", InitializationCell->True], Cell[213751, 4719, 678, 17, 209, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[214466, 4741, 40, 0, 36, "Subsection"], Cell[214509, 4743, 6895, 130, 1019, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[221441, 4878, 161, 2, 36, "Subsection"], Cell[221605, 4882, 4044, 106, 332, "Input", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ Cell[225686, 4993, 107, 1, 36, "Subsection"], Cell[225796, 4996, 4061, 87, 821, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[229894, 5088, 46, 0, 36, "Subsection"], Cell[229943, 5090, 8816, 239, 672, "Input", InitializationCell->True], Cell[238762, 5331, 1268, 27, 263, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[240079, 5364, 23, 0, 71, "Section"], Cell[CellGroupData[{ Cell[240127, 5368, 9572, 217, 952, "Input", InitializationCell->True], Cell[249702, 5587, 492, 10, 22, "Message"], Cell[250197, 5599, 482, 10, 22, "Message"], Cell[250682, 5611, 482, 10, 22, "Message"], Cell[251167, 5623, 482, 10, 22, "Message"], Cell[251652, 5635, 398, 10, 22, "Message"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[252099, 5651, 33, 0, 71, "Section"], Cell[252135, 5653, 129, 4, 31, "Input"] }, Open ]], Cell[CellGroupData[{ Cell[252301, 5662, 90, 1, 71, "Section"], Cell[CellGroupData[{ Cell[252416, 5667, 1073, 25, 172, "Input"], Cell[CellGroupData[{ Cell[253514, 5696, 300, 5, 62, "Print"], Cell[253817, 5703, 288, 5, 62, "Print"], Cell[254108, 5710, 291, 5, 62, "Print"], Cell[254402, 5717, 296, 5, 62, "Print"], Cell[254701, 5724, 295, 5, 62, "Print"], Cell[254999, 5731, 294, 5, 62, "Print"] }, Open ]], Cell[255308, 5739, 2645, 65, 126, "Output"] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)