(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 7.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[    172566,       4935]
NotebookOptionsPosition[    149258,       4207]
NotebookOutlinePosition[    156246,       4365]
CellTagsIndexPosition[    156166,       4360]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[TextData[{
 "Paralelizace v\[YAcute]po\[CHacek]t\:016f\nv syst\[EAcute]mu ",
 StyleBox["Mathematica",
  FontSlant->"Italic"]
}], "Title",
 ShowGroupOpener->False,
 CellChangeTimes->{{3.469725158843689*^9, 3.469725159794445*^9}, {
  3.469886123290338*^9, 3.4698861523408318`*^9}}],

Cell["Zden\:011bk Buk", "Author",
 CellChangeTimes->{{3.469726013355855*^9, 3.469726017967874*^9}, {
  3.469886163119211*^9, 3.469886170836443*^9}}],

Cell["bukz1@fel.cvut.cz", "Address",
 CellChangeTimes->{{3.469726742663608*^9, 3.469726744649686*^9}, {
  3.4698861761262302`*^9, 3.46988620423664*^9}, {3.4698863365723267`*^9, 
  3.469886352555402*^9}}],

Cell["\<\
\[CapitalCHacek]esk\[EAcute] vysok\[EAcute] u\[CHacek]en\[IAcute] technick\
\[EAcute] v Praze
Fakulta elektrotechnick\[AAcute]
Katedra po\[CHacek]\[IAcute]ta\[CHacek]\:016f\
\>", "Address",
 CellChangeTimes->{{3.469726742663608*^9, 3.469726744649686*^9}, {
  3.4698861761262302`*^9, 3.46988620423664*^9}, {3.4698863365723267`*^9, 
  3.469886352555402*^9}, {3.4698878155364027`*^9, 3.46988782882478*^9}}],

Cell["2010", "Date",
 CellChangeTimes->{{3.469886222436879*^9, 3.469886222612112*^9}, {
  3.469886316629298*^9, 3.469886321627174*^9}}],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  \[CapitalUAcute]vod  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  Obsah prezentace"
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
  3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
  3.469886884941725*^9}}],

Cell[TextData[{
 "Paralelizace v syst\[EAcute]mu ",
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " obecn\:011b"
}], "Subsection",
 CellChangeTimes->{{3.4698869080538054`*^9, 3.469886922519013*^9}}],

Cell[CellGroupData[{

Cell["Novinky ve verzi 7", "Subsection",
 CellChangeTimes->{{3.469886933613583*^9, 3.469886938317539*^9}}],

Cell[CellGroupData[{

Cell["Technologie", "Item",
 CellChangeTimes->{{3.469887115988654*^9, 3.469887127450592*^9}, {
  3.4698871693942757`*^9, 3.4698871758342123`*^9}}],

Cell["Licencov\[AAcute]n\[IAcute] a terminologie", "Item",
 CellChangeTimes->{{3.469887115988654*^9, 3.469887127450592*^9}}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Paralelizace v syst\[EAcute]mu ",
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " konkr\[EAcute]tn\:011b"
}], "Subsection",
 CellChangeTimes->{{3.469887015275949*^9, 3.469887024676318*^9}}],

Cell["Technologie LightweightGrid", "Item",
 CellChangeTimes->{{3.46988694800525*^9, 3.469886958004657*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["Dal\[SHacek]\[IAcute] mo\:017enosti, stru\[CHacek]n\:011b", "Subsection",
 CellChangeTimes->{{3.469887722437207*^9, 3.46988772881098*^9}, {
  3.471677380822839*^9, 3.4716773844482594`*^9}}],

Cell[TextData[{
 StyleBox["MathLink",
  FontSlant->"Italic"],
 ", nVidia CUDA"
}], "Item",
 CellChangeTimes->{{3.469887733196607*^9, 3.469887760138628*^9}, {
  3.4711724299131813`*^9, 3.4711724309905767`*^9}}],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  \[CapitalUAcute]vod  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  ",
 "Paralelizace v syst\[EAcute]mu ",
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " obecn\:011b"
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, 3.471616563591421*^9}],

Cell[CellGroupData[{

Cell[TextData[{
 "Paralelizace na \[UAcute]rovni jazyka ",
 StyleBox["Mathematica",
  FontSlant->"Italic"]
}], "Subsection",
 CellChangeTimes->{{3.4698869080538054`*^9, 3.469886922519013*^9}, {
  3.471616568957614*^9, 3.471616616626863*^9}}],

Cell[CellGroupData[{

Cell["\<\
Net\:0159eba n\[IAcute]zko\[UAcute]rov\:0148ov\[EAcute]ho programov\[AAcute]n\
\[IAcute]\
\>", "Item",
 CellChangeTimes->{{3.469887733196607*^9, 3.469887760138628*^9}, {
  3.4711724299131813`*^9, 3.4711724309905767`*^9}, {3.471616632053694*^9, 
  3.4716166619245234`*^9}}],

Cell["\<\
Odpad\[AAcute] \:0159e\[SHacek]en\[IAcute] komunika\[CHacek]n\[IAcute] \
vrstvy, sd\[IAcute]len\[IAcute] dat apod.\
\>", "Item",
 CellChangeTimes->{{3.4716167163278*^9, 3.471616736481783*^9}}],

Cell["Snadn\[AAcute] \[UAcute]prava st\[AAcute]vaj\[IAcute]c\[IAcute]ho k\
\[OAcute]du", "Item",
 CellChangeTimes->{{3.471616737175572*^9, 3.4716167496622887`*^9}}]
}, Open  ]],

Cell["\<\
Parallelize[
\t
\tMap[f, data]

]\
\>", "CodeBox",
 CellChangeTimes->{{3.471616827421682*^9, 3.471616828203554*^9}, {
  3.471617576832364*^9, 3.471617637612825*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["Paralelizace na ni\:017e\[SHacek]\[IAcute] \[UAcute]rovni", "Subsection",
 CellChangeTimes->{{3.4698869080538054`*^9, 3.469886922519013*^9}, {
  3.471616568957614*^9, 3.471616616626863*^9}, {3.471616770414134*^9, 
  3.471616777005082*^9}}],

Cell["\<\
V p\:0159\[IAcute]pad\:011b pot\:0159eby je mo\:017en\[EAcute] vyu\:017e\
\[IAcute]t n\[IAcute]zko\[UAcute]rov\:0148ov\[YAcute]ch funkc\[IAcute] pro \
vlastn\[IAcute] distribuci \[CHacek]\[AAcute]st\[IAcute] \
v\[YAcute]po\[CHacek]t\:016f\
\>", "Item",
 CellChangeTimes->{{3.469887733196607*^9, 3.469887760138628*^9}, {
  3.4711724299131813`*^9, 3.4711724309905767`*^9}, {3.471616632053694*^9, 
  3.4716166619245234`*^9}, {3.471617664275556*^9, 3.471617703155018*^9}}],

Cell["\<\
ParallelSubmit[1+2]
WaitAll[%]\
\>", "CodeBox",
 CellChangeTimes->{{3.471616827421682*^9, 3.471616828203554*^9}, {
  3.471617576832364*^9, 3.471617637612825*^9}, {3.471617720442052*^9, 
  3.4716177502891817`*^9}, {3.471617814871999*^9, 3.471617826078064*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["Jak?", "Subsection",
 CellChangeTimes->{{3.4698869080538054`*^9, 3.469886922519013*^9}, {
  3.471616568957614*^9, 3.471616616626863*^9}, {3.471616770414134*^9, 
  3.471616777005082*^9}, {3.471617892607354*^9, 3.471617895332336*^9}}],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " 6 a ni\:017e\[SHacek]\[IAcute] - knihovna ",
 StyleBox["Parallel Computing Toolkit",
  FontWeight->"Bold"]
}], "Item",
 CellChangeTimes->{{3.469887733196607*^9, 3.469887760138628*^9}, {
  3.4711724299131813`*^9, 3.4711724309905767`*^9}, {3.471616632053694*^9, 
  3.4716166619245234`*^9}, {3.471617664275556*^9, 3.471617703155018*^9}, {
  3.4716179241067133`*^9, 3.4716179736521263`*^9}}],

Cell[TextData[{
 "Od verze ",
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " 7 odpad\[AAcute] nutnost knihovny, podpora pro paraleln\[IAcute] \
v\[YAcute]po\[CHacek]ty je sou\[CHacek]\[AAcute]st\[IAcute] z\[AAcute]kladn\
\[IAcute] instalace."
}], "Item",
 CellChangeTimes->{{3.471617973993164*^9, 3.471618020496084*^9}}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 StyleBox["Mathematica",
  FontSlant->"Italic",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 StyleBox["  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  ",
 "7 vs. 6"
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, {3.4716181069948387`*^9, 3.4716181100368223`*^9}, {
   3.471618246933572*^9, 3.471618298118132*^9}, 3.471618762304798*^9, {
   3.4716649320850143`*^9, 3.471664942170682*^9}}],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " \[LessEqual] 6"
}], "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}}],

Cell[CellGroupData[{

Cell["Front End", "Item",
 CellChangeTimes->{{3.437154131413921*^9, 3.437154162436719*^9}, {
  3.437154284030791*^9, 3.437154285921682*^9}}],

Cell["Kernel", "Item",
 CellChangeTimes->{{3.437154287836267*^9, 3.437154303534628*^9}}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " 7"
}], "Subsection",
 CellChangeTimes->{{3.437154074136879*^9, 3.4371541069792*^9}, {
  3.437154244736696*^9, 3.437154248404043*^9}}],

Cell[CellGroupData[{

Cell["Front End", "Item",
 CellChangeTimes->{{3.437154131413921*^9, 3.437154162436719*^9}, {
  3.437154284030791*^9, 3.437154285921682*^9}}],

Cell["Control Kernel", "Item",
 CellChangeTimes->{{3.437154287836267*^9, 3.437154316271736*^9}}],

Cell[TextData[{
 "Compute Kernel ",
 StyleBox["(Komunikuje pouze s \:0159\[IAcute]dic\[IAcute]m j\[AAcute]drem - \
Control Kernel)",
  FontSlant->"Italic"]
}], "Item",
 CellChangeTimes->{{3.43715431862677*^9, 3.437154321777239*^9}, {
  3.471618605730874*^9, 3.47161862542634*^9}}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Technologie", "Subsection",
 CellChangeTimes->{{3.469886933613583*^9, 3.469886938317539*^9}, {
  3.4716183757326803`*^9, 3.471618377714694*^9}, {3.4716186585460663`*^9, 
  3.471618671432293*^9}}],

Cell[CellGroupData[{

Cell[TextData[{
 "Podpora pro paraleln\[IAcute] v\[YAcute]po\[CHacek]ty p\:0159\[IAcute]mo v \
syst\[EAcute]mu ",
 StyleBox["Mathematica",
  FontSlant->"Italic"]
}], "Item",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.471618350451857*^9, 3.471618364459243*^9}}],

Cell["\<\
Odpad\[AAcute] nutnost knihovny Parallel Computing Toolkit\
\>", "Item",
 CellChangeTimes->{{3.437154074136879*^9, 3.4371541069792*^9}}],

Cell[TextData[{
 "Automatick\[AAcute] detekce v\[YAcute]po\[CHacek]etn\[IAcute]ch jader (",
 StyleBox["Lightweight Grid",
  FontSlant->"Italic"],
 ")"
}], "Item",
 CellChangeTimes->{{3.437154131413921*^9, 3.437154162436719*^9}, {
  3.471618343197155*^9, 3.471618343708343*^9}, {3.471618380322546*^9, 
  3.471618380324798*^9}, {3.4716649644017773`*^9, 3.471664981633566*^9}}],

Cell["\<\
Podpora pro automatickou paralelizaci v\[YAcute]po\[CHacek]t\:016f\
\>", "Item",
 CellChangeTimes->{{3.471618386114493*^9, 3.471618399793892*^9}}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 StyleBox["Mathematica",
  FontSlant->"Italic",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 StyleBox[" 7  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  Uk\[AAcute]zka licencov\[AAcute]n\[IAcute]"
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, {3.4716181069948387`*^9, 3.4716181100368223`*^9}, {
   3.471618246933572*^9, 3.471618298118132*^9}, 3.471618762304798*^9, {
   3.471618908860133*^9, 3.471618928159153*^9}, {3.471618970956963*^9, 
   3.471618986005343*^9}}],

Cell[TextData[{
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " 7 je optimalizovan\[AAcute] pro pou\:017eit\[IAcute] na \[CHacek]ty\:0159j\
\[AAcute]drov\[YAcute]ch po\[CHacek]\[IAcute]ta\[CHacek]\[IAcute]ch."
}], "Item",
 CellChangeTimes->{{3.437154131413921*^9, 3.437154162436719*^9}, {
  3.437154284030791*^9, 3.437154285921682*^9}, {3.437154484052736*^9, 
  3.437154514315574*^9}}],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " Single Machine license"
}], "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}}],

Cell[CellGroupData[{

Cell[TextData[{
 "2 \[Times] ",
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " Front End"
}], "Item",
 CellChangeTimes->{{3.437154131413921*^9, 3.437154162436719*^9}, {
  3.437154284030791*^9, 3.437154285921682*^9}, {3.437154534339134*^9, 
  3.437154557232345*^9}}],

Cell["\<\
2 \[Times] Control Kernel (\:0159\[IAcute]dic\[IAcute] j\[AAcute]dro)\
\>", "Item",
 CellChangeTimes->{{3.437154287836267*^9, 3.437154303534628*^9}, {
  3.437154584891277*^9, 3.437154587328451*^9}}],

Cell["\<\
4 \[Times] Compute Kernel (v\[YAcute]po\[CHacek]etn\[IAcute] j\[AAcute]dro)\
\>", "Item",
 CellChangeTimes->{{3.437154588753458*^9, 3.437154610318878*^9}}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " Network Increment"
}], "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154640159359*^9, 3.437154644007357*^9}, {
  3.437154681925197*^9, 3.43715468500179*^9}}],

Cell[CellGroupData[{

Cell[TextData[{
 "1 \[Times] ",
 StyleBox["Mathematica",
  FontSlant->"Italic"],
 " Front End"
}], "Item",
 CellChangeTimes->{{3.437154131413921*^9, 3.437154162436719*^9}, {
   3.437154284030791*^9, 3.437154285921682*^9}, {3.437154534339134*^9, 
   3.437154557232345*^9}, 3.437155664282065*^9}],

Cell["\<\
1 \[Times] Control Kernel (\:0159\[IAcute]dic\[IAcute] j\[AAcute]dro)\
\>", "Item",
 CellChangeTimes->{{3.437154287836267*^9, 3.437154303534628*^9}, {
  3.437154584891277*^9, 3.437154587328451*^9}, {3.437155666407392*^9, 
  3.437155666529255*^9}}],

Cell["\<\
4 \[Times] Compute Kernel (v\[YAcute]po\[CHacek]etn\[IAcute] j\[AAcute]dro)\
\>", "Item",
 CellChangeTimes->{{3.437154588753458*^9, 3.437154610318878*^9}}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 StyleBox["Mathematica",
  FontSlant->"Italic",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 StyleBox[" 7  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  Uk\[AAcute]zka pou\:017eit\[IAcute]"
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, {3.4716181069948387`*^9, 3.4716181100368223`*^9}, {
   3.471618246933572*^9, 3.471618298118132*^9}, 3.471618762304798*^9, {
   3.471618908860133*^9, 3.471618928159153*^9}, {3.471618970956963*^9, 
   3.471618986005343*^9}, {3.47161928229207*^9, 3.471619287018958*^9}}],

Cell[CellGroupData[{

Cell["\<\
Konfigurace a spu\[SHacek]t\:011bn\[IAcute] \
v\[YAcute]po\[CHacek]etn\[IAcute]ch jader\
\>", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}}],

Cell[CellGroupData[{

Cell["\<\
P\:0159ehled dostupn\[YAcute]ch slu\:017eeb (jader) a licenc\[IAcute]\
\>", "Item",
 CellChangeTimes->{{3.471665226658292*^9, 3.47166525379559*^9}}],

Cell["\<\
$ConfiguredKernels, $MaxLicenseProcesses, $MaxLicenseSubprocess\
\>", "Item",
 CellChangeTimes->{{3.4716652549602833`*^9, 3.471665282246223*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["$ConfiguredKernels"], "Input",
 CellChangeTimes->{{3.4716192935861597`*^9, 3.471619300267655*^9}, {
  3.471620022543194*^9, 3.4716200339850903`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"LightweightGridClient`LightweightGrid", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"\<\"Agent\"\>", 
       "\[Rule]", \
"\<\"http://stroj1.domena:3737/WolframLightweightGrid/Manager\"\>"}], ",", 
      RowBox[{"\<\"KernelCount\"\>", "\[Rule]", "4"}], ",", 
      RowBox[{"\<\"LocalLinkMode\"\>", "\[Rule]", "\<\"Connect\"\>"}], ",", 
      RowBox[{"\<\"Service\"\>", "\[Rule]", "\<\"\"\>"}], ",", 
      RowBox[{"\<\"Timeout\"\>", "\[Rule]", "5"}]}], "}"}], "]"}], ",", 
   RowBox[{"LightweightGridClient`LightweightGrid", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"\<\"Agent\"\>", 
       "\[Rule]", \
"\<\"http://stroj2.domena:3737/WolframLightweightGrid/Manager\"\>"}], ",", 
      RowBox[{"\<\"KernelCount\"\>", "\[Rule]", "8"}], ",", 
      RowBox[{"\<\"LocalLinkMode\"\>", "\[Rule]", "\<\"Connect\"\>"}], ",", 
      RowBox[{"\<\"Service\"\>", "\[Rule]", "\<\"\"\>"}], ",", 
      RowBox[{"\<\"Timeout\"\>", "\[Rule]", "5"}]}], "}"}], "]"}], ",", 
   InterpretationBox["\<\"\[LeftSkeleton]\\!\\(2\\) local kernels\
\[RightSkeleton]\"\>",
    StringForm["\[LeftSkeleton]`1` local kernels\[RightSkeleton]", 2],
    Editable->False]}], "}"}]], "Output",
 CellChangeTimes->{3.472191475352642*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["$MaxLicenseProcesses"], "Input",
 CellChangeTimes->{{3.471619652845181*^9, 3.471619656799666*^9}}],

Cell[BoxData["8"], "Output",
 CellChangeTimes->{3.472191475527145*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["$MaxLicenseSubprocesses"], "Input",
 CellChangeTimes->{{3.471619658850109*^9, 3.471619664263381*^9}}],

Cell[BoxData["16"], "Output",
 CellChangeTimes->{3.4721914755632544`*^9}]
}, Open  ]],

Cell["\<\
Spu\[SHacek]t\:011bn\[IAcute], p\:0159ehled \
b\:011b\:017e\[IAcute]c\[IAcute]ch a ukon\[CHacek]en\[IAcute] b\:011bhu v\
\[YAcute]po\[CHacek]etn\[IAcute]ch jader\
\>", "Item",
 CellChangeTimes->{{3.471665226658292*^9, 3.47166525379559*^9}, {
  3.471665299301943*^9, 3.47166536306066*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"{", 
   RowBox[{"\"\<localhost\>\"", ",", "\"\<localhost\>\""}], "}"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.471619310502939*^9, 3.471619347057828*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"1", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"2", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.4721914780424232`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Kernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.4716204057813387`*^9, 3.471620407115787*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"1", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"2", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.4721914781394863`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CloseKernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.4716203499704447`*^9, 3.4716203588396473`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"1", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"2", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.472191478184388*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Jednoduch\[EAcute] vyhodnocov\[AAcute]n\[IAcute] v paraleln\[IAcute]m prost\
\:0159ed\[IAcute]\
\>", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}, {3.471620457802554*^9, 
  3.471620477064521*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"{", 
   RowBox[{"\"\<localhost\>\"", ",", "\"\<localhost\>\""}], "}"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.471619310502939*^9, 3.471619347057828*^9}, {
  3.471620532729343*^9, 3.4716205347199173`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"3", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"4", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.4721914805789948`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Kernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471620582940337*^9, 3.471620585709606*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"3", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"4", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191480772949*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"{", 
   RowBox[{"\"\<localhost\>\"", ",", "\"\<localhost\>\""}], "}"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.471619310502939*^9, 3.471619347057828*^9}, {
   3.471620532729343*^9, 3.4716205347199173`*^9}, 3.471620568005376*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"5", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"6", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191483088751*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Kernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471620588762301*^9, 3.4716205900774527`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"3", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"4", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"5", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"6", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.4721914831838703`*^9}]
}, Open  ]],

Cell[TextData[{
 "Vyhodnocen\[IAcute] v\[YAcute]razu v paraleln\[IAcute]m prost\:0159ed\
\[IAcute] ",
 StyleBox["(vyhodnocen\[IAcute] stejn\[EAcute]ho v\[YAcute]razu na \
v\[SHacek]ech v\[YAcute]po\[CHacek]etn\[IAcute]ch j\[AAcute]drech)",
  FontSlant->"Italic"]
}], "Item",
 CellChangeTimes->{{3.47166617104081*^9, 3.471666231853527*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", "$KernelID", "]"}]], "Input",
 CellChangeTimes->{{3.471619353953478*^9, 3.471619368825148*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"3", ",", "4", ",", "5", ",", "6"}], "}"}]], "Output",
 CellChangeTimes->{3.472191483216764*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"{", 
   RowBox[{"$KernelID", ",", 
    RowBox[{"1", "+", "1"}]}], "}"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716206066608477`*^9, 3.471620633292183*^9}, {
  3.47167038395912*^9, 3.471670385499091*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"3", ",", "2"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"4", ",", "2"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"5", ",", "2"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"6", ",", "2"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191483266234*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"{", 
   RowBox[{"$KernelID", ",", 
    RowBox[{"RandomInteger", "[", 
     RowBox[{"{", 
      RowBox[{"1", ",", "10000"}], "}"}], "]"}]}], "}"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716206066608477`*^9, 3.4716206510761423`*^9}, 
   3.471670409672474*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"3", ",", "8348"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"4", ",", "4325"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"5", ",", "6114"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"6", ",", "7355"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191483352139*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"{", 
   RowBox[{
   "$KernelID", ",", "$ProcessID", ",", "$OperatingSystem", ",", 
    "$MachineType", ",", "$Version"}], "}"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716193711700153`*^9, 3.471619445713427*^9}, {
  3.471619510108974*^9, 3.471619560685052*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "3", ",", "7016", ",", "\<\"MacOSX\"\>", ",", "\<\"PC\"\>", 
     ",", "\<\"7.0 for Mac OS X x86 (64-bit) (February 19, 2009)\"\>"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "4", ",", "7017", ",", "\<\"MacOSX\"\>", ",", "\<\"PC\"\>", 
     ",", "\<\"7.0 for Mac OS X x86 (64-bit) (February 19, 2009)\"\>"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "5", ",", "7018", ",", "\<\"MacOSX\"\>", ",", "\<\"PC\"\>", 
     ",", "\<\"7.0 for Mac OS X x86 (64-bit) (February 19, 2009)\"\>"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "6", ",", "7019", ",", "\<\"MacOSX\"\>", ",", "\<\"PC\"\>", 
     ",", "\<\"7.0 for Mac OS X x86 (64-bit) (February 19, 2009)\"\>"}], 
    "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191483402875*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CloseKernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.4716203499704447`*^9, 3.4716203588396473`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"3", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"4", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"5", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"6", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.472191483474494*^9}]
}, Open  ]],

Cell["Automatick\[AAcute] paralelizace", "Item",
 CellChangeTimes->{{3.47166617104081*^9, 3.471666231853527*^9}, {
  3.471669698172614*^9, 3.471669705985683*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"{", 
   RowBox[{"\"\<localhost\>\"", ",", "\"\<localhost\>\""}], "}"}], 
  "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"7", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"8", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191485784123*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"AbsoluteTiming", "[", 
  RowBox[{"Select", "[", " ", 
   RowBox[{
    RowBox[{"Range", "[", "4000", "]"}], ",", " ", 
    RowBox[{
     RowBox[{"PrimeQ", "[", 
      RowBox[{
       RowBox[{"2", "^", "#"}], "-", "1"}], "]"}], "&"}]}], "]"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.4716676077597322`*^9, 3.471667616574141*^9}, {
  3.471667680491407*^9, 3.4716677002762403`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"11.766954`7.522209049186022", ",", 
   RowBox[{"{", 
    RowBox[{
    "2", ",", "3", ",", "5", ",", "7", ",", "13", ",", "17", ",", "19", ",", 
     "31", ",", "61", ",", "89", ",", "107", ",", "127", ",", "521", ",", 
     "607", ",", "1279", ",", "2203", ",", "2281", ",", "3217"}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.472191497647628*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"AbsoluteTiming", "[", 
  RowBox[{"Parallelize", "[", 
   RowBox[{"Select", "[", " ", 
    RowBox[{
     RowBox[{"Range", "[", "4000", "]"}], ",", " ", 
     RowBox[{
      RowBox[{"PrimeQ", "[", 
       RowBox[{
        RowBox[{"2", "^", "#"}], "-", "1"}], "]"}], "&"}]}], "]"}], "]"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.4716676214408293`*^9, 3.4716676265337687`*^9}, {
  3.471667675047316*^9, 3.471667675181229*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"7.741839`7.340389128944601", ",", 
   RowBox[{"{", 
    RowBox[{
    "2", ",", "3", ",", "5", ",", "7", ",", "13", ",", "17", ",", "19", ",", 
     "31", ",", "61", ",", "89", ",", "107", ",", "127", ",", "521", ",", 
     "607", ",", "1279", ",", "2203", ",", "2281", ",", "3217"}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.4721915054619904`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CloseKernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.4716203499704447`*^9, 3.4716203588396473`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"7", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"8", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.4721915055699883`*^9}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  V\[YAcute]po\[CHacek]ty  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  ParallelEvaluate, ParallelMap, ..."
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, {3.4716181069948387`*^9, 3.4716181100368223`*^9}, {
   3.471618246933572*^9, 3.471618298118132*^9}, 3.471618762304798*^9, {
   3.471618908860133*^9, 3.471618928159153*^9}, {3.471618970956963*^9, 
   3.471618986005343*^9}, {3.47161928229207*^9, 3.471619287018958*^9}, {
   3.471670300896264*^9, 3.471670301957354*^9}, {3.471670476361025*^9, 
   3.471670508533573*^9}, {3.4716711942481422`*^9, 3.471671214476448*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"{", 
   RowBox[{"\"\<localhost\>\"", ",", "\"\<localhost\>\""}], "}"}], 
  "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"9", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"10", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191507865164*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["Jednoduch\[EAcute] vyhodnocen\[IAcute]", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}, {3.4716705688528214`*^9, 
  3.4716705737311783`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", "$KernelID", "]"}]], "Input",
 CellChangeTimes->{{3.4716705751807613`*^9, 3.4716705784661493`*^9}, {
  3.471670608472683*^9, 3.4716706144919853`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"9", ",", "10"}], "}"}]], "Output",
 CellChangeTimes->{3.472191507966659*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Prom\:011bnn\[EAcute]", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}, {3.4716705688528214`*^9, 
  3.4716705737311783`*^9}, {3.4716706703927794`*^9, 3.471670675095662*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"x", "=", "2"}], ";"}]], "Input",
 CellChangeTimes->{{3.4716706811942167`*^9, 3.471670683417349*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"x", "===", "2"}], "]"}]], "Input",
 CellChangeTimes->{{3.471670685452819*^9, 3.471670697841007*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"False", ",", "False"}], "}"}]], "Output",
 CellChangeTimes->{3.472191508029599*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"x", "==", "2"}], "]"}]], "Input",
 CellChangeTimes->{{3.471670685452819*^9, 3.471670697841007*^9}, {
  3.471670847273973*^9, 3.471670851651349*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"True", ",", "True"}], "}"}]], "Output",
 CellChangeTimes->{3.4721915080706453`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"With", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"a", "=", "2"}], "}"}], ",", 
   RowBox[{"ParallelEvaluate", "[", 
    RowBox[{"a", "===", "2"}], "]"}]}], " ", "]"}]], "Input",
 CellChangeTimes->{{3.471670923531662*^9, 3.471670925064423*^9}},
 CellID->211325402],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"True", ",", "True"}], "}"}]], "Output",
 CellChangeTimes->{3.472191508132063*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"kernel", "=", 
  RowBox[{"First", "@", 
   RowBox[{"Kernels", "[", "]"}]}]}]], "Input",
 CellChangeTimes->{{3.471670956581127*^9, 3.471670963151518*^9}}],

Cell[BoxData[
 RowBox[{"KernelObject", "[", 
  RowBox[{"9", ",", "\<\"local\"\>"}], "]"}]], "Output",
 CellChangeTimes->{3.472191508214316*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{
   RowBox[{"ParallelEvaluate", "[", 
    RowBox[{
     RowBox[{"IntegerQ", "[", "i", "]"}], ",", "kernel"}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.471670951161725*^9, 3.4716709677105618`*^9}},
 CellID->6163691],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "False", ",", "False", ",", "False", ",", "False", ",", "False", ",", 
   "False", ",", "False", ",", "False", ",", "False", ",", "False"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.4721915082982597`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{
   RowBox[{"With", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"i", "=", "i"}], "}"}], ",", 
     RowBox[{"ParallelEvaluate", "[", 
      RowBox[{
       RowBox[{"IntegerQ", "[", "i", "]"}], ",", "kernel"}], "]"}]}], "]"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.47167098170508*^9, 3.471670981888064*^9}},
 CellID->353434615],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", 
   ",", "True", ",", "True", ",", "True", ",", "True"}], "}"}]], "Output",
 CellChangeTimes->{3.472191508364851*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["ParallelCombine", "Subsection",
 CellChangeTimes->{{3.471671220705917*^9, 3.471671224061161*^9}}],

Cell[TextData[{
 Cell[BoxData[
  FormBox[
   RowBox[{"ParallelCombine", "[", 
    RowBox[{"f", ",", 
     RowBox[{"h", "[", 
      RowBox[{
       SubscriptBox["e", "1"], ",", 
       SubscriptBox["e", "2"], ",", "\[Ellipsis]", ",", 
       SubscriptBox["e", "i"], ",", "\[Ellipsis]", ",", 
       SubscriptBox["e", "n"]}], "]"}]}]}], TraditionalForm]]],
 ",",
 StyleBox["comb",
  FontSlant->"Italic"],
 "]"
}], "CodeBox",
 CellChangeTimes->{{3.4716712393377533`*^9, 3.471671375087131*^9}, {
  3.4716719796857986`*^9, 3.471671981084511*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Prime", "[", "3", "]"}]], "Input",
 CellChangeTimes->{{3.471671402424011*^9, 3.4716714068547173`*^9}}],

Cell[BoxData["5"], "Output",
 CellChangeTimes->{3.4721915084316797`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Prime", "[", 
  RowBox[{"{", 
   RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]], "Input",
 CellChangeTimes->{{3.471671408261351*^9, 3.4716714118514433`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"2", ",", "3", ",", "5"}], "}"}]], "Output",
 CellChangeTimes->{3.472191508499876*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelCombine", "[", 
  RowBox[{"Prime", ",", 
   RowBox[{"{", 
    RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6"}], "}"}]}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.471671420207008*^9, 3.471671436071026*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"2", ",", "3", ",", "5", ",", "7", ",", "11", ",", "13"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.472191508539311*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelCombine", "[", 
  RowBox[{"f", ",", 
   RowBox[{"{", 
    RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6"}], "}"}], 
   ",", "comb"}], "]"}]], "Input",
 CellChangeTimes->{{3.471671420207008*^9, 3.471671558810828*^9}}],

Cell[BoxData[
 RowBox[{"comb", "[", 
  RowBox[{
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"1", ",", "2"}], "}"}], "]"}], ",", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"3", ",", "4"}], "}"}], "]"}], ",", 
   RowBox[{"f", "[", 
    RowBox[{"{", "5", "}"}], "]"}], ",", 
   RowBox[{"f", "[", 
    RowBox[{"{", "6", "}"}], "]"}]}], "]"}]], "Output",
 CellChangeTimes->{3.4721915085877323`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelCombine", "[", 
  RowBox[{"f", ",", 
   RowBox[{"h", "[", 
    RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6"}], "]"}], 
   ",", "comb"}], "]"}]], "Input",
 CellChangeTimes->{{3.471671420207008*^9, 3.47167156320185*^9}}],

Cell[BoxData[
 RowBox[{"comb", "[", 
  RowBox[{
   RowBox[{"f", "[", 
    RowBox[{"h", "[", 
     RowBox[{"1", ",", "2"}], "]"}], "]"}], ",", 
   RowBox[{"f", "[", 
    RowBox[{"h", "[", 
     RowBox[{"3", ",", "4"}], "]"}], "]"}], ",", 
   RowBox[{"f", "[", 
    RowBox[{"h", "[", "5", "]"}], "]"}], ",", 
   RowBox[{"f", "[", 
    RowBox[{"h", "[", "6", "]"}], "]"}]}], "]"}]], "Output",
 CellChangeTimes->{3.472191508631914*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["ParallelMap", "Subsection",
 CellChangeTimes->{{3.471671220705917*^9, 3.471671224061161*^9}, {
  3.471671578161399*^9, 3.471671580551303*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelMap", "[", 
  RowBox[{"Sin", ",", 
   RowBox[{"{", 
    RowBox[{"0", ",", "\[Pi]", ",", "1.0"}], "}"}]}], "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "0", ",", "0.8414709848078965`"}], "}"}]], "Output",
 CellChangeTimes->{3.472191508686097*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelMap", "[", 
  RowBox[{"FactorInteger", ",", 
   FractionBox[
    RowBox[{
     RowBox[{"10", "^", 
      RowBox[{"Range", "[", 
       RowBox[{"20", ",", "30"}], "]"}]}], "-", "1"}], "9"]}], "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"11", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"41", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"101", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"271", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"3541", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"9091", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"27961", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"3", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"37", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"43", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"239", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"1933", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"4649", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"10838689", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"11", ",", "2"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"23", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"4093", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"8779", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"21649", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"513239", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"{", 
     RowBox[{"11111111111111111111111", ",", "1"}], "}"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"3", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"7", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"11", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"13", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"37", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"73", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"101", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"137", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"9901", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"99990001", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"41", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"271", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"21401", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"25601", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"182521213001", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"11", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"53", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"79", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"859", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"265371653", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"1058313049", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"3", ",", "3"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"37", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"757", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"333667", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"440334654777631", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"11", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"29", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"101", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"239", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"281", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"4649", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"909091", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"121499449", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"3191", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"16763", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"43037", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"62003", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"77843839397", ",", "1"}], "}"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"3", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"7", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"11", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"13", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"31", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"37", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"41", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"211", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"241", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"271", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"2161", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"9091", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"2906161", ",", "1"}], "}"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.4721915087637978`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CloseKernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471672155375856*^9, 3.471672159525795*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"9", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"10", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.4721915088164253`*^9}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  \[CapitalUAcute]lohy  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  ParallelSubmit, WaitAll, ..."
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, {3.4716181069948387`*^9, 3.4716181100368223`*^9}, {
   3.471618246933572*^9, 3.471618298118132*^9}, 3.471618762304798*^9, {
   3.471618908860133*^9, 3.471618928159153*^9}, {3.471618970956963*^9, 
   3.471618986005343*^9}, {3.47161928229207*^9, 3.471619287018958*^9}, {
   3.471670300896264*^9, 3.471670301957354*^9}, {3.4716720978331337`*^9, 
   3.471672121307925*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"{", 
   RowBox[{"\"\<localhost\>\"", ",", "\"\<localhost\>\""}], "}"}], 
  "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"11", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"12", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191511264092*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["Vytvo\:0159en\[IAcute] a vyhodnocen\[IAcute] \[UAcute]lohy", \
"Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}, {3.471673795756653*^9, 
  3.47167381397614*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"j", "=", 
  RowBox[{"ParallelSubmit", "[", 
   RowBox[{"1", "+", "1"}], "]"}]}]], "Input",
 CellChangeTimes->{3.471672372239849*^9}],

Cell[BoxData[
 FrameBox[
  TemplateBox[{DynamicBox[
     ToBoxes[
      Parallel`Concurrency`Private`evalIcon[
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         109, 1 + 1, Null, Parallel`Concurrency`Private`state$1126]], 
        Parallel`Concurrency`Private`stateTrans]], StandardForm], 
     ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
     StyleBox[
      GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
      CacheGraphics -> False], 
     Spacer[6]],TagBox[
     GridBox[{{
        PaneBox[
         StyleBox[
          TagBox[
           RowBox[{"1", "+", "1"}], Short[#, 0.6]& ], StripOnInput -> False, 
          FontSize -> Small], ImageSize -> {Full, 18}, ImageSizeAction -> 
         "ResizeToFit"]}, {
        DynamicBox[
         ToBoxes[
          Style[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             109, 1 + 1, Null, Parallel`Concurrency`Private`state$1126]], {
            Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
             "ready for processing", Parallel`Developer`running[
               Pattern[Parallel`Concurrency`Private`k, 
                Blank[]]] :> StringForm["running on kernel `1`", 
               Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]], 
             Parallel`Developer`finished[
               Pattern[Parallel`Concurrency`Private`r, 
                BlankNullSequence[]]] :> "received", 
             Parallel`Developer`dequeued[
               Pattern[Parallel`Concurrency`Private`r, 
                BlankNullSequence[]]] :> "finished", 
             Pattern[Parallel`Concurrency`Private`e, 
               Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray], 
          StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
      GridBoxAlignment -> {"Columns" -> {{Left}}}, 
      GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
     "Column"]},
   "Row",
   DisplayFunction->(
    RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
   InterpretationFunction->(RowBox[{"Row", "[", 
      RowBox[{"{", 
        RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
  Background->Dynamic[
    Part[Parallel`Concurrency`Private`bgColors, 
     ReplaceAll[
      Parallel`Developer`ProcessState[
       EvaluationObject[
       109, 1 + 1, Null, Parallel`Concurrency`Private`state$1126]], 
      Parallel`Concurrency`Private`stateTrans]]],
  FrameMargins->5,
  FrameStyle->GrayLevel[0.5],
  RoundingRadius->6,
  StripOnInput->False]], "Output",
 CellChangeTimes->{3.472191511528935*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WaitAll", "[", "j", "]"}]], "Input",
 CellChangeTimes->{{3.4716723782805777`*^9, 3.471672381092001*^9}}],

Cell[BoxData["2"], "Output",
 CellChangeTimes->{3.472191512080785*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"pids", "=", 
  RowBox[{
   RowBox[{"Function", "[", 
    RowBox[{"i", ",", 
     RowBox[{"ParallelSubmit", "[", 
      RowBox[{"i", "^", "2"}], "]"}]}], "]"}], "/@", 
   RowBox[{"{", 
    RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5"}], "}"}]}]}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           110, 1^2, Null, Parallel`Concurrency`Private`state$1136]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             SuperscriptBox["1", "2"], Short[#, 0.6]& ], StripOnInput -> 
            False, FontSize -> Small], ImageSize -> {Full, 18}, 
           ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[
               110, 1^2, Null, Parallel`Concurrency`Private`state$1136]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         110, 1^2, Null, Parallel`Concurrency`Private`state$1136]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             SuperscriptBox["2", "2"], Short[#, 0.6]& ], StripOnInput -> 
            False, FontSize -> Small], ImageSize -> {Full, 18}, 
           ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[
               111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             SuperscriptBox["3", "2"], Short[#, 0.6]& ], StripOnInput -> 
            False, FontSize -> Small], ImageSize -> {Full, 18}, 
           ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[
               112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             SuperscriptBox["4", "2"], Short[#, 0.6]& ], StripOnInput -> 
            False, FontSize -> Small], ImageSize -> {Full, 18}, 
           ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[
               113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             SuperscriptBox["5", "2"], Short[#, 0.6]& ], StripOnInput -> 
            False, FontSize -> Small], ImageSize -> {Full, 18}, 
           ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[
               114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False]}], "}"}]], "Output",
 CellChangeTimes->{3.4721915121611357`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"{", 
   RowBox[{"res", ",", "pid", ",", "pids"}], "}"}], "=", 
  RowBox[{"WaitNext", "[", "pids", "]"}]}]], "Input",
 CellChangeTimes->{{3.471673904861936*^9, 3.471673923909416*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"1", ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           110, 1^2, Null, Parallel`Concurrency`Private`state$1136]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             SuperscriptBox["1", "2"], Short[#, 0.6]& ], StripOnInput -> 
            False, FontSize -> Small], ImageSize -> {Full, 18}, 
           ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[
               110, 1^2, Null, Parallel`Concurrency`Private`state$1136]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         110, 1^2, Null, Parallel`Concurrency`Private`state$1136]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   RowBox[{"{", 
    RowBox[{
     FrameBox[
      TemplateBox[{DynamicBox[
         ToBoxes[
          Parallel`Concurrency`Private`evalIcon[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], 
            Parallel`Concurrency`Private`stateTrans]], StandardForm], 
         ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
         StyleBox[
          GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
          CacheGraphics -> False], 
         Spacer[6]],TagBox[
         GridBox[{{
            PaneBox[
             StyleBox[
              TagBox[
               SuperscriptBox["2", "2"], Short[#, 0.6]& ], StripOnInput -> 
              False, FontSize -> Small], ImageSize -> {Full, 18}, 
             ImageSizeAction -> "ResizeToFit"]}, {
            DynamicBox[
             ToBoxes[
              Style[
               ReplaceAll[
                Parallel`Developer`ProcessState[
                 EvaluationObject[
                 111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], {
                Parallel`Developer`created -> "new", 
                 Parallel`Developer`queued -> "ready for processing", 
                 Parallel`Developer`running[
                   Pattern[Parallel`Concurrency`Private`k, 
                    Blank[]]] :> StringForm["running on kernel `1`", 
                   Parallel`Developer`KernelID[
                   Parallel`Concurrency`Private`k]], 
                 Parallel`Developer`finished[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "received", 
                 Parallel`Developer`dequeued[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "finished", 
                 Pattern[Parallel`Concurrency`Private`e, 
                   Blank[]] :> Parallel`Concurrency`Private`e}], "Label", 
               Gray], StandardForm], 
             ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
          GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
         "Column"]},
       "Row",
       DisplayFunction->(
        RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
       InterpretationFunction->(RowBox[{"Row", "[", 
          RowBox[{"{", 
            RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
      Background->Dynamic[
        Part[Parallel`Concurrency`Private`bgColors, 
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], 
          Parallel`Concurrency`Private`stateTrans]]],
      FrameMargins->5,
      FrameStyle->GrayLevel[0.5],
      RoundingRadius->6,
      StripOnInput->False], ",", 
     FrameBox[
      TemplateBox[{DynamicBox[
         ToBoxes[
          Parallel`Concurrency`Private`evalIcon[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], 
            Parallel`Concurrency`Private`stateTrans]], StandardForm], 
         ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
         StyleBox[
          GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
          CacheGraphics -> False], 
         Spacer[6]],TagBox[
         GridBox[{{
            PaneBox[
             StyleBox[
              TagBox[
               SuperscriptBox["3", "2"], Short[#, 0.6]& ], StripOnInput -> 
              False, FontSize -> Small], ImageSize -> {Full, 18}, 
             ImageSizeAction -> "ResizeToFit"]}, {
            DynamicBox[
             ToBoxes[
              Style[
               ReplaceAll[
                Parallel`Developer`ProcessState[
                 EvaluationObject[
                 112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], {
                Parallel`Developer`created -> "new", 
                 Parallel`Developer`queued -> "ready for processing", 
                 Parallel`Developer`running[
                   Pattern[Parallel`Concurrency`Private`k, 
                    Blank[]]] :> StringForm["running on kernel `1`", 
                   Parallel`Developer`KernelID[
                   Parallel`Concurrency`Private`k]], 
                 Parallel`Developer`finished[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "received", 
                 Parallel`Developer`dequeued[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "finished", 
                 Pattern[Parallel`Concurrency`Private`e, 
                   Blank[]] :> Parallel`Concurrency`Private`e}], "Label", 
               Gray], StandardForm], 
             ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
          GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
         "Column"]},
       "Row",
       DisplayFunction->(
        RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
       InterpretationFunction->(RowBox[{"Row", "[", 
          RowBox[{"{", 
            RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
      Background->Dynamic[
        Part[Parallel`Concurrency`Private`bgColors, 
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], 
          Parallel`Concurrency`Private`stateTrans]]],
      FrameMargins->5,
      FrameStyle->GrayLevel[0.5],
      RoundingRadius->6,
      StripOnInput->False], ",", 
     FrameBox[
      TemplateBox[{DynamicBox[
         ToBoxes[
          Parallel`Concurrency`Private`evalIcon[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], 
            Parallel`Concurrency`Private`stateTrans]], StandardForm], 
         ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
         StyleBox[
          GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
          CacheGraphics -> False], 
         Spacer[6]],TagBox[
         GridBox[{{
            PaneBox[
             StyleBox[
              TagBox[
               SuperscriptBox["4", "2"], Short[#, 0.6]& ], StripOnInput -> 
              False, FontSize -> Small], ImageSize -> {Full, 18}, 
             ImageSizeAction -> "ResizeToFit"]}, {
            DynamicBox[
             ToBoxes[
              Style[
               ReplaceAll[
                Parallel`Developer`ProcessState[
                 EvaluationObject[
                 113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], {
                Parallel`Developer`created -> "new", 
                 Parallel`Developer`queued -> "ready for processing", 
                 Parallel`Developer`running[
                   Pattern[Parallel`Concurrency`Private`k, 
                    Blank[]]] :> StringForm["running on kernel `1`", 
                   Parallel`Developer`KernelID[
                   Parallel`Concurrency`Private`k]], 
                 Parallel`Developer`finished[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "received", 
                 Parallel`Developer`dequeued[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "finished", 
                 Pattern[Parallel`Concurrency`Private`e, 
                   Blank[]] :> Parallel`Concurrency`Private`e}], "Label", 
               Gray], StandardForm], 
             ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
          GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
         "Column"]},
       "Row",
       DisplayFunction->(
        RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
       InterpretationFunction->(RowBox[{"Row", "[", 
          RowBox[{"{", 
            RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
      Background->Dynamic[
        Part[Parallel`Concurrency`Private`bgColors, 
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], 
          Parallel`Concurrency`Private`stateTrans]]],
      FrameMargins->5,
      FrameStyle->GrayLevel[0.5],
      RoundingRadius->6,
      StripOnInput->False], ",", 
     FrameBox[
      TemplateBox[{DynamicBox[
         ToBoxes[
          Parallel`Concurrency`Private`evalIcon[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], 
            Parallel`Concurrency`Private`stateTrans]], StandardForm], 
         ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
         StyleBox[
          GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
          CacheGraphics -> False], 
         Spacer[6]],TagBox[
         GridBox[{{
            PaneBox[
             StyleBox[
              TagBox[
               SuperscriptBox["5", "2"], Short[#, 0.6]& ], StripOnInput -> 
              False, FontSize -> Small], ImageSize -> {Full, 18}, 
             ImageSizeAction -> "ResizeToFit"]}, {
            DynamicBox[
             ToBoxes[
              Style[
               ReplaceAll[
                Parallel`Developer`ProcessState[
                 EvaluationObject[
                 114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], {
                Parallel`Developer`created -> "new", 
                 Parallel`Developer`queued -> "ready for processing", 
                 Parallel`Developer`running[
                   Pattern[Parallel`Concurrency`Private`k, 
                    Blank[]]] :> StringForm["running on kernel `1`", 
                   Parallel`Developer`KernelID[
                   Parallel`Concurrency`Private`k]], 
                 Parallel`Developer`finished[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "received", 
                 Parallel`Developer`dequeued[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "finished", 
                 Pattern[Parallel`Concurrency`Private`e, 
                   Blank[]] :> Parallel`Concurrency`Private`e}], "Label", 
               Gray], StandardForm], 
             ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
          GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
         "Column"]},
       "Row",
       DisplayFunction->(
        RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
       InterpretationFunction->(RowBox[{"Row", "[", 
          RowBox[{"{", 
            RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
      Background->Dynamic[
        Part[Parallel`Concurrency`Private`bgColors, 
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], 
          Parallel`Concurrency`Private`stateTrans]]],
      FrameMargins->5,
      FrameStyle->GrayLevel[0.5],
      RoundingRadius->6,
      StripOnInput->False]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.4721915133428707`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"{", 
   RowBox[{"res", ",", "pid", ",", "pids"}], "}"}], "=", 
  RowBox[{"WaitNext", "[", "pids", "]"}]}]], "Input",
 CellChangeTimes->{{3.471673938311226*^9, 3.471673939919258*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"4", ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             SuperscriptBox["2", "2"], Short[#, 0.6]& ], StripOnInput -> 
            False, FontSize -> Small], ImageSize -> {Full, 18}, 
           ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[
               111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[
         111, 2^2, Null, Parallel`Concurrency`Private`state$1137]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   RowBox[{"{", 
    RowBox[{
     FrameBox[
      TemplateBox[{DynamicBox[
         ToBoxes[
          Parallel`Concurrency`Private`evalIcon[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], 
            Parallel`Concurrency`Private`stateTrans]], StandardForm], 
         ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
         StyleBox[
          GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
          CacheGraphics -> False], 
         Spacer[6]],TagBox[
         GridBox[{{
            PaneBox[
             StyleBox[
              TagBox[
               SuperscriptBox["3", "2"], Short[#, 0.6]& ], StripOnInput -> 
              False, FontSize -> Small], ImageSize -> {Full, 18}, 
             ImageSizeAction -> "ResizeToFit"]}, {
            DynamicBox[
             ToBoxes[
              Style[
               ReplaceAll[
                Parallel`Developer`ProcessState[
                 EvaluationObject[
                 112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], {
                Parallel`Developer`created -> "new", 
                 Parallel`Developer`queued -> "ready for processing", 
                 Parallel`Developer`running[
                   Pattern[Parallel`Concurrency`Private`k, 
                    Blank[]]] :> StringForm["running on kernel `1`", 
                   Parallel`Developer`KernelID[
                   Parallel`Concurrency`Private`k]], 
                 Parallel`Developer`finished[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "received", 
                 Parallel`Developer`dequeued[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "finished", 
                 Pattern[Parallel`Concurrency`Private`e, 
                   Blank[]] :> Parallel`Concurrency`Private`e}], "Label", 
               Gray], StandardForm], 
             ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
          GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
         "Column"]},
       "Row",
       DisplayFunction->(
        RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
       InterpretationFunction->(RowBox[{"Row", "[", 
          RowBox[{"{", 
            RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
      Background->Dynamic[
        Part[Parallel`Concurrency`Private`bgColors, 
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           112, 3^2, Null, Parallel`Concurrency`Private`state$1138]], 
          Parallel`Concurrency`Private`stateTrans]]],
      FrameMargins->5,
      FrameStyle->GrayLevel[0.5],
      RoundingRadius->6,
      StripOnInput->False], ",", 
     FrameBox[
      TemplateBox[{DynamicBox[
         ToBoxes[
          Parallel`Concurrency`Private`evalIcon[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], 
            Parallel`Concurrency`Private`stateTrans]], StandardForm], 
         ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
         StyleBox[
          GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
          CacheGraphics -> False], 
         Spacer[6]],TagBox[
         GridBox[{{
            PaneBox[
             StyleBox[
              TagBox[
               SuperscriptBox["4", "2"], Short[#, 0.6]& ], StripOnInput -> 
              False, FontSize -> Small], ImageSize -> {Full, 18}, 
             ImageSizeAction -> "ResizeToFit"]}, {
            DynamicBox[
             ToBoxes[
              Style[
               ReplaceAll[
                Parallel`Developer`ProcessState[
                 EvaluationObject[
                 113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], {
                Parallel`Developer`created -> "new", 
                 Parallel`Developer`queued -> "ready for processing", 
                 Parallel`Developer`running[
                   Pattern[Parallel`Concurrency`Private`k, 
                    Blank[]]] :> StringForm["running on kernel `1`", 
                   Parallel`Developer`KernelID[
                   Parallel`Concurrency`Private`k]], 
                 Parallel`Developer`finished[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "received", 
                 Parallel`Developer`dequeued[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "finished", 
                 Pattern[Parallel`Concurrency`Private`e, 
                   Blank[]] :> Parallel`Concurrency`Private`e}], "Label", 
               Gray], StandardForm], 
             ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
          GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
         "Column"]},
       "Row",
       DisplayFunction->(
        RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
       InterpretationFunction->(RowBox[{"Row", "[", 
          RowBox[{"{", 
            RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
      Background->Dynamic[
        Part[Parallel`Concurrency`Private`bgColors, 
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           113, 4^2, Null, Parallel`Concurrency`Private`state$1139]], 
          Parallel`Concurrency`Private`stateTrans]]],
      FrameMargins->5,
      FrameStyle->GrayLevel[0.5],
      RoundingRadius->6,
      StripOnInput->False], ",", 
     FrameBox[
      TemplateBox[{DynamicBox[
         ToBoxes[
          Parallel`Concurrency`Private`evalIcon[
           ReplaceAll[
            Parallel`Developer`ProcessState[
             EvaluationObject[
             114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], 
            Parallel`Concurrency`Private`stateTrans]], StandardForm], 
         ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
         StyleBox[
          GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
          CacheGraphics -> False], 
         Spacer[6]],TagBox[
         GridBox[{{
            PaneBox[
             StyleBox[
              TagBox[
               SuperscriptBox["5", "2"], Short[#, 0.6]& ], StripOnInput -> 
              False, FontSize -> Small], ImageSize -> {Full, 18}, 
             ImageSizeAction -> "ResizeToFit"]}, {
            DynamicBox[
             ToBoxes[
              Style[
               ReplaceAll[
                Parallel`Developer`ProcessState[
                 EvaluationObject[
                 114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], {
                Parallel`Developer`created -> "new", 
                 Parallel`Developer`queued -> "ready for processing", 
                 Parallel`Developer`running[
                   Pattern[Parallel`Concurrency`Private`k, 
                    Blank[]]] :> StringForm["running on kernel `1`", 
                   Parallel`Developer`KernelID[
                   Parallel`Concurrency`Private`k]], 
                 Parallel`Developer`finished[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "received", 
                 Parallel`Developer`dequeued[
                   Pattern[Parallel`Concurrency`Private`r, 
                    BlankNullSequence[]]] :> "finished", 
                 Pattern[Parallel`Concurrency`Private`e, 
                   Blank[]] :> Parallel`Concurrency`Private`e}], "Label", 
               Gray], StandardForm], 
             ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
          GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
         "Column"]},
       "Row",
       DisplayFunction->(
        RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
       InterpretationFunction->(RowBox[{"Row", "[", 
          RowBox[{"{", 
            RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
      Background->Dynamic[
        Part[Parallel`Concurrency`Private`bgColors, 
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[
           114, 5^2, Null, Parallel`Concurrency`Private`state$1140]], 
          Parallel`Concurrency`Private`stateTrans]]],
      FrameMargins->5,
      FrameStyle->GrayLevel[0.5],
      RoundingRadius->6,
      StripOnInput->False]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191513458192*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WaitAll", "[", "pids", "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"9", ",", "16", ",", "25"}], "}"}]], "Output",
 CellChangeTimes->{3.472191513540111*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Prom\:011bnn\[EAcute]", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}, {3.471673795756653*^9, 
  3.47167381397614*^9}, {3.471673867117876*^9, 3.471673873173821*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"a", "=", "2"}]], "Input",
 CellChangeTimes->{{3.471674006931448*^9, 3.471674009114274*^9}}],

Cell[BoxData["2"], "Output",
 CellChangeTimes->{3.472191513572459*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Head", "[", "a", "]"}]], "Input",
 CellChangeTimes->{{3.471674011656691*^9, 3.471674012648396*^9}}],

Cell[BoxData["Integer"], "Output",
 CellChangeTimes->{3.472191513605338*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WaitAll", "[", 
  RowBox[{"ParallelSubmit", "[", 
   RowBox[{"Head", "[", "a", "]"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716740151837387`*^9, 3.471674025162909*^9}}],

Cell[BoxData["Symbol"], "Output",
 CellChangeTimes->{3.472191513640194*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"With", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     StyleBox["a",
      FontColor->RGBColor[0, 0, 1]], "=", "a"}], "}"}], ",", 
   RowBox[{"WaitAll", "[", 
    RowBox[{
     StyleBox["ParallelSubmit", "MR"], "[", 
     RowBox[{"Head", "[", 
      StyleBox["a",
       FontColor->RGBColor[0, 0, 1]], "]"}], "]"}], "]"}]}], "]"}]], "Input"],

Cell[BoxData["Integer"], "Output",
 CellChangeTimes->{3.472191513673863*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WaitAll", "[", 
  RowBox[{
   StyleBox["ParallelSubmit", "MR"], "[", 
   RowBox[{
    StyleBox[
     RowBox[{"{", "a", "}"}],
     FontColor->RGBColor[0, 0, 1]], ",", 
    RowBox[{"Head", "[", "a", "]"}]}], "]"}], "]"}]], "Input"],

Cell[BoxData["Integer"], "Output",
 CellChangeTimes->{3.472191513708129*^9}]
}, Open  ]],

Cell["Table[]", "Item",
 CellChangeTimes->{{3.471674112701297*^9, 3.471674117157*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{
   SuperscriptBox["i", "2"], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}]], "Input",
 CellID->241630389],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1", ",", "4", ",", "9", ",", "16", ",", "25", ",", "36", ",", "49", ",", 
   "64", ",", "81", ",", "100"}], "}"}]], "Output",
 CellChangeTimes->{3.472191513738989*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WaitAll", "[", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{
     StyleBox["ParallelSubmit", "MR"], "[", 
     SuperscriptBox["i", "2"], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}], "]"}]], "Input",
 CellID->333153078],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"], ",", 
   SuperscriptBox["i", "2"]}], "}"}]], "Output",
 CellChangeTimes->{3.4721915137754507`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WaitAll", "[", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{
     StyleBox["ParallelSubmit", "MR"], "[", 
     RowBox[{
      StyleBox[
       RowBox[{"{", "i", "}"}],
       FontColor->RGBColor[0, 0, 1]], ",", 
      SuperscriptBox["i", "2"]}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}], "]"}]], "Input",
 CellID->164502341],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1", ",", "4", ",", "9", ",", "16", ",", "25", ",", "36", ",", "49", ",", 
   "64", ",", "81", ",", "100"}], "}"}]], "Output",
 CellChangeTimes->{3.472191513856051*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelTable", "[", 
  RowBox[{
   SuperscriptBox["i", "2"], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}]], "Input",
 CellID->161529420],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1", ",", "4", ",", "9", ",", "16", ",", "25", ",", "36", ",", "49", ",", 
   "64", ",", "81", ",", "100"}], "}"}]], "Output",
 CellChangeTimes->{3.472191513888974*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Fronta \[UAcute]loh", "Subsection",
 CellChangeTimes->{{3.471674188166018*^9, 3.471674192722225*^9}}],

Cell[BoxData[
 RowBox[{"Needs", "[", "\"\<Parallel`Developer`\>\"", "]"}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"jobs", "=", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{"ParallelSubmit", "[", 
     RowBox[{
      RowBox[{"{", "i", "}"}], ",", 
      RowBox[{"PrimeQ", "[", "i", "]"}]}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "9"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.471674226565814*^9, 3.471674227084175*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[142, 
            PrimeQ[1], Null, Parallel`Concurrency`Private`state$1224]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "1", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[142, 
                PrimeQ[1], Null, Parallel`Concurrency`Private`state$1224]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[142, 
          PrimeQ[1], Null, Parallel`Concurrency`Private`state$1224]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[143, 
            PrimeQ[2], Null, Parallel`Concurrency`Private`state$1225]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "2", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[143, 
                PrimeQ[2], Null, Parallel`Concurrency`Private`state$1225]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[143, 
          PrimeQ[2], Null, Parallel`Concurrency`Private`state$1225]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[144, 
            PrimeQ[3], Null, Parallel`Concurrency`Private`state$1226]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "3", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[144, 
                PrimeQ[3], Null, Parallel`Concurrency`Private`state$1226]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[144, 
          PrimeQ[3], Null, Parallel`Concurrency`Private`state$1226]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[145, 
            PrimeQ[4], Null, Parallel`Concurrency`Private`state$1227]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "4", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[145, 
                PrimeQ[4], Null, Parallel`Concurrency`Private`state$1227]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[145, 
          PrimeQ[4], Null, Parallel`Concurrency`Private`state$1227]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[146, 
            PrimeQ[5], Null, Parallel`Concurrency`Private`state$1228]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "5", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[146, 
                PrimeQ[5], Null, Parallel`Concurrency`Private`state$1228]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[146, 
          PrimeQ[5], Null, Parallel`Concurrency`Private`state$1228]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[147, 
            PrimeQ[6], Null, Parallel`Concurrency`Private`state$1229]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "6", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[147, 
                PrimeQ[6], Null, Parallel`Concurrency`Private`state$1229]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[147, 
          PrimeQ[6], Null, Parallel`Concurrency`Private`state$1229]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[148, 
            PrimeQ[7], Null, Parallel`Concurrency`Private`state$1230]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "7", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[148, 
                PrimeQ[7], Null, Parallel`Concurrency`Private`state$1230]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[148, 
          PrimeQ[7], Null, Parallel`Concurrency`Private`state$1230]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[149, 
            PrimeQ[8], Null, Parallel`Concurrency`Private`state$1231]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "8", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[149, 
                PrimeQ[8], Null, Parallel`Concurrency`Private`state$1231]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[149, 
          PrimeQ[8], Null, Parallel`Concurrency`Private`state$1231]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False], ",", 
   FrameBox[
    TemplateBox[{DynamicBox[
       ToBoxes[
        Parallel`Concurrency`Private`evalIcon[
         ReplaceAll[
          Parallel`Developer`ProcessState[
           EvaluationObject[150, 
            PrimeQ[9], Null, Parallel`Concurrency`Private`state$1232]], 
          Parallel`Concurrency`Private`stateTrans]], StandardForm], 
       ImageSizeCache -> {25., {10., 14.96}}],InterpretationBox[
       StyleBox[
        GraphicsBox[{}, BaselinePosition -> Baseline, ImageSize -> {6, 0}], 
        CacheGraphics -> False], 
       Spacer[6]],TagBox[
       GridBox[{{
          PaneBox[
           StyleBox[
            TagBox[
             RowBox[{"PrimeQ", "[", "9", "]"}], Short[#, 0.6]& ], 
            StripOnInput -> False, FontSize -> Small], 
           ImageSize -> {Full, 18}, ImageSizeAction -> "ResizeToFit"]}, {
          DynamicBox[
           ToBoxes[
            Style[
             ReplaceAll[
              Parallel`Developer`ProcessState[
               EvaluationObject[150, 
                PrimeQ[9], Null, Parallel`Concurrency`Private`state$1232]], {
              Parallel`Developer`created -> "new", Parallel`Developer`queued -> 
               "ready for processing", Parallel`Developer`running[
                 Pattern[Parallel`Concurrency`Private`k, 
                  Blank[]]] :> StringForm["running on kernel `1`", 
                 Parallel`Developer`KernelID[Parallel`Concurrency`Private`k]],
                Parallel`Developer`finished[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "received", 
               Parallel`Developer`dequeued[
                 Pattern[Parallel`Concurrency`Private`r, 
                  BlankNullSequence[]]] :> "finished", 
               Pattern[Parallel`Concurrency`Private`e, 
                 Blank[]] :> Parallel`Concurrency`Private`e}], "Label", Gray],
             StandardForm], ImageSizeCache -> {35.15185546875, {1., 7.}}]}}, 
        GridBoxAlignment -> {"Columns" -> {{Left}}}, 
        GridBoxItemSize -> {"Columns" -> {{10}}, "Rows" -> {{Automatic}}}], 
       "Column"]},
     "Row",
     DisplayFunction->(
      RowBox[{#, "\[InvisibleSpace]", #2, "\[InvisibleSpace]", #3}]& ),
     InterpretationFunction->(RowBox[{"Row", "[", 
        RowBox[{"{", 
          RowBox[{#, ",", #2, ",", #3}], "}"}], "]"}]& )],
    Background->Dynamic[
      Part[Parallel`Concurrency`Private`bgColors, 
       ReplaceAll[
        Parallel`Developer`ProcessState[
         EvaluationObject[150, 
          PrimeQ[9], Null, Parallel`Concurrency`Private`state$1232]], 
        Parallel`Concurrency`Private`stateTrans]]],
    FrameMargins->5,
    FrameStyle->GrayLevel[0.5],
    RoundingRadius->6,
    StripOnInput->False]}], "}"}]], "Output",
 CellChangeTimes->{3.472191513957255*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"QueueRun", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471674232482235*^9, 3.471674236644223*^9}}],

Cell[BoxData["True"], "Output",
 CellChangeTimes->{3.472191514423381*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"QueueRun", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471674232482235*^9, 3.4716742395861883`*^9}}],

Cell[BoxData["True"], "Output",
 CellChangeTimes->{3.472191514489352*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["$QueueLength"], "Input",
 CellID->164339061],

Cell[BoxData["5"], "Output",
 CellChangeTimes->{3.472191514555134*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"WaitAll", "[", "jobs", "]"}]], "Input",
 CellChangeTimes->{{3.471674255254148*^9, 3.471674259584985*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "False", ",", "True", ",", "True", ",", "False", ",", "True", ",", "False", 
   ",", "True", ",", "False", ",", "False"}], "}"}]], "Output",
 CellChangeTimes->{3.472191514622121*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CloseKernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471672155375856*^9, 3.471672159525795*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"11", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], 
   ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"12", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.4721915146607122`*^9}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  Distribuovan\[EAcute] definice  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  DistributeDefinitions[] ..."
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, {3.4716181069948387`*^9, 3.4716181100368223`*^9}, {
   3.471618246933572*^9, 3.471618298118132*^9}, 3.471618762304798*^9, {
   3.471618908860133*^9, 3.471618928159153*^9}, {3.471618970956963*^9, 
   3.471618986005343*^9}, {3.47161928229207*^9, 3.471619287018958*^9}, {
   3.471670300896264*^9, 3.471670301957354*^9}, {3.471674817126073*^9, 
   3.4716748509789257`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"{", 
   RowBox[{"\"\<localhost\>\"", ",", "\"\<localhost\>\""}], "}"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.471674874316943*^9, 3.471674875492388*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"13", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"14", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.47219151693976*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Pou\:017eit\[IAcute] prom\:011bnn\[YAcute]ch a funkc\[IAcute] v paraleln\
\[IAcute]m prost\:0159ed\[IAcute]\
\>", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}, {3.4716750541074667`*^9, 
  3.47167506791541*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"x", "=", "10"}]], "Input",
 CellChangeTimes->{{3.471675075743679*^9, 3.47167508054744*^9}}],

Cell[BoxData["10"], "Output",
 CellChangeTimes->{3.472191517033643*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"f", "[", "x_", "]"}], ":=", 
  RowBox[{"x", "^", "2"}]}]], "Input",
 CellChangeTimes->{{3.471675086340765*^9, 3.47167509382765*^9}}],

Cell[TextData[{
 "Pozor, a\[CHacek]koliv n\[AAcute]sleduj\[IAcute]c\[IAcute] \
p\:0159\[IAcute]klad funguje, ve skute\[CHacek]nosti nejde o \
paraleln\[IAcute] vyhodnocen\[IAcute]... ",
 StyleBox["(prom\:011bnn\[AAcute] ani funkce nen\[IAcute] definov\[AAcute]na \
na v\[YAcute]po\[CHacek]etn\[IAcute]ch j\[AAcute]drech, \
v\[YAcute]po\[CHacek]et tak prob\[IAcute]h\[AAcute] a\:017e na \
\:0159\[IAcute]dic\[IAcute]m j\[AAcute]d\:0159e)",
  FontSlant->"Italic"]
}], "Item",
 CellChangeTimes->{{3.47167617293372*^9, 3.471676269552346*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"f", "[", "x", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.471676159558844*^9, 3.471676170013021*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"100", ",", "100"}], "}"}]], "Output",
 CellChangeTimes->{3.472191517099844*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Head", "[", "x", "]"}]], "Input",
 CellChangeTimes->{{3.4716762772840014`*^9, 3.471676281240149*^9}, {
  3.471676321592614*^9, 3.471676322391651*^9}}],

Cell[BoxData["Integer"], "Output",
 CellChangeTimes->{3.4721915171374607`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"Head", "[", "x", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716762829223967`*^9, 3.47167629213741*^9}, 
   3.471676325826702*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"Symbol", ",", "Symbol"}], "}"}]], "Output",
 CellChangeTimes->{3.472191517167045*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"DistributeDefinitions", "[", "x", "]"}]], "Input",
 CellChangeTimes->{{3.471676304198011*^9, 3.471676328384797*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"Head", "[", "x", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716762829223967`*^9, 3.471676294288897*^9}, 
   3.471676330786215*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"Integer", ",", "Integer"}], "}"}]], "Output",
 CellChangeTimes->{3.4721915172213593`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"Clear", "[", "x", "]"}]], "Input",
 CellChangeTimes->{{3.4716763505439663`*^9, 3.471676354103489*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Head", "[", "x", "]"}]], "Input",
 CellChangeTimes->{{3.471676355581745*^9, 3.471676356669692*^9}}],

Cell[BoxData["Symbol"], "Output",
 CellChangeTimes->{3.4721915172986097`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"Head", "[", "x", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716762829223967`*^9, 3.471676294288897*^9}, 
   3.471676330786215*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"Integer", ",", "Integer"}], "}"}]], "Output",
 CellChangeTimes->{3.472191517335669*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"DistributeDefinitions", "[", "x", "]"}]], "Input",
 CellChangeTimes->{{3.4716763739808493`*^9, 3.471676406182827*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"Head", "[", "x", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.4716762829223967`*^9, 3.471676294288897*^9}, 
   3.471676330786215*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"Symbol", ",", "Symbol"}], "}"}]], "Output",
 CellChangeTimes->{3.472191517405995*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Sd\[IAcute]len\[EAcute] prom\:011bnn\[EAcute]", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}, {3.4716750541074667`*^9, 
  3.47167506791541*^9}, {3.4716764902489433`*^9, 3.471676507231595*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"x", "=", "10"}], ";"}], "\n", 
 RowBox[{"SetSharedVariable", "[", "x", "]"}]}], "Input",
 CellChangeTimes->{{3.471676612181939*^9, 3.471676612508956*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"{", 
   RowBox[{"k1", ",", "k2"}], "}"}], "=", 
  RowBox[{"Kernels", "[", "]"}]}]], "Input",
 CellChangeTimes->{{3.471676574877692*^9, 3.471676584158677*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"13", ",", "\<\"local\"\>"}], "]"}], ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"14", ",", "\<\"local\"\>"}], "]"}]}], "}"}]], "Output",
 CellChangeTimes->{3.472191517466146*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"x", ",", "k1"}], "]"}]], "Input",
 CellChangeTimes->{{3.471676588368101*^9, 3.4716765952616453`*^9}}],

Cell[BoxData["10"], "Output",
 CellChangeTimes->{3.472191517501507*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"x", ",", "k2"}], "]"}]], "Input",
 CellChangeTimes->{{3.471676588368101*^9, 3.471676598757401*^9}}],

Cell[BoxData["10"], "Output",
 CellChangeTimes->{3.47219151753896*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{
   RowBox[{"x", "=", "42"}], ",", "k2"}], "]"}]], "Input",
 CellChangeTimes->{{3.471676588368101*^9, 3.471676619045802*^9}}],

Cell[BoxData["42"], "Output",
 CellChangeTimes->{3.4721915175683193`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["x"], "Input",
 CellChangeTimes->{3.4716766215213327`*^9}],

Cell[BoxData["42"], "Output",
 CellChangeTimes->{3.472191517605397*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ParallelEvaluate", "[", 
  RowBox[{"x", ",", "k1"}], "]"}]], "Input",
 CellChangeTimes->{{3.471676588368101*^9, 3.4716765952616453`*^9}}],

Cell[BoxData["42"], "Output",
 CellChangeTimes->{3.472191517634892*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Synchronizace - kritick\[EAcute] sekce", "Subsection",
 CellChangeTimes->{{3.47167672414511*^9, 3.471676738119317*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"SetSharedVariable", "[", "y", "]"}], ";"}]], "Input",
 CellID->26923105],

Cell["Sekven\[CHacek]n\[IAcute] verze", "Item",
 CellChangeTimes->{{3.47167678131824*^9, 3.471676784365671*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"y", "=", "0"}], ";"}], "\n", 
 RowBox[{"Map", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"(", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"Pause", "[", 
       RowBox[{"0.3", 
        RowBox[{"Random", "[", "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"(*", " ", 
       RowBox[{"begin", " ", "critical", " ", "section"}], " ", "*)"}], 
      "\[IndentingNewLine]", " ", 
      RowBox[{"a", "=", "y"}], ";", "\[IndentingNewLine]", 
      RowBox[{"Pause", "[", 
       RowBox[{"Random", "[", "]"}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"y", "=", 
       RowBox[{"a", "+", "1"}]}]}], "\[IndentingNewLine]", 
     RowBox[{"(*", " ", 
      RowBox[{"end", " ", "critical", " ", "section"}], " ", "*)"}], 
     "\[IndentingNewLine]", ")"}], "&"}], ",", "\[IndentingNewLine]", 
   RowBox[{"Range", "[", "10", "]"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.471676788657661*^9, 3.471676789903981*^9}, {
  3.4716770805042143`*^9, 3.4716770812662477`*^9}},
 CellID->418613926],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 
   ",", "9", ",", "10"}], "}"}]], "Output",
 CellChangeTimes->{3.472191524764166*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["y"], "Input",
 CellChangeTimes->{3.4716770339943933`*^9}],

Cell[BoxData["10"], "Output",
 CellChangeTimes->{3.472191524855362*^9}]
}, Open  ]],

Cell["Paraleln\[IAcute] verze", "Item",
 CellChangeTimes->{{3.47167678131824*^9, 3.471676808628592*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"y", "=", "0"}], ";"}], "\n", 
 RowBox[{"ParallelMap", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"(", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"Pause", "[", 
       RowBox[{"0.3", 
        RowBox[{"Random", "[", "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"(*", " ", 
       RowBox[{"begin", " ", "critical", " ", "section"}], " ", "*)"}], 
      "\[IndentingNewLine]", " ", 
      RowBox[{"a", "=", "y"}], ";", "\[IndentingNewLine]", 
      RowBox[{"Pause", "[", 
       RowBox[{"Random", "[", "]"}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"y", "=", 
       RowBox[{"a", "+", "1"}]}]}], "\[IndentingNewLine]", 
     RowBox[{"(*", " ", 
      RowBox[{"end", " ", "critical", " ", "section"}], " ", "*)"}], 
     "\[IndentingNewLine]", ")"}], "&"}], ",", "\[IndentingNewLine]", 
   RowBox[{"Range", "[", "10", "]"}]}], "]"}]}], "Input",
 CellChangeTimes->{
  3.471676774038055*^9, {3.4716770646748123`*^9, 3.471677064897008*^9}},
 CellID->1833563219],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1", ",", "2", ",", "3", ",", "1", ",", "2", ",", "3", ",", "4", ",", "5", 
   ",", "6", ",", "7"}], "}"}]], "Output",
 CellChangeTimes->{3.472191529010528*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["y"], "Input",
 CellChangeTimes->{3.471677030368277*^9}],

Cell[BoxData["7"], "Output",
 CellChangeTimes->{3.472191529188405*^9}]
}, Open  ]],

Cell["\<\
Paraleln\[IAcute] verze - o\[SHacek]et\:0159en\[IAcute] kritick\[EAcute] \
sekce - CriticalSection[...]\
\>", "Item",
 CellChangeTimes->{{3.47167678131824*^9, 3.471676808628592*^9}, {
  3.471676840731904*^9, 3.47167685855018*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"y", "=", "0"}], ";"}], "\n", 
 RowBox[{"ParallelMap", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"(", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"Pause", "[", 
       RowBox[{"0.3", 
        RowBox[{"Random", "[", "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"CriticalSection", "[", 
       RowBox[{
        RowBox[{"{", "lck", "}"}], ",", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"a", "=", "y"}], ";", "\[IndentingNewLine]", 
         RowBox[{"Pause", "[", 
          RowBox[{"Random", "[", "]"}], "]"}], ";", "\[IndentingNewLine]", 
         RowBox[{"y", "=", 
          RowBox[{"a", "+", "1"}]}], ";", "\[IndentingNewLine]", 
         RowBox[{"a", "+", "1"}]}]}], "]"}]}], ")"}], "&"}], ",", 
   "\[IndentingNewLine]", 
   RowBox[{"Range", "[", "10", "]"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.471677057120879*^9, 3.471677057623131*^9}},
 CellID->193821835],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "2", ",", "4", ",", "6", ",", "1", ",", "3", ",", "5", ",", "7", ",", "9", 
   ",", "8", ",", "10"}], "}"}]], "Output",
 CellChangeTimes->{3.472191533866838*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["y"], "Input",
 CellChangeTimes->{3.471676867830545*^9}],

Cell[BoxData["10"], "Output",
 CellChangeTimes->{3.47219153399543*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CloseKernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471672155375856*^9, 3.471672159525795*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"KernelObject", "[", 
    RowBox[{"13", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], 
   ",", 
   RowBox[{"KernelObject", "[", 
    RowBox[{"14", ",", "\<\"local\"\>", ",", "\<\"<defunct>\"\>"}], "]"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.472191534034902*^9}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],

Cell[CellGroupData[{

Cell[TextData[{
 StyleBox["  Lightweight  ",
  FontColor->GrayLevel[1],
  Background->RGBColor[0., 0., 0.5019607843137255]],
 "  Grid"
}], "Section",
 CellChangeTimes->{{3.469726862150421*^9, 3.469726864396236*^9}, {
   3.469886453532921*^9, 3.469886456610156*^9}, {3.469886861057613*^9, 
   3.469886884941725*^9}, {3.4716181069948387`*^9, 3.4716181100368223`*^9}, {
   3.471618246933572*^9, 3.471618298118132*^9}, 3.471618762304798*^9, {
   3.471618908860133*^9, 3.471618928159153*^9}, {3.471618970956963*^9, 
   3.471618986005343*^9}, {3.47161928229207*^9, 3.471619287018958*^9}, {
   3.4716703085409813`*^9, 3.4716703283959713`*^9}}],

Cell[CellGroupData[{

Cell["\<\
Konfigurace a spu\[SHacek]t\:011bn\[IAcute] \
v\[YAcute]po\[CHacek]etn\[IAcute]ch jader\
\>", "Subsection",
 CellChangeTimes->{{3.411930163229798*^9, 3.411930211282498*^9}, {
  3.429949469624359*^9, 3.429949469634092*^9}, {3.437154048215818*^9, 
  3.437154073092597*^9}, {3.437154225814616*^9, 3.43715424055202*^9}, {
  3.437154294605096*^9, 3.4371543001339*^9}, {3.43715452488828*^9, 
  3.437154528860234*^9}, {3.437154649112441*^9, 3.437154675575768*^9}, {
  3.4716203134686747`*^9, 3.4716203388374968`*^9}}],

Cell["\<\
Menu \[RightPointer] Evaluation \[RightPointer] Parallel Kernel \
Configuration...\
\>", "Text",
 CellChangeTimes->{{3.4716776452594643`*^9, 3.471677664125567*^9}}],

Cell[CellGroupData[{

Cell[BoxData["$ConfiguredKernels"], "Input",
 CellChangeTimes->{{3.471677579697309*^9, 3.47167758254351*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"LightweightGridClient`LightweightGrid", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"\<\"Agent\"\>", 
       "\[Rule]", \
"\<\"http://stroj1.domena:3737/WolframLightweightGrid/Manager\"\>"}], ",", 
      RowBox[{"\<\"KernelCount\"\>", "\[Rule]", "4"}], ",", 
      RowBox[{"\<\"LocalLinkMode\"\>", "\[Rule]", "\<\"Connect\"\>"}], ",", 
      RowBox[{"\<\"Service\"\>", "\[Rule]", "\<\"\"\>"}], ",", 
      RowBox[{"\<\"Timeout\"\>", "\[Rule]", "5"}]}], "}"}], "]"}], ",", 
   RowBox[{"LightweightGridClient`LightweightGrid", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"\<\"Agent\"\>", 
       "\[Rule]", \
"\<\"http://stroj2.domena:3737/WolframLightweightGrid/Manager\"\>"}], ",", 
      RowBox[{"\<\"KernelCount\"\>", "\[Rule]", "8"}], ",", 
      RowBox[{"\<\"LocalLinkMode\"\>", "\[Rule]", "\<\"Connect\"\>"}], ",", 
      RowBox[{"\<\"Service\"\>", "\[Rule]", "\<\"\"\>"}], ",", 
      RowBox[{"\<\"Timeout\"\>", "\[Rule]", "5"}]}], "}"}], "]"}], ",", 
   InterpretationBox["\<\"\[LeftSkeleton]\\!\\(2\\) local kernels\
\[RightSkeleton]\"\>",
    StringForm["\[LeftSkeleton]`1` local kernels\[RightSkeleton]", 2],
    Editable->False]}], "}"}]], "Output",
 CellChangeTimes->{3.472191534061167*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"Needs", "[", "\"\<LightweightGridClient`\>\"", "]"}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Kernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.4716701277743*^9, 3.471670129067954*^9}}],

Cell[BoxData[
 RowBox[{"{", "}"}]], "Output",
 CellChangeTimes->{3.472191534108797*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LaunchKernels", "[", 
  RowBox[{"LightweightGrid", "[", "\"\<192.168.1.42\>\"", "]"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.471670003398985*^9, 3.471670009136798*^9}, {
  3.471681346295458*^9, 3.4716813600863523`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"KernelObject", "[", 
   RowBox[{"15", ",", "\<\"brian\"\>"}], "]"}], "}"}]], "Output",
 CellChangeTimes->{3.4721915380837517`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CloseKernels", "[", "]"}]], "Input",
 CellChangeTimes->{{3.471672155375856*^9, 3.471672159525795*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"KernelObject", "[", 
   RowBox[{"15", ",", "\<\"brian\"\>", ",", "\<\"<defunct>\"\>"}], "]"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.472191538204262*^9}]
}, Open  ]],

Cell[TextData[{
 ButtonBox["\[FilledLeftTriangle]\[ThickSpace]\[ThickSpace]\[ThickSpace]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPagePrevious"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowPrevSlideText"]],
 "\[ThickSpace]\[ThickSpace]|\[ThickSpace]\[ThickSpace]",
 ButtonBox["\[ThickSpace]\[ThickSpace]\[ThickSpace]\[FilledRightTriangle]",
  BaseStyle->"SlidePreviousNextLink",
  Appearance->{Automatic, None},
  ButtonFunction:>FrontEndExecute[{
     FrontEndToken[
      FrontEnd`ButtonNotebook[], "ScrollPageNext"]}],
  ButtonNote->FEPrivate`FrontEndResource[
   "FEStrings", "SlideshowNextSlideText"]]
}], "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
ScreenStyleEnvironment->"SlideShow",
PrintingStyleEnvironment->"SlideShow",
WindowSize->{963, 668},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
PrintingCopies->1,
PrintingPageRange->{1, Automatic},
PrintingOptions->{"PaperOrientation"->"Landscape"},
ShowSelection->True,
Magnification:>FEPrivate`If[
  FEPrivate`Equal[FEPrivate`$VersionNumber, 6.], 0.75, 0.75 Inherited],
FrontEndVersion->"7.0 for Mac OS X x86 (32-bit) (February 18, 2009)",
StyleDefinitions->Notebook[{
   Cell[
    StyleData[StyleDefinitions -> "Default.nb"]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Title"], CellFrame -> {{0, 0}, {8, 8}}, 
       CellMargins -> {{27, Inherited}, {32, 8}}, 
       CellFrameMargins -> {{8, 8}, {26, 32}}, CellFrameColor -> 
       GrayLevel[0.0980392], TextAlignment -> Center, FontFamily -> 
       "Palatino", FontSize -> 64, FontWeight -> "Plain", FontSlant -> 
       "Plain", FontColor -> GrayLevel[1], Background -> 
       RGBColor[0, 0, 0.501961]], 
      Cell[
       StyleData["Title", "Presentation"], CellFrame -> {{0, 0}, {8, 8}}, 
       ShowGroupOpener -> False, CellMargins -> {{27, Inherited}, {32, 8}}, 
       CellFrameMargins -> {{8, 8}, {26, 32}}, CellFrameColor -> 
       GrayLevel[0.0980392], TextAlignment -> Center, FontFamily -> 
       "Palatino", FontSize -> 64, FontWeight -> "Plain", FontSlant -> 
       "Plain", FontColor -> GrayLevel[1], Background -> 
       RGBColor[0, 0, 0.501961]]}, Open]], 
   Cell[
    StyleData["Author"], CellFrame -> {{0, 0}, {3, 0}}, 
    CellMargins -> {{64, 64}, {20, 30}}, CellFrameMargins -> 8, 
    CellFrameColor -> RGBColor[1, 0.624094, 0], MenuPosition -> 10000, 
    FontFamily -> "Palatino", FontSize -> 36, FontWeight -> "Plain", 
    FontSlant -> "Plain"], 
   Cell[
    StyleData["Address"], 
    CellMargins -> {{64, Inherited}, {Inherited, Inherited}}, MenuPosition -> 
    10000, FontFamily -> "Palatino", FontSize -> 24, FontWeight -> "Plain", 
    FontSlant -> "Plain", FontColor -> GrayLevel[0.4]], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Section"], CellFrame -> {{0, 0}, {0, 3}}, 
       CellMargins -> {{27, Inherited}, {8, 34}}, CellFrameMargins -> 0, 
       CellFrameColor -> RGBColor[0, 0, 0.501961], FontFamily -> "Palatino", 
       FontSize -> 36, FontWeight -> "Bold", FontSlant -> "Plain", FontColor -> 
       RGBColor[0, 0, 0.501961]], 
      Cell[
       StyleData["Section", "Presentation"], CellFrame -> {{0, 0}, {0, 3}}, 
       ShowGroupOpener -> False, CellMargins -> {{27, Inherited}, {8, 34}}, 
       CellFrameMargins -> 0., CellFrameColor -> RGBColor[0, 0, 0.501961], 
       FontFamily -> "Palatino", FontSize -> 36, FontWeight -> "Bold", 
       FontSlant -> "Plain", FontColor -> RGBColor[0, 0, 0.501961]], 
      Cell[
       StyleData["Section", "SlideShow"], CellFrame -> {{0, 0}, {0, 3}}, 
       ShowGroupOpener -> False, CellMargins -> {{27, Inherited}, {8, 34}}, 
       CellFrameMargins -> 0., CellFrameColor -> RGBColor[0, 0, 0.501961], 
       FontFamily -> "Palatino", FontSize -> 36, FontWeight -> "Bold", 
       FontSlant -> "Plain", FontColor -> RGBColor[0, 0, 0.501961]]}, Open]], 
   
   Cell[
    StyleData["Subsection"], CellFrame -> {{8, 0}, {0, 1}}, CellDingbat -> 
    None, ShowGroupOpener -> True, WholeCellGroupOpener -> False, 
    GroupOpenerInsideFrame -> False, 
    CellMargins -> {{60, Inherited}, {12, 20}}, CellFrameColor -> 
    RGBColor[1, 0.624094, 0], FontFamily -> "Palatino", FontSize -> 24, 
    FontWeight -> "Bold", FontSlant -> "Plain"], 
   Cell[
    CellGroupData[{
      Cell[
       StyleData["Item"], CellMargins -> {{75, 10}, {6, 6}}, FontFamily -> 
       "Palatino", FontSize -> 24, FontWeight -> "Plain", FontSlant -> 
       "Plain"], 
      Cell[
       StyleData["Item", "SlideShow"], ShowGroupOpener -> False, FontFamily -> 
       "Palatino", FontSize -> 24, FontWeight -> "Plain", FontSlant -> 
       "Plain"]}, Open]], 
   Cell[
    StyleData["Text"], CellMargins -> {{60, 10}, {7, 7}}, FontFamily -> 
    "Palatino", FontSize -> 24, FontWeight -> "Plain", FontSlant -> "Plain"], 
   
   Cell[
    StyleData["Subsubsection"], CellDingbat -> None, ShowGroupOpener -> True, 
    GroupOpenerInsideFrame -> False, CellMargins -> {{75, 10}, {4, 4}}, 
    GroupOpenerColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 
    24, FontWeight -> "Plain", FontSlant -> "Plain"], 
   Cell[
    StyleData["Date"], CellMargins -> {{64, Inherited}, {20, 20}}, 
    MenuPosition -> 10000, FontFamily -> "Palatino", FontSize -> 24, 
    FontWeight -> "Plain", FontSlant -> "Plain", FontColor -> GrayLevel[0.4]], 
   Cell[
    StyleData["CodeBox"], CellFrame -> {{3, 3}, {3, 3}}, 
    CellMargins -> {{80, 20}, {7, 7}}, CellFrameMargins -> 12, CellFrameColor -> 
    RGBColor[1, 0.624094, 0], FontFamily -> "Courier", FontSize -> 18, 
    FontWeight -> "Plain", FontSlant -> "Plain", 
    FontVariations -> {"Shadow" -> False}, Background -> 
    RGBColor[0.982742, 0.909026, 0.730846]], 
   Cell[
    StyleData["Input"], CellFrame -> {{1, 1}, {0, 1}}, 
    CellMargins -> {{66, 10}, {0, 14}}, CellFrameColor -> 
    RGBColor[0, 0, 0.501961], FontFamily -> "Times", FontSize -> 18, 
    FontWeight -> "Bold", FontSlant -> "Plain", Background -> 
    RGBColor[0.825849, 0.904875, 1]], 
   Cell[
    StyleData["Output"], CellFrame -> {{1, 1}, {1, 0}}, 
    CellMargins -> {{66, 10}, {4, 0}}, 
    CellBracketOptions -> {"Margins" -> {0, 2}}, CellFrameColor -> 
    RGBColor[0, 0, 0.501961], FontFamily -> "Times", FontSize -> 18, 
    FontWeight -> "Plain", FontSlant -> "Plain", Background -> 
    RGBColor[0.825849, 0.904875, 1]]}, Visible -> False, FrontEndVersion -> 
  "7.0 for Mac OS X x86 (32-bit) (February 18, 2009)", StyleDefinitions -> 
  "PrivateStylesheetFormatting.nb"]
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "SlideShowHeader"->{
  Cell[2583, 77, 81, 2, 10, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[5316, 170, 81, 2, 10, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[9975, 315, 81, 2, 10, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[14424, 459, 81, 2, 10, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[19023, 597, 81, 2, 10, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[34962, 1102, 81, 2, 19, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[51429, 1654, 81, 2, 19, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[129838, 3587, 81, 2, 19, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"],
  Cell[144395, 4066, 81, 2, 10, "SlideShowNavigationBar",
   CellOpen->True,
   CellTags->"SlideShowHeader"]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"SlideShowHeader", 155168, 4329}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[567, 22, 284, 7, 232, "Title"],
Cell[854, 31, 148, 2, 74, "Author"],
Cell[1005, 35, 203, 3, 26, "Address"],
Cell[1211, 40, 413, 8, 69, "Address"],
Cell[1627, 50, 135, 2, 50, "Date"],
Cell[1765, 54, 781, 18, 30, "PreviousNext"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2583, 77, 81, 2, 10, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[2689, 83, 333, 8, 65, "Section"],
Cell[3025, 93, 202, 6, 52, "Subsection"],
Cell[CellGroupData[{
Cell[3252, 103, 106, 1, 42, "Subsection"],
Cell[CellGroupData[{
Cell[3383, 108, 146, 2, 30, "Item"],
Cell[3532, 112, 124, 1, 30, "Item"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[3705, 119, 211, 6, 52, "Subsection"],
Cell[3919, 127, 108, 1, 30, "Item"]
}, Open  ]],
Cell[CellGroupData[{
Cell[4064, 133, 195, 2, 52, "Subsection"],
Cell[4262, 137, 209, 6, 30, "Item"],
Cell[4474, 145, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[5316, 170, 81, 2, 10, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[5422, 176, 443, 12, 65, "Section"],
Cell[CellGroupData[{
Cell[5890, 192, 241, 6, 52, "Subsection"],
Cell[CellGroupData[{
Cell[6156, 202, 282, 6, 30, "Item"],
Cell[6441, 210, 202, 4, 30, "Item"],
Cell[6646, 216, 164, 2, 30, "Item"]
}, Open  ]],
Cell[6825, 221, 175, 8, 101, "CodeBox"]
}, Open  ]],
Cell[CellGroupData[{
Cell[7037, 234, 245, 3, 52, "Subsection"],
Cell[7285, 239, 478, 8, 30, "Item"],
Cell[7766, 249, 269, 6, 60, "CodeBox"]
}, Open  ]],
Cell[CellGroupData[{
Cell[8072, 260, 238, 3, 52, "Subsection"],
Cell[CellGroupData[{
Cell[8335, 267, 455, 10, 30, "Item"],
Cell[8793, 279, 325, 8, 51, "Item"]
}, Open  ]],
Cell[9133, 290, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[9975, 315, 81, 2, 10, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[10081, 321, 708, 18, 62, "Section"],
Cell[CellGroupData[{
Cell[10814, 343, 357, 8, 52, "Subsection"],
Cell[CellGroupData[{
Cell[11196, 355, 140, 2, 30, "Item"],
Cell[11339, 359, 88, 1, 30, "Item"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[11476, 366, 201, 6, 52, "Subsection"],
Cell[CellGroupData[{
Cell[11702, 376, 140, 2, 30, "Item"],
Cell[11845, 380, 96, 1, 30, "Item"],
Cell[11944, 383, 280, 7, 30, "Item"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[12273, 396, 201, 3, 52, "Subsection"],
Cell[CellGroupData[{
Cell[12499, 403, 383, 8, 30, "Item"],
Cell[12885, 413, 146, 3, 30, "Item"],
Cell[13034, 418, 374, 8, 30, "Item"],
Cell[13411, 428, 156, 3, 30, "Item"]
}, Open  ]],
Cell[13582, 434, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[14424, 459, 81, 2, 10, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[14530, 465, 788, 18, 62, "Section"],
Cell[15321, 485, 389, 8, 30, "Item"],
Cell[CellGroupData[{
Cell[15735, 497, 459, 9, 52, "Subsection"],
Cell[CellGroupData[{
Cell[16219, 510, 270, 8, 30, "Item"],
Cell[16492, 520, 208, 4, 30, "Item"],
Cell[16703, 526, 165, 3, 30, "Item"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[16917, 535, 502, 10, 52, "Subsection"],
Cell[CellGroupData[{
Cell[17444, 549, 294, 8, 30, "Item"],
Cell[17741, 559, 257, 5, 30, "Item"],
Cell[18001, 566, 165, 3, 30, "Item"]
}, Open  ]],
Cell[18181, 572, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[19023, 597, 81, 2, 10, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[19129, 603, 826, 18, 62, "Section"],
Cell[CellGroupData[{
Cell[19980, 625, 520, 9, 52, "Subsection"],
Cell[CellGroupData[{
Cell[20525, 638, 158, 3, 30, "Item"],
Cell[20686, 643, 155, 3, 30, "Item"]
}, Open  ]],
Cell[CellGroupData[{
Cell[20878, 651, 163, 2, 48, "Input"],
Cell[21044, 655, 1270, 27, 187, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[22351, 687, 112, 1, 48, "Input"],
Cell[22466, 690, 70, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[22573, 696, 115, 1, 48, "Input"],
Cell[22691, 699, 73, 1, 48, "Output"]
}, Open  ]],
Cell[22779, 703, 298, 6, 30, "Item"],
Cell[CellGroupData[{
Cell[23102, 713, 214, 5, 48, "Input"],
Cell[23319, 720, 271, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[23627, 732, 123, 2, 48, "Input"],
Cell[23753, 736, 271, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[24061, 748, 130, 2, 48, "Input"],
Cell[24194, 752, 324, 8, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[24567, 766, 576, 10, 52, "Subsection"],
Cell[CellGroupData[{
Cell[25168, 780, 265, 6, 48, "Input"],
Cell[25436, 788, 271, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[25744, 800, 121, 2, 48, "Input"],
Cell[25868, 804, 269, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[26174, 816, 288, 6, 48, "Input"],
Cell[26465, 824, 269, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[26771, 836, 123, 2, 48, "Input"],
Cell[26897, 840, 445, 11, 72, "Output"]
}, Open  ]],
Cell[27357, 854, 339, 7, 30, "Item"],
Cell[CellGroupData[{
Cell[27721, 865, 143, 2, 48, "Input"],
Cell[27867, 869, 135, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[28039, 877, 265, 6, 48, "Input"],
Cell[28307, 885, 331, 11, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[28675, 901, 319, 8, 48, "Input"],
Cell[28997, 911, 343, 11, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[29377, 927, 322, 7, 72, "Input"],
Cell[29702, 936, 839, 23, 118, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[30578, 964, 130, 2, 48, "Input"],
Cell[30711, 968, 550, 12, 72, "Output"]
}, Open  ]],
Cell[31276, 983, 162, 2, 30, "Item"],
Cell[CellGroupData[{
Cell[31463, 989, 148, 4, 48, "Input"],
Cell[31614, 995, 269, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[31920, 1007, 404, 11, 48, "Input"],
Cell[32327, 1020, 396, 9, 72, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[32760, 1034, 449, 12, 48, "Input"],
Cell[33212, 1048, 397, 9, 72, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[33646, 1062, 130, 2, 48, "Input"],
Cell[33779, 1066, 326, 8, 48, "Output"]
}, Open  ]],
Cell[34120, 1077, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[34962, 1102, 81, 2, 19, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[35068, 1108, 772, 13, 63, "Section"],
Cell[CellGroupData[{
Cell[35865, 1125, 148, 4, 48, "Input"],
Cell[36016, 1131, 270, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[36323, 1143, 516, 7, 52, "Subsection"],
Cell[CellGroupData[{
Cell[36864, 1154, 198, 3, 48, "Input"],
Cell[37065, 1159, 116, 3, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[37230, 1168, 547, 7, 52, "Subsection"],
Cell[37780, 1177, 135, 3, 48, "Input"],
Cell[CellGroupData[{
Cell[37940, 1184, 160, 3, 48, "Input"],
Cell[38103, 1189, 123, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[38263, 1197, 208, 4, 48, "Input"],
Cell[38474, 1203, 123, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[38634, 1211, 291, 8, 48, "Input",
 CellID->211325402],
Cell[38928, 1221, 121, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[39086, 1229, 177, 4, 48, "Input"],
Cell[39266, 1235, 143, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[39446, 1243, 339, 9, 48, "Input",
 CellID->6163691],
Cell[39788, 1254, 247, 6, 72, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[40072, 1265, 458, 14, 72, "Input",
 CellID->353434615],
Cell[40533, 1281, 232, 5, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[40814, 1292, 103, 1, 52, "Subsection"],
Cell[40920, 1295, 541, 17, 48, "CodeBox"],
Cell[CellGroupData[{
Cell[41486, 1316, 126, 2, 48, "Input"],
Cell[41615, 1320, 72, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[41724, 1326, 183, 4, 48, "Input"],
Cell[41910, 1332, 125, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[42072, 1340, 253, 6, 48, "Input"],
Cell[42328, 1348, 160, 4, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[42525, 1357, 263, 6, 48, "Input"],
Cell[42791, 1365, 413, 13, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[43241, 1383, 267, 6, 48, "Input"],
Cell[43511, 1391, 431, 13, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[43991, 1410, 148, 2, 52, "Subsection"],
Cell[CellGroupData[{
Cell[44164, 1416, 154, 4, 48, "Input"],
Cell[44321, 1422, 143, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[44501, 1430, 239, 7, 75, "Input"],
Cell[44743, 1439, 5336, 170, 417, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[50116, 1614, 126, 2, 48, "Input"],
Cell[50245, 1618, 327, 8, 72, "Output"]
}, Open  ]],
Cell[50587, 1629, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[51429, 1654, 81, 2, 19, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[51535, 1660, 717, 13, 65, "Section"],
Cell[CellGroupData[{
Cell[52277, 1677, 148, 4, 48, "Input"],
Cell[52428, 1683, 271, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[52736, 1695, 533, 8, 52, "Subsection"],
Cell[CellGroupData[{
Cell[53294, 1707, 156, 4, 48, "Input"],
Cell[53453, 1713, 2671, 63, 83, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[56161, 1781, 128, 2, 48, "Input"],
Cell[56292, 1785, 70, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[56399, 1791, 287, 8, 48, "Input"],
Cell[56689, 1801, 13747, 313, 211, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[70473, 2119, 217, 5, 48, "Input"],
Cell[70693, 2126, 14504, 327, 211, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[85234, 2458, 217, 5, 48, "Input"],
Cell[85454, 2465, 11595, 262, 147, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[97086, 2732, 63, 1, 48, "Input"],
Cell[97152, 2735, 127, 3, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[97328, 2744, 540, 7, 52, "Subsection"],
Cell[CellGroupData[{
Cell[97893, 2755, 115, 2, 48, "Input"],
Cell[98011, 2759, 70, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[98118, 2765, 123, 2, 48, "Input"],
Cell[98244, 2769, 76, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[98357, 2775, 201, 4, 48, "Input"],
Cell[98561, 2781, 75, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[98673, 2787, 369, 12, 48, "Input"],
Cell[99045, 2801, 76, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[99158, 2807, 254, 8, 48, "Input"],
Cell[99415, 2817, 76, 1, 48, "Output"]
}, Open  ]],
Cell[99506, 2821, 86, 1, 30, "Item"],
Cell[CellGroupData[{
Cell[99617, 2826, 186, 6, 57, "Input",
 CellID->241630389],
Cell[99806, 2834, 210, 5, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[100053, 2844, 290, 9, 57, "Input",
 CellID->333153078],
Cell[100346, 2855, 447, 13, 57, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[100830, 2873, 399, 13, 57, "Input",
 CellID->164502341],
Cell[101232, 2888, 210, 5, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[101479, 2898, 194, 6, 57, "Input",
 CellID->161529420],
Cell[101676, 2906, 210, 5, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[101935, 2917, 107, 1, 52, "Subsection"],
Cell[102045, 2920, 84, 1, 48, "Input"],
Cell[CellGroupData[{
Cell[102154, 2925, 358, 10, 48, "Input"],
Cell[102515, 2937, 24935, 561, 339, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[127487, 3503, 122, 2, 48, "Input"],
Cell[127612, 3507, 73, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[127722, 3513, 124, 2, 48, "Input"],
Cell[127849, 3517, 73, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[127959, 3523, 58, 1, 48, "Input",
 CellID->164339061],
Cell[128020, 3526, 70, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[128127, 3532, 129, 2, 48, "Input"],
Cell[128259, 3536, 224, 5, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[128520, 3546, 126, 2, 48, "Input"],
Cell[128649, 3550, 332, 9, 72, "Output"]
}, Open  ]],
Cell[128996, 3562, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[129838, 3587, 81, 2, 19, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[129944, 3593, 726, 13, 62, "Section"],
Cell[CellGroupData[{
Cell[130695, 3610, 214, 5, 48, "Input"],
Cell[130912, 3617, 270, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[131219, 3629, 590, 10, 52, "Subsection"],
Cell[CellGroupData[{
Cell[131834, 3643, 115, 2, 48, "Input"],
Cell[131952, 3647, 71, 1, 48, "Output"]
}, Open  ]],
Cell[132038, 3651, 167, 4, 50, "Input"],
Cell[132208, 3657, 538, 10, 72, "Item"],
Cell[CellGroupData[{
Cell[132771, 3671, 163, 3, 48, "Input"],
Cell[132937, 3676, 119, 3, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[133093, 3684, 174, 3, 48, "Input"],
Cell[133270, 3689, 78, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[133385, 3695, 193, 4, 48, "Input"],
Cell[133581, 3701, 125, 3, 48, "Output"]
}, Open  ]],
Cell[133721, 3707, 140, 2, 48, "Input"],
Cell[CellGroupData[{
Cell[133886, 3713, 194, 4, 48, "Input"],
Cell[134083, 3719, 129, 3, 48, "Output"]
}, Open  ]],
Cell[134227, 3725, 126, 2, 48, "Input"],
Cell[CellGroupData[{
Cell[134378, 3731, 123, 2, 48, "Input"],
Cell[134504, 3735, 77, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[134618, 3741, 194, 4, 48, "Input"],
Cell[134815, 3747, 127, 3, 48, "Output"]
}, Open  ]],
Cell[134957, 3753, 142, 2, 48, "Input"],
Cell[CellGroupData[{
Cell[135124, 3759, 194, 4, 48, "Input"],
Cell[135321, 3765, 125, 3, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[135495, 3774, 568, 7, 52, "Subsection"],
Cell[136066, 3783, 190, 4, 72, "Input"],
Cell[CellGroupData[{
Cell[136281, 3791, 193, 5, 48, "Input"],
Cell[136477, 3798, 271, 7, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[136785, 3810, 161, 3, 48, "Input"],
Cell[136949, 3815, 71, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[137057, 3821, 159, 3, 48, "Input"],
Cell[137219, 3826, 70, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[137326, 3832, 184, 4, 48, "Input"],
Cell[137513, 3838, 73, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[137623, 3844, 71, 1, 48, "Input"],
Cell[137697, 3847, 71, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[137805, 3853, 161, 3, 48, "Input"],
Cell[137969, 3858, 71, 1, 48, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[138089, 3865, 125, 1, 52, "Subsection"],
Cell[138217, 3868, 107, 3, 48, "Input",
 CellID->26923105],
Cell[138327, 3873, 112, 1, 30, "Item"],
Cell[CellGroupData[{
Cell[138464, 3878, 1037, 25, 256, "Input",
 CellID->418613926],
Cell[139504, 3905, 203, 5, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[139744, 3915, 71, 1, 48, "Input"],
Cell[139818, 3918, 71, 1, 48, "Output"]
}, Open  ]],
Cell[139904, 3922, 104, 1, 30, "Item"],
Cell[CellGroupData[{
Cell[140033, 3927, 1020, 25, 256, "Input",
 CellID->1833563219],
Cell[141056, 3954, 202, 5, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[141295, 3964, 69, 1, 48, "Input"],
Cell[141367, 3967, 70, 1, 48, "Output"]
}, Open  ]],
Cell[141452, 3971, 240, 5, 30, "Item"],
Cell[CellGroupData[{
Cell[141717, 3980, 940, 24, 233, "Input",
 CellID->193821835],
Cell[142660, 4006, 203, 5, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[142900, 4016, 69, 1, 48, "Input"],
Cell[142972, 4019, 70, 1, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[143079, 4025, 126, 2, 48, "Input"],
Cell[143208, 4029, 330, 9, 48, "Output"]
}, Open  ]],
Cell[143553, 4041, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[144395, 4066, 81, 2, 10, "SlideShowNavigationBar",
 CellOpen->True,
 CellTags->"SlideShowHeader"],
Cell[CellGroupData[{
Cell[144501, 4072, 636, 12, 62, "Section"],
Cell[CellGroupData[{
Cell[145162, 4088, 520, 9, 52, "Subsection"],
Cell[145685, 4099, 174, 4, 35, "Text"],
Cell[CellGroupData[{
Cell[145884, 4107, 109, 1, 48, "Input"],
Cell[145996, 4110, 1270, 27, 141, "Output"]
}, Open  ]],
Cell[147281, 4140, 87, 1, 48, "Input"],
Cell[CellGroupData[{
Cell[147393, 4145, 119, 2, 48, "Input"],
Cell[147515, 4149, 87, 2, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[147639, 4156, 247, 5, 48, "Input"],
Cell[147889, 4163, 170, 4, 48, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[148096, 4172, 126, 2, 48, "Input"],
Cell[148225, 4176, 197, 5, 48, "Output"]
}, Open  ]],
Cell[148437, 4184, 781, 18, 30, "PreviousNext"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)