(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.2' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 74654, 1540]*) (*NotebookOutlinePosition[ 119350, 3249]*) (* CellTagsIndexPosition[ 119306, 3245]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell[TextData[StyleBox["Hands-On Tutorial", FontFamily->"Arial"]], "Title"], Cell[CellGroupData[{ Cell["Part 1", "Section"], Cell[TextData[{ StyleBox["In this ex", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], "er", StyleBox["cise, you will call a VI from ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontSlant->"Italic"], StyleBox[" t", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox["o acquire some LabVIEW data into a ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontSlant->"Italic"], StyleBox[" notebook. You will also apply some basic data processing to this \ acquired data. For simplicity, details and background information will be \ kept to a minimum h", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], "er", StyleBox["e. For additional examples and more detailed information, ref", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], "er", StyleBox[" to the", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox[" ", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" Link for LabVIEW", "Program", FontVariations->{"CompatibilityType"->0}], StyleBox[" printed", FontVariations->{"CompatibilityType"->0}], StyleBox[" and online documentation. \nThis tutorial, and the ones that \ follow, assume a basic working understanding of LabVIEW and ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[". If you can open and run a VI, and evaluate ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" expressions, you should have all the background you need to work \ through these tutorials. \nOkay, let's get started.", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], "\n\n", StyleBox["1) Begin by opening a new ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontSlant->"Italic"], StyleBox[" notebook\n\n2) In this blank notebook, type (or copy & paste):\n\ \n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["<< LabVIEW`VIClient`", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\n", FontFamily->"Courier", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\nfollowed by and . This command invokes the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["VIClient.m", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox[" package - the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" package that enables VI Server functionality from inside a ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" notebook. \nCharacter Usage Note: If you are new to ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[", you may inadvertently use 'single quote' characters when typing \ the previous command - in which case your command line would look like this:\n\ ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["<< LabVIEW'VIClient'", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\nNotice that the required character is not a single quote, but \ rather the accent character that shares a key with the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["~ ", "viname", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["(tilde) character on most standard keyboards. (If you are having \ difficulty finding this character on your keyboard, simply copy the 'correct' \ version and paste it into your notebook. Be sure to type and \ before continuing.)\n\n3) From your computer desktop, start LabVIEW\n\n4) \ Open ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", "viname", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" VI S", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["er", "viname"], StyleBox["v", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["er", "viname"], StyleBox[".vi", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox[" . This can be accessed from the LabVIEW Tools menu:\n\n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Tools -> Mathlink -> Main -> MathLink VI Server...", "Input", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["\nOpen the VI but don't run it yet. There are some additional \ preparations to complete first.\n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["\nBackground Information:\n", "viname"], StyleBox["MathLink ", "viname", FontSlant->"Italic"], StyleBox["VIServer.vi ", "viname"], "is the general purpose utility that you use to control a LabVIEW \ application from within a ", StyleBox["Mathematica", FontSlant->"Italic"], " notebook. You will generally run this VI on the computer that is \ connected to your instruments. " }], "Text"], Cell[GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHggYjN[Vi^OShn03ooeGooj[ooonICXf=SLcII03=Voc=Vc3=V VC=VIS=V1ool00m/2BPL0000900;o 0]/019/K00026`03n@0007T000?o6a/031/01_l06fgKohD000Go6a/KP@036`05PA/K6h400Q/2o`?K 0TX700002@02o`;K00BK6`000Q/00oT0001i0003oa/K00`K00Ko01]]fon50003oa^1001ool00m/2BPL0000900;o 0]/019/K00026`03n@3o008000?o0?l010001?l00?l20003o`3o008000?o000010000ol000020003 o`0005H000?o6a/031/01_l06fgKohD000?oKFd036d2o`?K0TX700002@02o`;K00BK6`000Q/00oT0 o`020003o`3o00?o00D0o`00o`020003o`3o008000?o00000`000ol0o`030003o`0005H000?o6a/0 31/01_l06fgKohD000?oVa/02a/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K00?i0?l00P000ol0 o`020003o`3o008000Ko003o0?l20003o`0000<000?o0?l00`000ol0001F0003oa/K00`K00Ko01]] fon50003oi/K00/K00=]ool00m/2BPL0000900;o0]/019/K00026`03n@0000?o0P02o`800ol00`3o o`0300;o1@001_l0003o00;oF0000olK6`0<6`06o`0KKM_oQ@000onK6`0;6`03KOoo00?K0TX70000 2@02o`;K00BK6`000Q/00oT000020003o`0007@000?o6a/031/01_l06fgKohD000?oVa/02a/00fgo o`03f`9:1`0000T00_l2f`04Va/0008K00?i00000P000ol0000K0003o`0005H000?o6a/031/01_l0 6fgKohD000?oVa/02a/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K00?i0000N@000olK6`0<6`06 o`0KKM_o1P02o`800_l300Go0P02o`800_l300;o0`02o`800_l300?o1@02o`800_l500Go0P02o`80 0_l200;o0`04o`<00_l200;o1002oah000?oVa/02a/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K 00?i0000N@000olK6`0<6`06o`0KKM_o1P02o`800_l200;o0P02o`800_l200;o0`02o`<00_l200;o 0P000ol00002o`<00_l300;o1002o`800_l200;o0P02o`800_l200;o0`000ol00002o`800_l300;o 7`000onK6`0;6`03KOoo00?K0TX700002@02o`;K00BK6`000Q/00oT0001i0003oa/K00`K00Ko01]] fol600;o0P02o`800_l200;o0P02o`800_l300;o0`02o`800_l400?o0`02o`<00_l400;o0P02o`80 0_l200;o0P02o`800_l600;o0P02o`<00_lO0003oi/K00/K00=]ool00m/2BPL0000900;o0]/019/K 00026`03n@0001L000?o000060000ol000020003o`0001T000?o00002002oaT000?o6a/031/01_l0 6fgKo`H00_l200;o0P02o`800_l200;o0P02o`<00_l300;o0P02o`<00ol400;o0`02o`@00_l200;o 0P02o`800_l200;o0P06o`800_l200;o0`02oal000?oVa/02a/00fgoo`03f`9:1`0000T00_l2f`04 Va/0008K00?i00005`000ol0000H0003o`00008000?o00006@000ol0000:0003o`0001H000?o6a/0 31/01_l06fgKo`H01Ol300;o0P02o`800_l200;o0`02o`<00_l200;o0P03o`D00_l300;o1002o`80 0_l200;o0P02o`800_l200;o0P02o`800_l200;o0`02oal000?oVa/02a/00fgoo`03f`9:1`0000T0 0_l2f`04Va/0008K00?i00000_l20005o`000?l00P03o`050?l00?l00P000ol0o`02o`<000?o0000 0_l200?o10000ol00003o`040?ooo`800ol40005o`000?l01002o`8000Co003o0P000ol0o`02o`80 0ol300?o0P03oa<000?o6a/031/01_l06fgKo`H00_l200;o0P02o`800_l200;o0P02o`<00_l300;o 0P02o`800_l20004o`0000;o0`03o`<00_l200;o0P02o`800_l200;o0P02o`800_l200;o0P02o`<0 0_lO0003oi/K00/K00=]ool00m/2BPL0000900;o0]/019/K00026`03n@3o00D000?o0?l00P001_l0 0?l0o`8000Ko003o0?l20006o`00o`3o1`000ol000030006o`00o`3o0P000ol0o`020003o`0000D0 00Go0000o`040004o`00o`8000?o0?l00P000ol000020003o`3o008000?o00000`000ol0000@0003 oa/K00`K00Ko01]]fol600;o0P02o`800_l200;o0P05o`@00_l300Go1003o`<01?l200;o00@0ool0 0_l200;o0P09o`@01?l300Go0`04oah000?oVa/02a/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K 00?i0?l00ol30003o`0000800ol01@3o003o008000?o0?l00P001Ol00?l000Co0P02o`L00ol01`3o 003o0?l00P000ol000050004o`0000Co00D0o`00o`020003o`3o008000?o00000_l20004o`00o`<0 0_lC0003oa/K00`K00Ko01]]fol600;o0P02oa<00_lC00;o;P02oal000?oVa/02a/00fgoo`03f`9: 1`0000T00_l2f`04Va/0008K00?i0?l00P001_l00?l0o`D000?o0?l00P001_l00?l0o`8000Ko003o 0?l20003o`3o00/000?o0?l00P000ol0o`020003o`0000D000Go0000o`020003o`3o008000Ko003o 0?l20003o`3o00@000Co003o0P000ol0000C0003oa/K00`K00Ko01]]fol600Go5002oa<00_l^00;o 7`000onK6`0;6`03KOoo00?K0TX700002@02o`;K00BK6`000Q/00oT00002o`8000Go0000o`0200;o 0P03o`030?oo00800ol30003o`0000;o0`03o`<000?o00000_l200?o0P03o`@000Go0000o`0400;o 0P03o`030?oo00800ol300?o00D0o`00o`0300?o4P000olK6`0<6`06o`0KKM_oQ@000onK6`0;6`03 KOoo00?K0TX700002@02o`;K00BK6`000Q/00oT0000M0003o`00028000?o0000=0000olK6`0<6`06 o`0KKM_oQ@000onK6`0;6`03KOoo00?K0TX700002@02o`;K00BK6`000Q/00oT0000L00;o8P05oc@0 4?l01@0KKM_o08D000?oVi/02i/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K00?i0000N@000olK 6`0<6`05o`0KKM/0Uol3f`9:1`0000T00_l2f`04Va/0008K00?i0000N@000olK6`0<6`05o`0KKM/0 Qol>K@;o0m/2BPL0000900;o0]/019/K00026`03n@0007T000?o6a/031/01Ol06fgK08Oo00>K6a/0 2Q/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K00?i0000N@000olK6`0<6`05o`0KKM/0Qol00i/K 6`0:6`03KOoo00?K0TX700002@02o`;K00BK6`000Q/00oT0001i0003oa/K00`K00Go01]]f`08o`@0 1?l500;o0P02o`800ol200?o0P02o`800ol300Go0P02o`801Ol500;o0P02o`800_l200?o1003o`80 0_l200Co0P0Oo`03Va/K00XK00=]ool00m/2BPL0000900;o0]/019/K00026`03n@3o00D000?o0000 0ol200;o0`000ol0o`020005o`000?l00P02o`800ol20004o`00o`@000Ko0000o`03o`D000?o0?l0 0ol200?o00@0oooo10000ol000020003o`3o00?o0`000ol0o`0700?o10000ol000070003oa/K00`K 00Go01]]f`07o`800ol00`3oo`0200;o0P02o`800_l200?o0P03o`800_l200;o00<0ool00P03o`80 0ol200Co0P02o`800_l200;o0P02o`800_l200?o00<0ool00P02o`800ol2023o00>K6a/00Q/3o`DK 00=]ool00m/2BPL0000900;o0]/019/K00026`03n@3o00D000?o0?l00P000ol0o`020006o`00o`3o 0P001?l00?l20004o`00o`@000?o0?l00P000ol000020007o`000?l0o`020003o`0000@000?o0000 0P001_l00?l0o`8000Go0000o`040003o`3o00H000?o0?l01P001Ol0003o00d000?o6a/031/01Ol0 6fgK00Oo0P06o`800_l200;o0P02o`800ol200?o0P02o`801?l300?o0P03o`801?l200;o0P02o`80 0_l200;o0P02o`801_l200;o0P03o`808?l00i/K6`026`?o1A/00fgoo`03f`9:1`0000T00_l2f`04 Va/0008K00?i0?l01@000ol00003o`030?l000@000?o0?l00P001?l00?l20004o`00o`800_l20004 o`00o`@000Oo0000o`3o00<000?o00000`000ol0000300?o00D0o`00o`020003o`3o00<000?o0?l0 1P000ol0o`0:0003o`0000/000?o6a/031/01Ol06fgK00Oo0P06o`800_l200;o0P02o`800ol200?o 0P02o`800ol300Co0P03o`801?l200;o0P02o`800_l200;o0P02o`H00_l200;o0P03o`808?l00i/K 6`026`?o1A/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K00?i0?l00P001?l00?l40003o`3o0080 00Ko003o0?l20004o`00o`8000Ko003o0?l40004o`00o`@01Ol00`3o00020003o`0000<000?o0000 1@000ol0o`020006o`00o`3o0`000ol0o`02o`<000Go0?l0o`0600?o3P000olK6`0<6`05o`0KKM/0 1ol200Oo1@02o`800_l200?o0P03o`800_l200;o0`05o`800ol200Co0P02o`800_l200;o0P02o`80 0_l200;o0P02o`800_l200?o0P0Po`03Va/K00Oo0a/00fgoo`03f`9:1`0000T00_l2f`04Va/0008K 00Wi0?l0o`3o0?l00P02o`<00_l200;o00@0oooo0P03o`800_l300?o00@0oooo1@001ol0003o0?l0 0`001ol0003o0?l01@02o`800ol20005o`000?l00P000ol0o`050005o`3o0?l01`000ol000030003 o`0000L000?o6a/031/01Ol06fgK00Oo0P06o`040?ooo`800_l200;o0P03o`800ol200;o0P02o`80 0_l0103oool200?o0`03o`800_l200;o0P02o`800_l200;o0P02o`800_l200;o0P03o`808?l019/K 6a/5o`@K00=]ool00m/2BPL0000900;o0]/019/K00026`04n@3oo`<00_lD0003o`0000X000?o0000 1@001ol0003o0?l00P000ol000040003o`0000L000?o00000P001Ol0003o008000?o0?l010000ol0 00030003o`0000D000?o000030000olK6`0<6`05o`0KKM/01ol200Oo1003o`800_l200?o0P03o`D0 1?l300?o1002o`8000Co003o0P02o`800_l900Co1003o`D00ol401oo00>K6a/00Q/3o`DK00=]ool0 0m/2BPL0000900;o0]/019/K00026`03n@3o00D000?o00002P000ol000050003o`0000X000?o0000 1@001_l0003o00?o1`000ol000070003o`00008000Go0000o`020003o`3o00?o00<0o`0010000ol0 000200Go3@000olK6`0<6`05o`0KKM/01ol200?o00<0ool02?l200;o0P03o`804ol202ko0P0Po`03 Va/K00K6fd02]/2BPL0000900;o3m/00a]]K@04K@036fe]079]2m/2BP800_l=f`03 Va]]008KMY/011^K6fd:f`9:1`0000T00_l?f`03Va/K00K6a/00a/016fK6oT_00;o0`02o`H00_lb00036fgK00[K0TX200;o3M/01I/K KA]]00;K00BK6`000Q/00oT0001G0003oa/K00`K00Wo01]]Va^K6fd02]/2BPL0000900;o3m/6V`04 6i/KnBl00_l300;o1P02oc8000K6oT0;`02o`<00_l600Go ;`000a]]f`0:f`9:0P02o`gK00FK6fdKK@02f`04Va/0008K00?i0000E`000olK6`0<6`09o`0KKI/K Va]]00[K0TX700002@02o`oK00>K6a/00a/016fK6oT_00;o0`02o`H00_l200;o;P000a]]f`0:f`9: 0P02o`gK00FK6fdKK@02f`04Va/0008K00?i0000E`0@o`0801]]Va^K6fd:f`9:1`0000T00_l?f`03 Va/K00Kool00ol016fK6oU`00036fgK00[K0TX200;o3M/01I/K KA]]00;K00BK6`000Q/00oT0001G0003oa/K00`K00Wo01]]Va^K6fd02]/2BPL0000900;o3m/00i/K o`02o`056ffK6oT0L0000a]]f`0:f`9:0P02o`gK00FK6fdKK@02f`04Va/0008K00?i0000E`000olK 6`0<6`09o`0KKI/KVa]]00[K0TX700002@02o`oK00BK6a_o0Q/016fK6oU`00036fgK00[K0TX200;o 3M/01I/KKA]]00;K00BK6`000Q/00oT0001G0003oa/K00`K00Wo01]]Va^K6fd02]/2BPL0000900;o 3m/00i/K6`036`03KI/K073i00<06fd02m/2BP800_l=f`05Va]]6fd00]/019/K00026`03n@0005L0 00?o6a/031/02Ol06ffK6i/KK@0:f`9:1`0000T00_l?f`03Va/K00K6a/00a/00ffK6`1a0003 6fgK00[K0TX200;o3M/01I/KKA]]00;K00BK6`000Q/00oT0001G0003oa/K00`K00Wo01]]Va^K6fd0 2]/2BPL0000900;o3m/00i/K6`036`04KI/KnG0000K6ol00_l01A]]Va_i0700 00Kool00ol016fK6oTU00Go0P02o`<00ol500;o0`04o`<00_l200;o9@000a]]f`0:f`9:0P02o`gK 00FK6fdKK@02f`03Va/K06lK00I]Va^K6fd:f`9:1`0000T00_l?f`03Va/K00K6a/00a/016fK6oTU00;o1@02o`800_l20004o`0000;o0`02o`800_l200;o0P02obD000K6a/00a/016fK6oTU00;o 1@02o`<00ol300Co0`04o`<01OlV00036fgK00[K0TX200;o3M/01I/KKA]]00CK0ol3f`;o0m/3o`03 fooK00CK0_l3f`;oEM/01I/KVa]]00[K0TX700002@02o`oK00>K6a/00a/016fK6oTU00;o4@02ocH0 00Kool00ol016fK6oU`00036fgK00[K0TX200;o3M/01I/KKA]]00CK00?ofm/0 0]/01_oKfooKo`;K00Cofooo0m/01_oKfooKo`;K00?ofm/0D]/01I/KVa]]00[K0TX700002@02o`oK 00>K6ol00_l01A]]Va_i070000?lmf`05Va^K6fd02]/2BPL0000900;o6=/00ooKf`03f`03om_o00;K00GofooK o`05f`04om_Ko`;K00?ofol00]/00ooKo`02f`03om_o00;K00?ofm/0DM/2BP800_l=f`07Va]]6fgo f`0eK@03om_K00WK00K6oT0;@001a]]Va^K6fd02]/2BPL0000900;oU]/2BP800_l=f`06Va]]6fgo0Y/b6`9]00?ofm/0 2M/00i/Kn@0]00076ffK6i/KK@0:f`9:1`0000T00_nFf`9:0P02o`gK00JK6fdKKOldV`9]00?ofm/0 2M/00i/Kn@0/n@0801]]Va^K6fd:f`9:1`0000T00_nFf`9:0P02o`gK00JK6fdKKOleV`03fooK00[K 00>K6a/0;Q/01VfK6i/KK@[K0TX700002@02oiKK0TX200;o3M/01I/KKA]]03So2m/aV`066i/KVa]] 2]/2BPL0000900;oU]/2BP800_l=f`05Va]]6fd0MM/01I/KVa]]00[K0TX700002@02oiKK0TX200;o 3M/01I/KKA]]07GK00FK6i/KK@0:f`9:1`0000T00_nFf`9:0P02o`gK00FK6fdKK@1ef`05Va^K6fd0 2]/2BPL0000900;oD]/00a]]K@04K@036fe]02m]2m/2BP800_l=f`05Va]]6fd0MM/01I/KVa]]00[K 0TX700002@02oe;K00>K6a/00a/00ffK6`0_6`03KM_K00WK0TX200;o3M/01I/KKA]]00;K0ol4f`03 om_K00?o0m/00ooKf`03o`04foooob_K0_l3f`;o0m/3o`;K0_lMf`05Va^K6fd02]/2BPL0000900;o D]/00i/K6`036`03KI/K02h000K6a/00a/016fK6oT50003o`0000<000?o00000`000ol0 00030003o`0001<000Kool00ol016fK6oT]0003 6fgK00[K0TX200;o3M/019/KKA]fK@8K00>K6fd02]/2BPL0000900;oD]/00i_oo`03o`04KI/KnBd0 00K6fd02]/2BPL0000900;oD]/00i/Ko`02o`056ffK6oT0 ;@000a]]f`0:f`9:0P02o`gK00>K6fd0NFd26`03KM_K00SK0TX700002@02oe;K00BK6a_o0Q/00ffK 6`0]n@0301]]00_K0TX200;o3M/00i/K6`1k6`03KM_K00SK0TX700002@02oe;K00>K6a/00a/00ffK 6`0_6`03KM_K00WK0TX200;o3M]nV`036m_K00SK0TX700002@02oe;K1Y/00a^KV`0_V`036m_K00WK 0TX200;oU]/2BPL0000900;oU]/2BP800_nFf`9:1`0000T00_nFf`9:0P02oiKK0TX700002@02oiKK 0TX200;oU]/2BPL0000900;oU]/2BP800_nFf`9:1`0000T00_nFf`9:0P02oa;K0_l2f`03om_K00;K 00?ofm/00m/2o`;K00?ofm/01]/2o`?K0ol3f`03om_K05[K0TX700002@02oiKK0TX200;o4M/00ooK f`02f`03om_K00;K00?ofm/00]/01_oKfooKo`OK00Kofm_ofol2f`04om_KoegK0TX700002@02oiKK 0TX200;o4M/4o`03fooK00?K00?ofm/00]/01_oKfooKo`OK00Kofm_ofol2f`04om_KoegK0TX70000 2@02oiKK0TX200;o4M/01OoKfooK00;o0m/2o`?K00Gofm_of`02o`KK00Kofm_ofol2f`04om_KoegK 0TX700002@02oiKK0TX200;o4]/2o`;K00OofooofooK00;o0]/2o`;K00Cofooo1M/2o`;K00Gofm_o f`03oecK0TX700002@02oiKK0TX200;o>=/00ooKf`1Kf`9:1`0000T00_nFf`9:0P02ocSK00?ofm/0 Fm/2BPL0000900;oU]/2BP800_nFf`9:1`0000T00_nFf`9:0P02oiKK0TX700002@02oiKK0TX200;o U]/2BPL0000900;oU]/2BP800_nFf`9:1`0000T00_mBf`036fe]00A]00K6a/00a/00ffK6`0_6`03KI/K00DK00A]fm_K 0TX200;oF]/00i/K6`0^6`03KM_K00SK0TX700002@02oe;K00>K6a/00a/00ffK6`0^00036ffK00HK 00A]fm_K0TX200;oF]/00i/K000]00036fgK00WK0TX700002@02obKK0_lPf`03om_K00OK00BK6a_o 0Q/016fK6oT]00046ffK6`?o0Q/016gKfm/2BP800_mJf`03Va_i02d000K6oT00P03obP000Kool0 0ol016fK6oT30003o`0000@000Oo0000o`3o00<000?o00005P001A]]Va_o00@K00A]fm_K0TX200;o >]/00ooKf`03f`03om_o00;K00GofooKo`06f`03om_o00;K00?ofm/00]/01I/Kn@3o00<000?o0000 9@000a]]f`09f`9:1`0000T00_lBf`06om_KfooK1?l2f`03om_K00?o00GKom_Ko`06f`04om_Ko`;K 00?ofm/00m/2o`?K00Cofm_o0]/00ooKo`02f`03om_K00CK00>K6a/00a/016fK6oT30003o`0000@0 00Oo0000o`3o00<000?o00005P000a]]V`026`?o00]/00ooKf`02f`;o00CKoooo 0]/01?oKfol5f`03om_o00?K00Wofm_KVa_i0?l00`000ol0000U00036fgK00WK0TX700002@02oa;K 00Cofm_o2=/00ooKf`0>f`03om_K00kK00?ofm/03m/00i/K6`036`04KI/Kn@800_l60007o`000?l0 o`030003o`0001H000]/00ooKf`03f`03om_K00CK00?ofm/01]/00ooKo`02o`GK00>K6oT00P03obP000K6oT0 ;@000a]]f`09f`9:1`0000T00_mBf`04Va/Ko`8K00=]Va/0;OT00`0KK@0;f`9:0P02oe[K00>K6oT0 ;?T00`0KK@0:f`9:1`0000T00_mBf`03Va/K00K6a/0 ;Q/00fgKf`08f`9:1`0000T00_mBf`JK00K6a/00a/00ffK6`0^00036ffK00HK00A]fm_K0TX200;oU]/2BPL0000900;o7M/00ooK f`0bf`04Va/Ko`8K00A]Va_i;@0011]]Va/3o`8K00A]fm_K0TX200;oOm/6KA7K0TX700002@02oagK 00?ofm/07]/00ooKf`0:f`03om_K00CK00BK6a_o0Q/016fK6oT]00036ffK00@K00?o6fd00m/2BP80 0_mmf`9]1Q/2K@oK0TX700002@02o`KK0ol3f`;o0m/3o`05fooKfol01=/3o`?K0_l2f`03om_K00?K 00?ofm/00_l3f`?o1M/00ooKf`02f`04om_Kf`?o0m/00ooKf`03f`03Va_o00;o00DKKI/Kn@030003 o`00008000?o00000ol300?o6@000a]]V`026`;o0Q/016gKfm/2BP800_mkf`9]0Q/6K@8K0Vd=f`9: 1`0000T00_l5f`07om_KfooKo`02f`03om_o00;K00?ofol00]/00ooKf`02f`06om_Kom_o1=/00ooK f`03f`03om_o00;K00?ofol00]/00ooKf`02f`03om_K00?K00?ofm/01=/01OoKfm_o00CK00>Kool0 0ol016fK6oT30003o`0000@000Oo0000o`3o00<000?o00005P001A]]Va_o00@K00A]fm_K0TX200;o N]/2V`036fe]00HK0Vd00a]]K@0K6i/03Q/00fdKK@0:f`9:1`0000T00_l6f`?o9=/00ooKf`07f`03om_K00?K00?ofm/0 0]/00ooKf`07f`03om_K00?K00>K6a/00a/016fK6oT30003o`0000D00ol300?o6@000a]]V`066`04 KM_Kf`9:0P02odOK00?ofm/00m/01_oKfooKo`;K00?ofol00]/00ooKo`03o`03fooK00CK00?ofm/0 1?l01M_ofm_o00GK00>K6i/03Q/00fdKK@0:f`9:1`0000T00_lnf`03om_K00[K00?ofm/01=/00i_o o`03o`04KI/KnBd000K6i/03Q/00fdKK@0:f`9: 1`0000T00_mBf`03Vooo00?o00A]Va_i;@000a]]V`06V`046m_Kf`9:0P02odOK00?ofm/01=/2o`;K 0ol2f`?o0m/2o`?K0_l2f`?o0]/2o`?K0ol5f`03Va^K00K6ol00_l01A]]Va_i02d000K6i/00a/00i/KV`086`03KA]]00[K0TX700002@02oe;K00BK6a_o0Q/00ffK6`0]n@0301]]00_K 0TX200;oB=/3oacK00?ofm/02=/00ooKf`03f`03Va^K00@K00>K6i/01a/00fdKK@0:f`9:1`0000T0 0_mBf`03Va/K00K6i/011/2V`HK00=]6fd02m/2BPL0 000900;oD]/6V`036i^K02nK00"], "Graphics", Evaluatable->False, ImageSize->{326, 299}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}], Cell[TextData[{ "Figure ", CounterBox["Graphics"], " ", StyleBox["MathLink", FontSlant->"Italic"], " VI Server.vi front panel." }], "Legend", GeneratedCell->False, CellAutoOverwrite->False, FontFamily->"Arial"], Cell[TextData[{ "\nTo continue,\n\n5", StyleBox[") If you are using a Windows PC for this tutorial, ensure that \ the '", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Link protocol'", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox[" ring control (on the front panel of ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" VI Server.vi) is set to '", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["FileMap'", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox[". If you are using a Mac, this parameter should be set to '", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["PPC", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["'. (For information about using the TCP protocol, refer to the \ formal documentation.)\n\nIn the next 2 steps, you will open a ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" connection between the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" VI Server.vi and your ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" notebook. This is accomplished using the 'ConnectToServer' \ function. \nImportant Note: You must establish the connection quickly or your \ computer may hang. In some instances, you may be forced to restart if this \ happens. However, if ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" is quickly brought to the foreground and the function noted \ below is executed reasonably quickly, you can avoid this potential \ difficulty. (In Tutorial #3, you will investigate an example that demonstrate \ an automated linking process.) \n6) In order to minimize the potential for \ lock-up, we will do a little preparation in ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" before running the VI, (Tip: read and understand steps #6 and #7 \ before taking any action.)\nFirst, switch to the notebook, then type (or copy \ & paste) the following function, but this time DON'T press and \ just yet. (The and will come after the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", "viname", FontSlant->"Italic"], StyleBox[" VIServer.vi", "viname"], StyleBox[" has been started.)\nWindows users type (or copy & paste):\n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["link = ConnectToServer[ LinkProtocol -> \"FileMap\"]\n", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\nFor the Mac type (or copy & paste):\n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["link = ConnectToServer[ LinkProtocol -> \"PPC\"]", "viname", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\n\n7) Without pressing and , switch to LabVIEW \ and run ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", "viname", FontSlant->"Italic"], StyleBox[" VIServer.vi.", "viname"], StyleBox[" Quickly switch back to the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" notebook, locate your cursor under the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["ConnectToServer", "viname", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox[" function from the previous step, and press and . \ \n\n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" should respond with something like this:\n\n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Out[2] = LinkObject[\"5555\", 2, 2]", "Output", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\n\nindicating that a connection has been made. If a longer \ message is produced, this indicates that there was a problem initiating the \ link. Ensure the '", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", "viname", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" VI Server.vi", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["' is running, and try entering the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" commands from steps 2 and 6 again. (If troubles persist, it may \ help to quit both ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" and LabVIEW and begin again. )\n\n8) After a connection between \ ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" and LabVIEW has been opened, we can now run any VI via the Link. \ First, we must declare a VI to call. For this tutorial, we will use the ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["DataSim.vi:\n", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox[" Open ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["DataSim.vi", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox[". This is easily accomplished by clicking the LabVIEW menu item:\n\ \n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Tools -> ", "Input", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["MathLink", "Input", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" -> Tutorial -> DataSim...", "Input", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["\n\n9) Run this VI once to fetch it's disk location. After \ running the VI, select and copy the contents of the 'path' indicator on the \ VI's front panel into your system clipboard (using menu 'Edit -> Copy' or the \ keyboard equivalent for your platform) . Using this path information, you \ will build an instrument (or VI) declaration. Type the following instrument \ declaration, but replace [*DataSim path goes here*] by pasting in the path \ data copied to your system clipboard. \n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["\n", FontFamily->"Geneva", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["inst = DeclareInstrument [\n \"[*DataSim.vi path goes here*]\ \", {{\"Function\", U16,1}}, {{\"Data\", DBLMatrix}}]", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\n", "Input", FontFamily->"Courier", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\n", FontFamily->"Geneva", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["To clarify:\n If you are working on the Mac, and the path to ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["DataSim.vi ", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["is:", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], " " }], "Text"], Cell[TextData[StyleBox["Macintosh HD:Applications \ (MacOS9):LabVIEW:user.lib:MathLink:Tutorial.llb:DataSim.vi", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}]], "Text"], Cell[TextData[{ "Your instrument declaration would look something like this:\n", StyleBox["inst = DeclareInstrument [\"Macintosh HD:Applications \ (MacOS9):LabVIEW:user.lib:MathLink:Tutorial.llb:DataSim.vi\", {{\"Function\", \ U16,1}}, {{\"Data\", DBLMatrix}}]", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\n", "viname", FontFamily->"Geneva", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["If you are working on the Mac, simply paste in the path, and you \ are ready to proceed. \nOn the other hand, if you are working on a Windows \ platform, there is one additional consideration that you must address", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], Cell[BoxData[ \(TraditionalForm\`\(\(-\)\(\ \)\)\)]], StyleBox["and this point will be particularly important if you are new to ", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Mathematica:", FontWeight->"Plain", FontSlant->"Italic", FontVariations->{"CompatibilityType"->0}], StyleBox[" specifically, the issue of path separators.", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["\n", "viname", FontFamily->"Geneva", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], "Under Windows, the path separator is the backslash character, \"\\\". This \ is a potential source of confusion, since \"\\\" is also a control character \ used by ", StyleBox["Mathematica", FontSlant->"Italic"], " to format strings. (For instance, \"", StyleBox["\\t", "Input"], "\" is a tab and \"", StyleBox["\\r", "Input"], "\" is a carriage return.) The string \"", StyleBox["\\\\", "Input"], "\" represents a single ", StyleBox["\\", FontWeight->"Bold"], " because the first ", StyleBox["\\ ", FontWeight->"Bold"], "is the ", StyleBox["Mathematica", FontSlant->"Italic"], " control character that specifies the interpretation of the second one. \ This should be familiar to veteran ", StyleBox["Mathematica", FontSlant->"Italic"], " for Windows users, but might be puzzling to new users and others \ accustomed to running ", StyleBox["Mathematica", FontSlant->"Italic"], " on other operating systems. \nTo demonstrate, if the path to ", StyleBox["DataSim.vi ", "viname", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], "on your PC was: \n", StyleBox["C:\\LabVIEW\\", "Input", FontWeight->"Bold"], StyleBox["user.lib", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\\", "Input", FontWeight->"Bold"], StyleBox["MathLink", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\\", "Input", FontWeight->"Bold"], StyleBox["Tutorial.llb", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\\", "Input", FontWeight->"Bold"], StyleBox["DataSim.vi", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], "\nYour VI declaration for ", StyleBox["DataSim.vi", "viname"], " would look like this:\n", StyleBox["inst = DeclareInstrument[\"C:\\\\LabVIEW\\\\", "Input", FontWeight->"Bold"], StyleBox["user.lib", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\\\\", "Input", FontWeight->"Bold"], StyleBox["MathLink", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\\\\", "Input", FontWeight->"Bold"], StyleBox["Tutorial.llb", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\\\\", "Input", FontWeight->"Bold"], StyleBox["DataSim.vi\", {{\"Function\", U16,1}}, {{\"Data\", DBLMatrix}}]", "Input", FontWeight->"Bold", FontVariations->{"CompatibilityType"->0}], StyleBox["\n\n", FontFamily->"Courier", FontWeight->"Bold"], "Since the purpose of this exercise is to quickly produce some interesting \ output, we won't discuss the instrument declaration commands in detail here. \ (You are encouraged to refer to the ", StyleBox["Mathematica", FontSlant->"Italic"], " Link for LabVIEW user guide for a more detailed discussion of the \ DeclareInstrument function.) \n\nAfter the correct path information for your \ PC is entered into the instrument declaration, once again press and \ . ", StyleBox["Mathematica", FontSlant->"Italic"], " will respond by repeating your declaration back to you.\n\n10) Now that \ you have declared a VI, you can call it from ", StyleBox["Mathematica", FontSlant->"Italic"], " - but first you must open a VI reference. To do this, type (or copy & \ paste):\n\n", StyleBox["OpenVIRef[link, inst]", "Input", FontWeight->"Bold"], "\n\nfollowed by and . \n\n11) You are now ready to call the \ VI and do something interesting with the data. Type (or copy & paste):\n\n", StyleBox["data = CallByReference[link, inst];\ndata2 = Flatten[data, 1];\n\ ListPlot[data2];\nfiteq = Fit[data2, {1, x, x^2}, x]", "Input", FontWeight->"Bold"], StyleBox["\n", "viname", FontWeight->"Bold"], "\nType this exactly as you see it here, or simply copy and paste this into \ the target notebook, then press and . \n\nAssuming everything \ has worked according to plan, ", StyleBox["Mathematica", FontSlant->"Italic"], " should produce the following output: \n\n", Cell[BoxData[ \("DataSim.vi successfully operated."\)], "Print"], "\n", Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.0962001 0.0147151 0.0045169 [ [.21621 .00222 -3 -9 ] [.21621 .00222 3 0 ] [.40861 .00222 -3 -9 ] [.40861 .00222 3 0 ] [.60101 .00222 -3 -9 ] [.60101 .00222 3 0 ] [.79341 .00222 -3 -9 ] [.79341 .00222 3 0 ] [.98581 .00222 -6 -9 ] [.98581 .00222 6 0 ] [.01131 .10505 -12 -4.5 ] [.01131 .10505 0 4.5 ] [.01131 .19539 -12 -4.5 ] [.01131 .19539 0 4.5 ] [.01131 .28573 -12 -4.5 ] [.01131 .28573 0 4.5 ] [.01131 .37607 -12 -4.5 ] [.01131 .37607 0 4.5 ] [.01131 .4664 -18 -4.5 ] [.01131 .4664 0 4.5 ] [.01131 .55674 -18 -4.5 ] [.01131 .55674 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .21621 .01472 m .21621 .02097 L s [(2)] .21621 .00222 0 1 Mshowa .40861 .01472 m .40861 .02097 L s [(4)] .40861 .00222 0 1 Mshowa .60101 .01472 m .60101 .02097 L s [(6)] .60101 .00222 0 1 Mshowa .79341 .01472 m .79341 .02097 L s [(8)] .79341 .00222 0 1 Mshowa .98581 .01472 m .98581 .02097 L s [(10)] .98581 .00222 0 1 Mshowa .125 Mabswid .07191 .01472 m .07191 .01847 L s .12001 .01472 m .12001 .01847 L s .16811 .01472 m .16811 .01847 L s .26431 .01472 m .26431 .01847 L s .31241 .01472 m .31241 .01847 L s .36051 .01472 m .36051 .01847 L s .45671 .01472 m .45671 .01847 L s .50481 .01472 m .50481 .01847 L s .55291 .01472 m .55291 .01847 L s .64911 .01472 m .64911 .01847 L s .69721 .01472 m .69721 .01847 L s .74531 .01472 m .74531 .01847 L s .84151 .01472 m .84151 .01847 L s .88961 .01472 m .88961 .01847 L s .93771 .01472 m .93771 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .10505 m .03006 .10505 L s [(20)] .01131 .10505 1 0 Mshowa .02381 .19539 m .03006 .19539 L s [(40)] .01131 .19539 1 0 Mshowa .02381 .28573 m .03006 .28573 L s [(60)] .01131 .28573 1 0 Mshowa .02381 .37607 m .03006 .37607 L s [(80)] .01131 .37607 1 0 Mshowa .02381 .4664 m .03006 .4664 L s [(100)] .01131 .4664 1 0 Mshowa .02381 .55674 m .03006 .55674 L s [(120)] .01131 .55674 1 0 Mshowa .125 Mabswid .02381 .0373 m .02756 .0373 L s .02381 .05988 m .02756 .05988 L s .02381 .08247 m .02756 .08247 L s .02381 .12764 m .02756 .12764 L s .02381 .15022 m .02756 .15022 L s .02381 .17281 m .02756 .17281 L s .02381 .21798 m .02756 .21798 L s .02381 .24056 m .02756 .24056 L s .02381 .26314 m .02756 .26314 L s .02381 .30831 m .02756 .30831 L s .02381 .3309 m .02756 .3309 L s .02381 .35348 m .02756 .35348 L s .02381 .39865 m .02756 .39865 L s .02381 .42124 m .02756 .42124 L s .02381 .44382 m .02756 .44382 L s .02381 .48899 m .02756 .48899 L s .02381 .51157 m .02756 .51157 L s .02381 .53416 m .02756 .53416 L s .02381 .57933 m .02756 .57933 L s .02381 .60191 m .02756 .60191 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .008 w .02381 .02736 Mdot .03343 .02585 Mdot .04305 .02966 Mdot .05267 .03272 Mdot .06229 .02757 Mdot .07191 .03066 Mdot .08153 .03537 Mdot .09115 .03765 Mdot .10077 .04021 Mdot .11039 .03564 Mdot .12001 .03959 Mdot .12963 .04424 Mdot .13925 .04584 Mdot .14887 .04702 Mdot .15849 .05259 Mdot .16811 .04991 Mdot .17773 .05371 Mdot .18735 .0641 Mdot .19697 .05916 Mdot .20659 .07019 Mdot .21621 .06767 Mdot .22583 .0709 Mdot .23545 .07683 Mdot .24507 .08129 Mdot .25469 .08198 Mdot .26431 .08199 Mdot .27393 .09349 Mdot .28355 .09155 Mdot .29317 .0995 Mdot .30279 .09991 Mdot .31241 .10311 Mdot .32203 .10931 Mdot .33165 .1122 Mdot .34127 .11491 Mdot .35089 .11883 Mdot .36051 .12657 Mdot .37013 .13047 Mdot .37975 .13333 Mdot .38937 .14245 Mdot .39899 .14932 Mdot .40861 .14777 Mdot .41823 .15144 Mdot .42785 .15595 Mdot .43747 .16676 Mdot .44709 .17225 Mdot .45671 .17876 Mdot .46633 .17937 Mdot .47595 .19146 Mdot .48557 .19516 Mdot .49519 .19841 Mdot .50481 .2083 Mdot .51443 .20856 Mdot .52405 .21791 Mdot .53367 .22295 Mdot .54329 .22583 Mdot .55291 .23933 Mdot .56253 .23678 Mdot .57215 .24815 Mdot .58177 .25678 Mdot .59139 .26105 Mdot .60101 .27018 Mdot .61063 .27783 Mdot .62025 .28096 Mdot .62987 .29014 Mdot .63949 .29505 Mdot .64911 .29886 Mdot .65873 .31229 Mdot .66835 .31907 Mdot .67797 .32279 Mdot .68759 .32794 Mdot .69721 .33944 Mdot .70683 .34858 Mdot .71645 .35324 Mdot .72607 .36712 Mdot .73569 .37347 Mdot .74531 .37542 Mdot .75493 .38504 Mdot .76455 .40039 Mdot .77417 .40621 Mdot .78379 .4165 Mdot .79341 .42219 Mdot .80303 .42674 Mdot .81265 .43778 Mdot .82227 .44863 Mdot .83189 .45655 Mdot .84151 .46762 Mdot .85113 .47526 Mdot .86075 .4793 Mdot .87037 .49217 Mdot .87999 .50232 Mdot .88961 .50973 Mdot .89923 .52225 Mdot .90885 .52881 Mdot .91847 .54231 Mdot .92809 .55397 Mdot .93771 .56241 Mdot .94733 .56964 Mdot .95695 .57711 Mdot .96657 .59299 Mdot .97619 .60332 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOooo000@0003Ool001Eoo`03001oogoo00Yo o`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yo o`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yo o`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yo o`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Ao o`005Goo00@007oo00000?moo`Qoo`0057oo0P0000Aoo`00001oo`8000=oo`800?moo`0057oo0P00 17oo100000=oo`0000000P00oGoo000EOol00`00Oomoo`04Ool20003Ool200000goo00000006Ool2 003bOol001Eoo`8000eoo`@00004Ool00000Ool4003`Ool001Eoo`03001oogoo00ioo`800003Ool0 000000=oo`800003Ool000000>eoo`005Goo00<007ooOol06Goo100000=oo`000000j7oo000EOol0 0`00Oomoo`0KOol200000goo00000003Ool2003SOol001Eoo`03001oogoo025oo`@00003Ool00000 0>1oo`005Goo00<007ooOol08Goo0P000goo0P000goo0P00fgoo000EOol2000/Ool2003KOol001Eo o`03001oogoo02Qoo`800=ioo`005Goo00<007ooOol0:7oo0P0017oo1000eWoo000EOol00`00Oomo o`0^Ool400000goo0000003COol001Eoo`03001oogoo03=oo`@00=5oo`005Goo00<007ooOol0=Goo 0P0000=oo`000000cWoo000EOol2000iOol200000goo000000020039Ool001Eoo`03001oogoo03]o o`@00Ioo`80021oo`005Goo0P00igoo0P0087oo000EOol00`00Oomo o`3oOol9Ool001Eoo`03001oogoo0>Uoo`8001eoo`005Goo00<007ooOol0jGoo0P007Goo000EOol0 0`00Oomoo`3[Ool2000KOol001Eoo`03001oogoo0>]oo`8001]oo`005Goo0P00ogoo2Woo000EOol0 0`00Oomoo`3oOol9Ool001Eoo`03001oogoo0>ioo`8001Qoo`005Goo00<007ooOol0kWoo0P0067oo 000017oo000000000Woo1@000goo0P001Goo00<007ooOol0ogoo2Goo0002Ool00`00Oomoo`02Ool0 1000Oomoo`000Woo00@007ooOol000Aoo`03001oogoo0?1oo`8001Ioo`000Woo00<007ooOol00goo 00<007ooOol00Woo00@007ooOol000Aoo`<00?1oo`8001Ioo`000Woo00<007ooOol017oo00D007oo Oomoo`00009oo`03001oogoo009oo`03001oogoo0?=oo`8001=oo`000Woo00D007ooOomoo`0000=o o`04001oogoo0002Ool00`00Oomoo`02Ool00`00Oomoo`3cOol2000COol00003Ool0000000=oo`05 001oogooOol00002Ool01000Oomoo`0017oo00<007ooOol0mWoo0P0047oo0002Ool00`00Oomoo`02 Ool30004Ool20005Ool00`00Oomoo`3fOol2000@Ool001Eoo`03001oogoo0?Qoo`8000ioo`005Goo 0P00nGoo0P003Woo000EOol00`00Oomoo`3oOol9Ool001Eoo`03001oogoo0?moo`Uoo`005Goo00<0 07ooOol0ngoo0P002goo000EOol00`00Oomoo`3kOol2000;Ool001Eoo`03001oogoo0?moo`Uoo`00 5Goo0P00oWoo0P002Goo000EOol00`00Oomoo`3mOol20009Ool001Eoo`03001oogoo0?moo`Uoo`00 5Goo00<007ooOol0ogoo2Goo000EOol00`00Oomoo`3oOol9Ool001Eoo`03001oogoo0?moo`Uoo`00 \ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {0, -10, 0, 0}}], "\n", Cell[BoxData[ \(\(\(2.1132173832114933`\)\(\[InvisibleSpace]\)\) + 2.9355588514285076`\ x + 1.0073100778364064`\ x\^2\)], "Output"], "\n\nFirst, there is a text message indicating that DataSim.vi operated \ successfully. Below this, is a plot of data returned by DataSim.vi. Below \ this, an equation defining the least-squares quadratic fit of the transferred \ data. \n\nCongratulations, you have now successfully called a VI from ", StyleBox["Mathematica", FontSlant->"Italic"], ", and used ", StyleBox["Mathematica", FontSlant->"Italic"], "'s internal functions to process LabVIEW data - in this case, to calculate \ a least-squares fit of the data. \n\n12) We will end this tutorial by \ shutting down the connection between ", StyleBox["Mathematica", FontSlant->"Italic"], " and LabVIEW.\n\nType:\n\n", StyleBox["ServerShutdown[link]", "Input", FontWeight->"Bold"], "\n\nthen press and . When ", StyleBox["Mathematica", FontSlant->"Italic"], " responds with \"Server stopped\", the connection has been closed. The ", StyleBox["MathLink VI Server.vi", "viname"], " has also been stopped.\n" }], "Text"], Cell[TextData[{ "This concludes the first part of the tutorial. If you would like to try \ another example, go on to ", ButtonBox["Hands-on Tutorial - Part 2", ButtonData:>{"HandsOn_Part2.nb", None}, ButtonStyle->"Hyperlink"], "." }], "Text"] }, Open ]] }, Open ]] }, FrontEndVersion->"5.2 for Microsoft Windows", ScreenRectangle->{{0, 1280}, {0, 951}}, ScreenStyleEnvironment->"Working", PrintingStyleEnvironment->"Presentation", WindowSize->{705, 563}, WindowMargins->{{Automatic, 100}, {56, Automatic}}, Magnification->1, StyleDefinitions -> Notebook[{ Cell[CellGroupData[{ Cell["Style Definitions", "Subtitle"], Cell["\<\ Modify the definitions below to change the default appearance of \ all cells in a given style. Make modifications to any definition using \ commands in the Format menu.\ \>", "Text"], Cell[CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[StyleData[All, "Working"], PageWidth->WindowWidth, ShowCellBracket->False, ScriptMinSize->9], Cell[StyleData[All, "AllBrackets"], PageWidth->WindowWidth, ShowCellBracket->True, ScriptMinSize->9], Cell[StyleData[All, "Printout"], PageWidth->PaperWidth, ShowCellBracket->False, ScriptMinSize->5, FontSize->10, PrivateFontOptions->{"FontType"->"Outline"}], Cell[StyleData[All, "EnhancedPrintout"], PageWidth->PaperWidth, ShowCellBracket->False, ScriptMinSize->5, FontFamily->"Palatino", FontSize->10, PrivateFontOptions->{"FontType"->"Outline"}] }, Closed]], Cell[CellGroupData[{ Cell["Notebook Options", "Section"], Cell["\<\ The options defined for the style below will be used at the \ Notebook level.\ \>", "Text"], Cell[StyleData["Notebook"], PrintingStyleEnvironment->"Printout", PageHeaders->{{Cell[ TextData[ { CounterBox[ "Page"]}], "PageNumber"], None, Cell[ TextData[ { ValueBox[ "FileName"]}], "Header"]}, {Cell[ TextData[ { ValueBox[ "FileName"]}], "Header"], None, Cell[ TextData[ { CounterBox[ "Page"]}], "PageNumber"]}}, PrintingOptions->{"PrintingMargins"->{{97, 97}, {180, 64}}, "FirstPageHeader"->False, "FacingPages"->True}, CellLabelAutoDelete->False, CellFrameLabelMargins->6, StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Headings", "Section"], Cell[CellGroupData[{ Cell[StyleData["Title"], CellMargins->{{12, Inherited}, {20, 40}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakAbove->True, PageBreakBelow->False, CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->36, FontWeight->"Bold"], Cell[StyleData["Title", "Printout"], CellMargins->{{2, 10}, {15, 30}}, FontSize->30], Cell[StyleData["Title", "EnhancedPrintout"], CellMargins->{{2, 10}, {15, 30}}, FontFamily->"Futura", FontSize->30] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subtitle"], CellMargins->{{12, Inherited}, {10, 2}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->28], Cell[StyleData["Subtitle", "Printout"], CellMargins->{{2, 10}, {10, 15}}, FontSize->24], Cell[StyleData["Subtitle", "EnhancedPrintout"], CellMargins->{{2, 10}, {10, 15}}, FontFamily->"Futura", FontSize->24] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubtitle"], CellMargins->{{12, Inherited}, {10, 20}}, CellGroupingRules->{"TitleGrouping", 20}, PageBreakBelow->False, CounterIncrements->"Subsubtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontFamily->"Helvetica", FontSize->14, FontSlant->"Italic"], Cell[StyleData["Subsubtitle", "Printout"], CellMargins->{{2, 10}, {8, 10}}, FontSize->12], Cell[StyleData["Subsubtitle", "EnhancedPrintout"], CellMargins->{{2, 10}, {8, 10}}, FontFamily->"Futura", FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Section"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{10, Inherited}, {8, 30}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, CellFrameMargins->8, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Helvetica", FontSize->20, FontWeight->"Bold"], Cell[StyleData["Section", "Printout"], CellMargins->{{2, 0}, {7, 24}}, FontSize->16], Cell[StyleData["Section", "EnhancedPrintout"], CellMargins->{{2, 0}, {7, 24}}, FontFamily->"Futura", FontSize->16] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsection"], CellDingbat->"\[FilledSquare]", CellMargins->{{24, Inherited}, {8, 30}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}, FontFamily->"Helvetica", FontSize->14, FontWeight->"Bold"], Cell[StyleData["Subsection", "Printout"], CellMargins->{{9, 0}, {7, 24}}, FontSize->12], Cell[StyleData["Subsection", "EnhancedPrintout"], CellMargins->{{9, 0}, {7, 24}}, FontFamily->"Futura", FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubsection"], CellMargins->{{12, Inherited}, {8, 24}}, CellGroupingRules->{"SectionGrouping", 50}, PageBreakBelow->False, CounterIncrements->"Subsubsection", FontFamily->"Helvetica", FontWeight->"Bold"], Cell[StyleData["Subsubsection", "Printout"], CellMargins->{{2, 0}, {7, 18}}, FontSize->10], Cell[StyleData["Subsubsection", "EnhancedPrintout"], CellMargins->{{2, 0}, {7, 18}}, FontFamily->"Futura", FontSize->10] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Body Text", "Section"], Cell[CellGroupData[{ Cell[StyleData["Text"], CellMargins->{{12, 10}, {7, 7}}, LineSpacing->{1, 3}, ParagraphSpacing->{0.7, 0}, CounterIncrements->"Text"], Cell[StyleData["Text", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontSize->11], Cell[StyleData["Text", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["viname"], CellMargins->{{12, 10}, {6, 6}}, LineSpacing->{1, 3}, CounterIncrements->"viname", FontFamily->"Courier", FontSize->12], Cell[StyleData["SmallText", "Presentation"], CellMargins->{{24, 10}, {8, 8}}, LineSpacing->{1, 5}, FontFamily->"Courier", FontSize->12], Cell[StyleData["SmallText", "Condensed"], CellMargins->{{8, 10}, {5, 5}}, LineSpacing->{1, 2}, FontFamily->"Courier", FontSize->12], Cell[StyleData["SmallText", "Printout"], CellMargins->{{2, 2}, {5, 5}}, FontFamily->"Courier", FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SmallText"], CellMargins->{{12, 10}, {6, 6}}, LineSpacing->{1, 3}, ParagraphSpacing->{0.7, 0}, CounterIncrements->"SmallText", FontSize->9], Cell[StyleData["SmallText", "Printout"], CellMargins->{{2, 2}, {5, 5}}, TextJustification->1, FontSize->7], Cell[StyleData["SmallText", "EnhancedPrintout"], CellMargins->{{2, 2}, {5, 5}}, TextJustification->1, FontFamily->"Palatino", FontSize->7] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Styles for Input/Output", "Section"], Cell["\<\ The cells in this section define styles used for input and output \ to the kernel. Be careful when modifying, renaming, or removing these \ styles, because the front end associates special meanings with these style \ names.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Input"], ShowCellBracket->True, CellMargins->{{45, 10}, {5, 7}}, Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultInputFormatType, AutoItalicWords->{}, FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, CounterIncrements->"Input", FontWeight->"Bold"], Cell[StyleData["Input", "Printout"], ShowCellBracket->False, CellMargins->{{39, 0}, {4, 6}}, FontSize->9], Cell[StyleData["Input", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, 0}, {4, 6}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Output"], ShowCellBracket->True, CellMargins->{{46, 10}, {7, 5}}, CellEditDuplicate->True, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Output"], Cell[StyleData["Output", "Printout"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 4}}, FontSize->9], Cell[StyleData["Output", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 4}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Message"], ShowCellBracket->True, CellMargins->{{45, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Message", StyleMenuListing->None, FontSlant->"Italic", FontColor->RGBColor[1, 0, 0]], Cell[StyleData["Message", "Printout"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontSize->9, FontColor->GrayLevel[0]], Cell[StyleData["Message", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontFamily->"Courier", FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Print"], ShowCellBracket->True, CellMargins->{{75, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Print", StyleMenuListing->None], Cell[StyleData["Print", "Printout"], ShowCellBracket->False, CellMargins->{{57, Inherited}, {Inherited, Inherited}}, FontSize->9], Cell[StyleData["Print", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{57, Inherited}, {Inherited, Inherited}}, FontFamily->"Courier", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Graphics"], ShowCellBracket->False, CellMargins->{{47, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, DefaultFormatType->DefaultOutputFormatType, FormatType->InputForm, CounterIncrements->"Graphics", StyleMenuListing->None], Cell[StyleData["Graphics", "Printout"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, ImageSize->{250, 250}, FontSize->9], Cell[StyleData["Graphics", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, ImageSize->{250, 250}, FontFamily->"Courier", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CellLabel"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontColor->RGBColor[0, 0, 1]], Cell[StyleData["CellLabel", "Printout"], FontFamily->"Courier", FontSize->8, FontSlant->"Italic", FontColor->GrayLevel[0]], Cell[StyleData["CellLabel", "EnhancedPrintout"], FontFamily->"Courier", FontSize->8, FontSlant->"Italic", FontColor->GrayLevel[0]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Inline Formatting", "Section"], Cell["\<\ These styles are for modifying individual words or letters in a \ cell exclusive of the cell tag.\ \>", "Text"], Cell[StyleData["RM"], StyleMenuListing->None, FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["BF"], StyleMenuListing->None, FontWeight->"Bold"], Cell[StyleData["IT"], StyleMenuListing->None, FontSlant->"Italic"], Cell[StyleData["TR"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["TI"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["TB"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["TBI"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["MR"], StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["MO"], StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["MB"], StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["MBO"], StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["SR"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["SO"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SB"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["SBO"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Italic"], Cell[CellGroupData[{ Cell[StyleData["SO10"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SO10", "Printout"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->7, FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SO10", "EnhancedPrintout"], StyleMenuListing->None, FontFamily->"Futura", FontSize->7, FontWeight->"Plain", FontSlant->"Italic"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Miscellaneous Styles", "Section"], Cell[CellGroupData[{ Cell[StyleData["MathCaption"], CellDingbat->"\[FilledSmallSquare]", CellMargins->{{46, 42}, {0, 14}}, PageBreakBelow->False, LineSpacing->{1, 1}, ParagraphSpacing->{0, 8}, FontColor->RGBColor[0, 0, 0.6]], Cell[StyleData["MathCaption", "Printout"], CellMargins->{{42, 42}, {0, 14}}, FontSize->10, FontColor->GrayLevel[0]], Cell[StyleData["MathCaption", "EnhancedPrintout"], CellMargins->{{42, 42}, {0, 14}}, FontFamily->"Palatino", FontSize->10, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Commentary"], CellFrame->{{2, 0}, {0, 0}}, CellMargins->{{36, 10}, {7, 7}}, PageBreakBelow->False, CellFrameMargins->8, CellFrameColor->RGBColor[0, 0.2, 1], LineSpacing->{1, 3}, ParagraphSpacing->{0, 8}, FontSlant->"Italic"], Cell[StyleData["Commentary", "Printout"], CellMargins->{{36, 0}, {6, 6}}, CellFrameColor->GrayLevel[0.8], FontSize->10], Cell[StyleData["Commentary", "EnhancedPrintout"], CellMargins->{{36, 0}, {6, 6}}, CellFrameColor->GrayLevel[0.8], FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedText"], CellMargins->{{20, 4}, {0, 4}}, LineSpacing->{1, 3}, ParagraphSpacing->{0, 4}, ParagraphIndent->-21, CounterIncrements->"Text"], Cell[StyleData["ItemizedText", "Printout"], ParagraphIndent->-18, FontSize->10], Cell[StyleData["ItemizedText", "EnhancedPrintout"], ParagraphIndent->-18, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedTextNote"], CellMargins->{{41, 4}, {0, 4}}, LineSpacing->{1, 3}, ParagraphSpacing->{0, 4}, CounterIncrements->"Text"], Cell[StyleData["ItemizedTextNote", "Printout"], CellMargins->{{38, 4}, {0, 4}}, FontSize->10], Cell[StyleData["ItemizedTextNote", "EnhancedPrintout"], CellMargins->{{38, 4}, {0, 4}}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["IndentedText"], CellMargins->{{20, 4}, {0, 6}}, LineSpacing->{1, 3}, ParagraphSpacing->{0, 8}, CounterIncrements->"Text"], Cell[StyleData["IndentedText", "Printout"], FontSize->10], Cell[StyleData["IndentedText", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Emphasis Boxes and Pictures", "Section"], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox"], CellFrame->0.5, CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.3, 0.7}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox", "Printout"], CellMargins->{{2, 4}, {0, 8}}, FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox3Col"], CellFrame->0.5, CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.2, 0.3, 0.5}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox3Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox3Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox4Col"], CellFrame->0.5, CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.15, 0.35, 0.15, 0.35}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox4Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox4Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox5Col"], CellFrame->0.5, CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->0.2, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox5Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox5Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox6Col"], CellFrame->0.5, CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.13, 0.24, 0.13, 0.13, 0.24, 0.13}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox6Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox6Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TopBox"], CellFrame->{{0.5, 0.5}, {0, 0.5}}, CellMargins->{{11, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakBelow->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["TopBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, Background->GrayLevel[1]], Cell[StyleData["TopBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, FontFamily->"Palatino", Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MiddleBox"], CellFrame->{{0.5, 0.5}, {0, 0}}, CellMargins->{{11, 4}, {0, -7}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["MiddleBox", "Printout"], CellMargins->{{2, 0}, {0, 0}}, Background->GrayLevel[1]], Cell[StyleData["MiddleBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 0}}, FontFamily->"Palatino", Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MiddleSpacedBox"], CellFrame->{{0.5, 0.5}, {0, 0}}, CellMargins->{{11, 4}, {0, -7}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}, RowMinHeight->1.2}], Cell[StyleData["MiddleSpacedBox", "Printout"], CellMargins->{{2, 0}, {0, 0}}, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}], Cell[StyleData["MiddleSpacedBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 0}}, FontFamily->"Palatino", Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["BottomBox"], CellFrame->{{0.5, 0.5}, {0.5, 0}}, CellMargins->{{11, 4}, {0, -7}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}, RowMinHeight->2}], Cell[StyleData["BottomBox", "Printout"], CellMargins->{{2, 0}, {0, 0}}, FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}], Cell[StyleData["BottomBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 0}}, FontFamily->"Palatino", Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TopSpanBox"], CellFrame->{{0.5, 0.5}, {0, 0.5}}, CellMargins->{{11, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakBelow->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.9, 0.03}, ColumnAlignments->{Left}}], Cell[StyleData["TopSpanBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->10, Background->GrayLevel[1]], Cell[StyleData["TopSpanBox", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MiddleSpanBox"], CellFrame->{{0.5, 0.5}, {0, 0}}, CellMargins->{{11, 4}, {0, 0}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[1, 0.6, 0.6], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.9, 0.03}, ColumnAlignments->{Left}, RowMinHeight->1.2}], Cell[StyleData["MiddleSpanBox", "Printout"], CellMargins->{{2, 0}, {0, 0}}, FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}], Cell[StyleData["MiddleSpanBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 0}}, FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Picture"], CellMargins->{{12, Inherited}, {0, 8}}, CellHorizontalScrolling->True], Cell[StyleData["Picture", "Printout"], CellMargins->{{2, Inherited}, {0, 8}}], Cell[StyleData["Picture", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Caption"], CellMargins->{{12, 4}, {0, 2}}, PageBreakAbove->False, FontFamily->"Helvetica", FontSize->9], Cell[StyleData["Caption", "Printout"], CellMargins->{{2, 4}, {2, 4}}, FontSize->7], Cell[StyleData["Caption", "EnhancedPrintout"], CellMargins->{{2, 4}, {2, 4}}, FontFamily->"Futura", FontSize->7] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Tables", "Section"], Cell[CellGroupData[{ Cell[StyleData["SingleRowTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnAlignments->{Left}}], Cell[StyleData["SingleRowTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["SingleRowTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["2ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->{0.34, 0.64}, ColumnAlignments->{Left, Center}}], Cell[StyleData["2ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["2ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["2ColumnEvenTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.49, ColumnAlignments->{Left, Center}}], Cell[StyleData["2ColumnEvenTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["2ColumnEvenTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["3ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->{0.28, 0.28, 0.43}, ColumnAlignments->{Left, Center}}], Cell[StyleData["3ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["3ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["4ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.25, ColumnAlignments->{Left, Center}}], Cell[StyleData["4ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["4ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["5ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.2, ColumnAlignments->{Left, Center}}], Cell[StyleData["5ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["5ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["6ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.16, ColumnAlignments->{Left, Center}}], Cell[StyleData["6ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["6ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["7ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.14, ColumnAlignments->{Left, Center}}], Cell[StyleData["7ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["7ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["8ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.12, ColumnAlignments->{Left, Center}}], Cell[StyleData["8ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["8ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Automatic Numbering", "Section"], Cell["\<\ The following styles are useful for numbered equations, figures, \ etc. They automatically give the cell a FrameLabel containing a reference to \ a particular counter, and also increment that counter.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["NumberedEquation"], CellMargins->{{45, 10}, {7, 7}}, CellFrameLabels->{{None, Cell[ TextData[ {"(", CounterBox[ "NumberedEquation"], ")"}]]}, {None, None}}, DefaultFormatType->DefaultInputFormatType, CounterIncrements->"NumberedEquation", FormatTypeAutoConvert->False], Cell[StyleData["NumberedEquation", "Printout"], CellMargins->{{39, 55}, {0, 10}}, FontSize->10], Cell[StyleData["NumberedEquation", "EnhancedPrintout"], CellMargins->{{39, 55}, {0, 10}}, FontFamily->"Palatino", FontSize->10] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Formulas and Programming", "Section"], Cell[CellGroupData[{ Cell[StyleData["DisplayFormula"], CellMargins->{{45, Inherited}, {7, 7}}, CellHorizontalScrolling->True, ScriptLevel->0, SingleLetterItalics->True, UnderoverscriptBoxOptions->{LimitsPositioning->True}], Cell[StyleData["DisplayFormula", "Printout"]], Cell[StyleData["DisplayFormula", "EnhancedPrintout"], FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DisplayMath"], CellMargins->{{45, 10}, {7, 7}}, Evaluatable->False, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, DefaultFormatType->DefaultInputFormatType, AutoItalicWords->{}, FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, CounterIncrements->"Input"], Cell[StyleData["DisplayMath", "Printout"], CellMargins->{{39, 0}, {6, 6}}, FontSize->9], Cell[StyleData["DisplayMath", "EnhancedPrintout"], CellMargins->{{39, 0}, {4, 6}}, FontFamily->"WRICourier", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["EquationNumber"], LineSpacing->{1.83, 0}], Cell[StyleData["EquationNumber", "Printout"], LineSpacing->{1.7, 0}], Cell[StyleData["EquationNumber", "EnhancedPrintout"], LineSpacing->{1.7, 0}, FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Program"], CellFrame->{{0, 0}, {0.5, 0.5}}, CellMargins->{{12, Inherited}, {7, 7}}, CellFrameMargins->{{0, 0}, {7, 5}}, FontFamily->"Courier"], Cell[StyleData["Program", "Printout"], CellMargins->{{18, 30}, {Inherited, 4}}, FontSize->9.5], Cell[StyleData["Program", "EnhancedPrintout"], CellMargins->{{18, 30}, {Inherited, 4}}, FontFamily->"WRICourier", FontSize->9.5] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Contents and Index", "Section"], Cell[CellGroupData[{ Cell[StyleData["ContentsTitle"], CellMargins->{{10, 4}, {0, 18}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->26, FontWeight->"Bold"], Cell[StyleData["ContentsTitle", "Printout"], CellMargins->{{2, 0}, {0, 18}}, PageBreakBelow->False, FontSize->18], Cell[StyleData["ContentsTitle", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 18}}, PageBreakBelow->False, FontFamily->"Futura", FontSize->18] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ContentsSection"], CellMargins->{{20, 4}, {3, 18}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["ContentsSection", "Printout"], CellMargins->{{12, 0}, {3, 18}}, PageBreakBelow->False, FontSize->11], Cell[StyleData["ContentsSection", "EnhancedPrintout"], CellMargins->{{12, 0}, {3, 18}}, PageBreakBelow->False, FontFamily->"Futura", FontSize->11] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Contents"], CellMargins->{{21, 4}, {0, 8}}, StyleMenuListing->None], Cell[StyleData["Contents", "Printout"], CellMargins->{{13, 0}, {0, 8}}], Cell[StyleData["Contents", "EnhancedPrintout"], CellMargins->{{13, 0}, {0, 8}}, FontFamily->"Palatino", FontSize->11] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Index"], CellMargins->{{21, 4}, {0, 0}}, ParagraphIndent->-48, StyleMenuListing->None], Cell[StyleData["Index", "Printout"], CellMargins->{{13, 0}, {0, 0}}, FontSize->10], Cell[StyleData["Index", "EnhancedPrintout"], CellMargins->{{13, 0}, {0, 0}}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["IndexSubentry"], CellMargins->{{36, 4}, {0, 0}}, ParagraphIndent->-48, StyleMenuListing->None], Cell[StyleData["IndexSubentry", "Printout"], CellMargins->{{24, 0}, {0, 0}}, FontSize->10], Cell[StyleData["IndexSubentry", "EnhancedPrintout"], CellMargins->{{24, 0}, {0, 0}}, FontFamily->"Palatino", FontSize->10] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Headers and Footers", "Section"], Cell[CellGroupData[{ Cell[StyleData["Header"], CellMargins->{{0, 0}, {4, 1}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->8, FontWeight->"Bold"], Cell[StyleData["Header", "Printout"]], Cell[StyleData["Header", "EnhancedPrintout"], FontFamily->"Futura"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Footer"], CellMargins->{{0, 0}, {0, 4}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->7, FontSlant->"Plain"], Cell[StyleData["Footer", "Printout"]], Cell[StyleData["Footer", "EnhancedPrintout"], FontFamily->"Futura"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PageNumber"], CellMargins->{{0, 0}, {4, 1}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->8, FontWeight->"Bold"], Cell[StyleData["PageNumber", "Printout"]], Cell[StyleData["PageNumber", "EnhancedPrintout"], FontFamily->"Futura"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Hyperlink Styles", "Section"], Cell["\<\ The cells below define styles useful for making hypertext \ ButtonBoxes. The \"Hyperlink\" style is for links within the same Notebook, \ or between Notebooks.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Hyperlink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookLocate[ #2]}]&), Active->True, ButtonNote->ButtonData}], Cell[StyleData["Hyperlink", "Printout"], FontSize->11, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["Hyperlink", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell["\<\ The following styles are for linking automatically to the on-line \ help system.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["MainBookLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "MainBook", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["MainBookLink", "Printout"], FontSize->11, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["MainBookLink", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["AddOnsLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Courier", FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "AddOns", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["AddOnsLink", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["AddOnsLink", "EnhancedPrintout"], FontFamily->"WRICourier", FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RefGuideLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Courier", FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "RefGuide", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["RefGuideLink", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["RefGuideLink", "EnhancedPrintout"], FontFamily->"WRICourier", FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["GettingStartedLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "GettingStarted", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["GettingStartedLink", "Printout"], FontSize->11, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["GettingStartedLink", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["OtherInformationLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "OtherInformation", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["OtherInformationLink", "Printout"], FontSize->11, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["OtherInformationLink", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]] }, Closed]] }, Open ]] }] ] (******************************************************************* Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. *******************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1776, 53, 77, 1, 105, "Title"], Cell[CellGroupData[{ Cell[1878, 58, 25, 0, 72, "Section"], Cell[1906, 60, 6205, 161, 868, "Text"], Cell[8114, 223, 36827, 458, 307, 36712, 454, "GraphicsData", "Bitmap", \ "Graphics", Evaluatable->False], Cell[44944, 683, 233, 11, 25, "Legend"], Cell[45180, 696, 8988, 223, 1348, "Text"], Cell[54171, 921, 197, 3, 34, "Text"], Cell[54371, 926, 19996, 601, 1838, "Text"], Cell[74370, 1529, 256, 7, 33, "Text"] }, Open ]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)