<snapdata remixID="11203630"><project name="4.5 lab" app="Snap! 7, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAD1FJREFUeF7tnQlQVdcZx/+P9fEQFUUhGBZRMCqIwQ0VxS2GqKExJq7EaGuTjjMxi4lxJtN2Ok7bcTpplrbTjrUxk2IWNaZxi7HucV+RxS0sKiAqouICggid/6H3wc1DLyBX4Pl9M2+Ud+777rt/fnPO+b7znYOlqqqqCmKiQDMpYBEAm0l5ua1SQAAUEJpVAQGwWeWXmwuAwkCzKiAANqv8cnMBUBhoVgUEwGaVX24uAAoDzaqAANis8svNBUBhoFkVqBPAI0eOICQkBK6urqZ+ubt37+Ls2bOIiYkx9T7ivOUq4ADgli1bFHyNteLMw8hb/1dU3q24r4suQSHwn74Yd+7cURCOHj26sbeUz7ViBXQA7t+/Hz4+PvV6nIMHD2LYsGG4ffu27vrTf38VY2xnde+5RT+LimNrHfyWvn0YhYWF6v0bN25g0KBB9bq3XOQ8CugAzMvLswOxbt063Lp1C+3atcPevXsRHh6OyspKNSwfPnxYDZtXr17FsmXLMH/+fPTv3x89evRAzpK5GNs2366Qa1gs3PpPRtmKtxxUu/nmARQUFKj3O3fujC5dujiPsvIk9VJAB2BWVhYuX76sPsh5YFpaGsaPH4/Nmzeje/fuIJTspQhit27dcOzYMQXe6dOnMWvWLFy8eBH5n76hA5C+PCf/uU4Ai+ftBaGn+fn5KZ9ij5YCOgAJ3c2bN2GxWBqtQtFXCzHGO7den7/4yjacP38eLEls06aNBCP1Us25LnIIQlavXq2ekENvY6yDtwe8UleAZa61Of7pz67h8ThX6Yvi4mIF4KRJkxpzO/lMK1egzjTMtm3bcOHCBTBN0hC7X89JyNheuwDbw8NDDent27dXtyktLVVAci4p9mgo4ADgzp07HygN86CyEVAOy0OGDHlQV/L5VqCAwxywQ4cO6mt/9NFHCA4OxrVr13D9+nWMHDkS7Bk7duyIhIQELF++HKNGjcLWrVvx+uuvN+mj8p4MejgvFHNuBXQAMgImbLSPP/5YpV6YJvH19VX/jhgxQkXAS5YsQd++fREVFaVSMgsXLlSgNqXxuwwcOLApXYqvFqiADkDm9a5cuaK+JpPSBG7fvn3IyclR87SePXsqADlXY8/32muvqZ5wxowZ6r2mNM5Bhw4d2pQuxVcLVEAHIOErKipSwYLVaoXNZntoX/liwXm4e1pVkML7M6coAD40+ZvtRjoACR9ftMxD2+G3+bfw8bQgo90QhHQLb/LihIL8PPgUpqHTnQIETHgLheGJdiEuXbqEuLi4ZhNGbvxwFHCYA2oAHv32nxhftAKHYt5DWGyC+jZ3ym7j4KplqKo0SM9YXBA79RWUlZejpKREfZZDuJubm/2pOGfkz+x1/b9/F6HxLyAneLwOQK41izm3Ag4AasUBKWuWIrQiFwHTF6OiokLBkv9dMvy++0CXYL6XPB2nLsCZiDEqgKGx2EBLbjPX5+XlpQIXRtZxvYIx0OsCsoPG2fOEDEIEQOeGj0+nA5DwaQAeW/svDA/2RHF0kio6CAgIwI0tn8O27gN0nPYuPLp0R+nxfXBt54eynHS0Hz8HRV8sVu/ReE1291HQ0jqETgOQQQ0jbAYaa9euRWxsLMZ6nkZml+qelkYAhw8f7vy/gUf8CXUAct5VG8CRXb1xM2YmysrK4OnpiVvbvrQDSN28Y0bj2vqlsPUdgfLzmbC4uisINQCzuo3EuXPnEBERoXpRrdSLAKampmLy5MkqpcN0S4JXJn4MfFoHYHx8/CP+63H+x3cAkNEnLXXdJyCAN558SUXDnMuV7lihAPSKHApbVJyCrf2zr+L61i/RfsIvcW3dUlTeqs4HsgfMDBuhqlxo7EU1AM+cOYMnnnhC9YBr1qzBgAEDMM47G6cCnrIrzrmhAPiIAUj4NADT1i/DiFCbAlCzO1kpCLyuLza9l0R3gqNwwTvQHnhwXZm9KI09YFhYmJoDbtq0Cb1798YEnzM46T9GByDzkGLOrYCuB2SPxBctfcOnCsDrfZPsCtw+n42Tn/0JleX6KmhHiSwYPPstFHeqWU5jD8riAxp7QM7x2CMSQv6b2O4cjncaZXfFHpPLf2LOrYADgFqFsgbgHre+agju2rUrynZ/A5/1HyhFOAyXpu+2/9+r92CUZuy1v8ch+FTIMPj7+6trCJy3t7cdQEKoGauhn/PNQ4ZfDXAEUwB0bvj4dDoACd9PAWQQsmPHDiQmJqJw/SdqDkgjYCXpu+ETNxGu3m3h4uOLK6s+RGnaLnv7yeA4FT3TGNxoKyuEjxuRNOvUqROe73ge6R1rhlwCyGIHMedWQAcgy6D4oh3f+BniQ7zwSaZV7Q1JSkoCDqxVADLwaBM7ASVHt8LiXj2s0rQIWAP0RNBQNdxyjse1Yg1AwvfTHnCSXwFSfWvSLkzbyE4554bPoQfMz8/XATgi1AtFvafaVbi5ORkBuz6tlyq+U94Be8DAwEB1PeeWTD7TCOBPe8AXO1/EsfY1Kx8EcMyYmqCkXjeVi1qdAroekADypfWABPByryn2h3osIABe+79GlUEQYnHzgHvCHBVgMP+Xl5sLr1qFDcwN1gaQqZopAYVIaVez9ksAn3qqJi3T6pSVL1wvBRy2ZWq71E5uSkZ8iBWFPSfbS+kZZJQn/wbuLg3btBSW9A5yQuPsPSBTPdxJx6oXvrhaMi2wCEd8aqqguXQnANbrd9iqL9IBmJuba98mqQH4g6UPuELCKuiKPd8guG11Lq8krToCtkUOVv93DwjF9S2fo8OUt2FxcUVJ6g+AxQWl6bvAdeG0wFgEBQWpz/A+7OG4wsIiBfa6Mx6/isNtBtvFJIBjx45t1eLKlzdWwAFADo+0U/9drnrAlLZDkZGRoXatle/62g6ggvDYDnR48U2UnjwIboPjklxR8h9gix6u1oc9u0aqwIQApj42SEXYLi4uKjXDekPNjh8/jpeCi3HQVnMyAreHPv10zdKc8aPIFa1RAR2AhE8D8PTmz1UxQkH48zh69KhaFqvc9y38zh5UuT7mAVF5F7boeJRlp6HiygVYrDbYIof+v3esgjUiBldX/8UOIPeY0FhtzTNoNBs8eDBmhlzHAa+aEnxG3gJga0SqYd9ZB6AWnXJepgF4IaJmv67tzBH4rPxdw+7APcYvzkdGl8H2TUbs3ZKTk9WxHtz8xN5wVteb2G8dYK+IJoAc9sWcWwEHALX83I9bvsDwYCvywhJVwMC13MjIyCZVg8EIy7LYI/68Wwn2evSz++fS3TPPPNOk9xNnLU8BHYCETwMwc+uXGBbkiX0eMaqixd3dXRWVavV9PC+Gu+KYYD5x4oQ6I4bBBHfV8cWlOyag1Xzy1ClwtYM5wdqnaTEASUlJUT7mhN/GHveacwIJ4Lhx41qeYvKNmlQBHYCsUuGLlrXtKwwJdMW1PjPw/vvvY86cOSp6ZY9FI4CcFzKy3bhxI/r166fgSk9PR69evRSQHNIZdPCQo+zsbEyYMEFBTNPg4/bOPXv24JUe5djt9qS9Ipq+BMAm/V23SGcOABIUDcDHb+egMCpJHZ3Gno9t7Mlo/D/fY0TLQgMGGBs2bFAbl/r06aMg5NDN6w8dOqROvuJGc87/WKbPk7Wio6PVv9aSS3ihhwd+cIm2i0QAeTKXmHMroAOQ6RBtLZg94PSK7/Fv60RYQ6JVQSmH3PsZT03gtkptb3Fd17JH5PCqFbky2Oh1aDF6JszETksf+0dYOyh7QpwbPj6dDkCeekp4GAWf3bMGU0vXgGseOyoiEBzWvcm3ZV7Iz4d/SRZC3IrhMeYNbK+qDnI4l5w9e7bzqy9P6PjXMleuXKl6sZDgYLT9cT2qbl19KDKV9Z2CS8UlCj7uB+Y+EjHnV6DO49l47AZXLXgMh9nGQ8p5L84buWtOdsKZrXjL8u8A4IOeks/9wxlff4jyrAMA7v/H2MMTZsPaq7rolNG3FB+0LDgexrfRAVj7lHzOB/nijjW+6mtt2njj7K8H4cmAmkJVHlROu5tdvWdYs6qoROTGzFU/sjCB+UatYKG+95PrWrcCDuVY2r5g7tdlOT3TKMznMVnMYZJzNA6b/Dk0NFQdZs4lM+b6Zs6cCTdXVxQsGopo/xoArUn/UCrdTv6VTq3KqERk9f6F/T1G2lKG37qBaui31wFY+5T8pUuXYtq0aSqxvH37dixYsEAdxzZv3jyVA2Q51dy5c9XRbBMnTlQ9GDeau7q4oPCP8ToAPZ/7fXUv95/39ABGPosTETPt73EFRYbhhv4KW/f1Diek1j4lv66Dygkeh0pWOzOXxzlfeXm5KihgQtrmZUX53xIR1dndUJmqflOQ8lj1iVjseVn9ou2cM/ywXOAUCjgEIQ96Sj5VCXK/gbsnttz3lHyemo8+P8P5EovaL8Izobl+LPZoKVBnGoa9GwMS9mwNtXudlF/XKfn0zR5P5n0NVdl5rq8TQOd5vMY/yapVq9RhnSwJ0wppG+9NPnkvBQTAeyjDgIgVQIz4OT9lQMb57ssvv6zbTiBoPZgCAuB99OOJEIsWLXL4C6JMQfFv43FaQTDFGq+AANgIAJlyYs6TlT1MPYk1XgEBsJ5D8PTp09UQzCodVoeLNY0CAuA9dJQgpGkAM/IiABopJO2mKiAAmiqvODdSQAA0UkjaTVVAADRVXnFupIAAaKSQtJuqgABoqrzi3EgBAdBIIWk3VQEB0FR5xbmRAgKgkULSbqoCAqCp8opzIwUEQCOFpN1UBQRAU+UV50YKCIBGCkm7qQoIgKbKK86NFBAAjRSSdlMVEABNlVecGykgABopJO2mKiAAmiqvODdSQAA0UkjaTVVAADRVXnFupIAAaKSQtJuqgABoqrzi3EgBAdBIIWk3VQEB0FR5xbmRAgKgkULSbqoCAqCp8opzIwUEQCOFpN1UBQRAU+UV50YKCIBGCkm7qQoIgKbKK86NFBAAjRSSdlMVEABNlVecGykgABopJO2mKiAAmiqvODdSQAA0UkjaTVVAADRVXnFupIAAaKSQtJuqgABoqrzi3EgBAdBIIWk3VQEB0FR5xbmRAgKgkULSbqoCAqCp8opzIwUEQCOFpN1UBQRAU+UV50YKCIBGCkm7qQoIgKbKK86NFBAAjRSSdlMVEABNlVecGykgABopJO2mKiAAmiqvODdSQAA0UkjaTVVAADRVXnFupIAAaKSQtJuqgABoqrzi3EgBAdBIIWk3VQEB0FR5xbmRAgKgkULSbqoC/wNP0rkCxWt1rwAAAABJRU5ErkJggg==</thumbnail><scenes select="1"><scene name="4.5 lab"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="all but first letter of %&apos;string&apos;" type="reporter" category="operators"><comment x="0" y="0" w="199" collapsed="false">Takes a text string as input, and reports a new text string containing all but the first character of the input.</comment><header></header><code></code><translations>pt:_ sem o primeiro caractere&#xD;ca:_ sense la primera lletra&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="string"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="all but first letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="string"/></block></block></script></block><block s="doReport"><block s="reportJoinWords"><block s="reportCDR"><block s="reportTextSplit"><custom-block s="require nonempty %s %s"><block var="string"/><l>All but first of empty word.</l></custom-block><l><option>letter</option></l></block></block></block></block></script></block-definition><block-definition s="all but first word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="223.000001" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing all but the first word, with one space between words and no spaces at the beginning or end. (Note: consider using SENTENCE➞LIST and processing the resulting list instead of doing recursion on sentences in text string form.  List operations are faster.)</comment><header></header><code></code><translations>pt:_ sem a primeira palavra&#xD;ca:_ sense la primera paraula&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>All but first of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportCDR"><block var="sentence"/></block></block></script></block></script></block><block s="doReport"><custom-block s="list $arrowRight sentence %l"><block s="reportCDR"><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>All but first of empty sentence.</l></custom-block></block></custom-block></block></script></block-definition><block-definition s="all but last letter of %&apos;string&apos;" type="reporter" category="operators"><comment x="0" y="0" w="218" collapsed="false">Takes a text string as input, and reports a new text string containing all but the last letter of the input.</comment><header></header><code></code><translations>pt:_ sem o último caractere&#xD;ca:_ sense la darrera lletra&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="string"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="all but last letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="string"/></block></block></script></block><block s="doReport"><block s="reportJoinWords"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportCDR"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportTextSplit"><custom-block s="require nonempty %s %s"><block var="string"/><l>All but first of empty word.</l></custom-block><l><option>letter</option></l></block></block></block></block></block></block></script></block-definition><block-definition s="all but last word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="211.99999999999997" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing all but the last word, with one space between words and no spaces at the beginning or end.  (Note: consider using SENTENCE-&gt;LIST and processing the resulting list instead of doing recursion on sentences in text string form.  List operations are faster.)</comment><header></header><code></code><translations>pt:_ sem a última palavra&#xD;ca:_ sense la darrera paraula&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>All but last of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportCDR"><block s="reportListAttribute"><l><option>reverse</option></l><block var="sentence"/></block></block></block></block></script></block></script></block><block s="doReport"><custom-block s="list $arrowRight sentence %l"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportCDR"><block s="reportListAttribute"><l><option>reverse</option></l><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>All but last of empty sentence.</l></custom-block></block></block></block></custom-block></block></script></block-definition><block-definition s="first word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="236" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing only the first word, with no spaces before or after it.</comment><header></header><code></code><translations>pt:a primeira palavra de _&#xD;ca:primera paraula de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIfElse"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>First of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="sentence"/></block></block></script></block></script><script><block s="doReport"><block s="reportListItem"><l>1</l><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>First of empty sentence.</l></custom-block></block></block></script></block></script></block-definition><block-definition s="last letter of %&apos;word&apos;" type="reporter" category="operators"><comment x="0" y="0" w="260" collapsed="false">Takes a text string as input, and reports the last character in the string.</comment><header></header><code></code><translations>pt:o último caractere de _&#xD;ca:primera lletra de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="last letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script></block><block s="doIf"><block s="reportEquals"><block s="reportStringSize"><block var="word"/></block><l>0</l></block><script><custom-block s="error %txt"><l>Last of empty word.</l></custom-block></script></block><block s="doReport"><block s="reportLetter"><block s="reportStringSize"><block var="word"/></block><block var="word"/></block></block></script></block-definition><block-definition s="last word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="262" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing only the last word of the input, with no spaces before or after it.</comment><header></header><code></code><translations>pt:a última palavra de _&#xD;ca:darrera paraula de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>Last of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportListItem"><l><option>last</option></l><block var="sentence"/></block></block></script></block></script></block><block s="doReport"><block s="reportListItem"><l><option>last</option></l><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>Last of empty sentence.</l></custom-block></block></block></script></block-definition><block-definition s="empty word? %&apos;word&apos;" type="predicate" category="operators"><comment x="0" y="0" w="208" collapsed="false">Takes a text string as input, and reports TRUE if the string has no characters in it of any kind, otherwise false.</comment><header></header><code></code><translations>pt:a palavra _ está vazia&#xD;ca:paraula buida? _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="empty word? %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script></block><block s="doReport"><block s="reportEquals"><block s="reportStringSize"><block var="word"/></block><l>0</l></block></block></script></block-definition><block-definition s="empty sentence? %&apos;sentence&apos;" type="predicate" category="operators"><comment x="0" y="0" w="221" collapsed="false">Takes a text string as input, and reports TRUE if the input contains no characters other than spaces (therefore, no words when the string is considered as a sentence), otherwise FALSE.</comment><header></header><code></code><translations>pt:a frase _ está vazia&#xD;ca:frase buida? _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportListIsEmpty"><block var="sentence"/></block></block></script></block><block s="doReport"><block s="reportListIsEmpty"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block></block></block></script></block-definition><block-definition s="join words %&apos;words&apos;" type="reporter" category="operators"><comment x="0" y="0" w="230.66666666666666" collapsed="false">Like JOIN, takes any number of words (text strings) and reports a sentence with its inputs concatenated, but inserts a blank space between the inputs.&#xD;Consider using SENTENCE (Lists palette) instead.</comment><header></header><code></code><translations>de:füge Wörter zusammen _&#xD;ca:uneix les paraules _&#xD;es:unir las palabras _&#xD;fr:fusionne les mots _&#xD;pt:uma frase com as palavras _&#xD;</translations><inputs><input type="%mult%txt"></input></inputs><script><block s="doIf"><block s="reportListIsEmpty"><block var="words"/></block><script><block s="doReport"><l></l></block></script></block><block s="doDeclareVariables"><list><l>first</l><l>bf</l></list></block><block s="doSetVar"><l>first</l><block s="reportIfElse"><block s="reportIsA"><block s="reportListItem"><l>1</l><block var="words"/></block><l><option>list</option></l></block><custom-block s="join words %mult%txt"><block s="reportListItem"><l>1</l><block var="words"/></block></custom-block><block s="reportListItem"><l>1</l><block var="words"/></block></block></block><block s="doSetVar"><l>bf</l><custom-block s="join words %mult%txt"><block s="reportCDR"><block var="words"/></block></custom-block></block><block s="doIf"><custom-block s="empty sentence? %txt"><block var="bf"/></custom-block><script><block s="doReport"><block var="first"/></block></script></block><block s="doIf"><custom-block s="empty sentence? %txt"><block var="first"/></custom-block><script><block s="doReport"><block var="bf"/></block></script></block><block s="doReport"><block s="reportJoinWords"><list><block var="first"/><l> </l><block var="bf"/></list></block></block></script></block-definition><block-definition s="list $arrowRight sentence %&apos;data&apos;" type="reporter" category="operators"><comment x="0" y="0" w="165.33333333333334" collapsed="false">Takes a sentence in list form and reports the sentence as a text string.</comment><header></header><code></code><translations>de:Liste $arrowRight Satz _&#xD;ca:llista $arrowRight frase _&#xD;es:lista $arrowRight frase _&#xD;fr:liste $arrowRight phrase _&#xD;pt:uma frase com as palavras em _&#xD;</translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><custom-block s="join words %mult%txt"><block var="data"/></custom-block></block></script></block-definition><block-definition s="sentence $arrowRight list %&apos;text&apos;" type="reporter" category="operators"><comment x="0" y="0" w="196" collapsed="false">Takes a sentence in text string form and reports the sentence as a list of its words.</comment><header></header><code></code><translations>de:Satz $arrowRight Liste _&#xD;ca:frase $arrowRight llista _&#xD;es:frase $arrowRight lista _&#xD;fr:phrase $arrowRight liste _&#xD;pt:uma lista com as palavras da frase _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doReport"><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportNot"><block s="reportEquals"><block s="reportStringSize"><l></l></block><l>0</l></block></block></autolambda><list></list></block><block s="reportTextSplit"><block var="text"/><l><option>word</option></l></block></block></block></script></block-definition><block-definition s="word $arrowRight list %&apos;word&apos;" type="reporter" category="operators"><comment x="0" y="0" w="146.42857142857144" collapsed="false">report a list in which each item is one letter from the input word</comment><header></header><code></code><translations>de:Wort $arrowRight Liste _&#xD;ca:paraula $arrowRight llista _&#xD;es:palabra $arrowRight lista _&#xD;fr:mot $arrowRight liste _&#xD;pt:uma lista com os caracteres da palavra _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="word $arrowRight list %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script></block><block s="doReport"><block s="reportTextSplit"><block var="word"/><l><option>letter</option></l></block></block></script></block-definition><block-definition s="list $arrowRight word %&apos;list&apos;" type="reporter" category="operators"><comment x="0" y="0" w="158.57142857142858" collapsed="false">join all the items of the input list&#xD;into a single word, and report it</comment><header></header><code></code><translations>de:Liste $arrowRight Wort _&#xD;ca:llista $arrowRight paraula _&#xD;es:lista $arrowRight palabra _&#xD;fr:liste $arrowRight mot _&#xD;pt:uma palavra com os caracteres em _&#xD;</translations><inputs><input type="%l"></input></inputs><script><block s="doIf"><block s="reportListIsEmpty"><block var="list"/></block><script><block s="doReport"><block var="list"/></block></script></block><block s="doIf"><block s="reportEquals"><block s="reportFindFirst"><block s="reifyPredicate"><autolambda><block s="reportIsA"><l></l><l><option>list</option></l></block></autolambda><list></list></block><block var="list"/></block><l></l></block><script><block s="doReport"><block s="reportJoinWords"><block var="list"/></block></block></script></block><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportIfElse"><block s="reportIsA"><l></l><l><option>list</option></l></block><block s="reportNewList"><list><custom-block s="list $arrowRight word %l"><l/></custom-block></list></block><l></l></block></autolambda><list></list></block><block var="list"/></block></block></script></block-definition><block-definition s="sentence %&apos;phrase&apos;" type="reporter" category="lists"><comment x="0" y="0" w="302.6666666666667" collapsed="false">SENTENCE is the main constructor for sentences, represented&#xD;as lists of words.  It takes zero or more inputs, each of which can&#xD;be either a list or a text string.  If a list, the input is assumed to be&#xD;a list of words.  If a text string, it is converted to a list of words using&#xD;SENTENCE→LIST.  Then all the lists of words are appended to form a new list of words.&#xD;&#xD;If the inputs are lists of lists rather than lists of words, SENTENCE,&#xD;like APPEND, does only one level of flattening, reporting a list of&#xD;all the items of all the input lists.</comment><header></header><code></code><translations>ca:frase _&#xD;</translations><inputs><input type="%mult%s"></input></inputs><script><block s="doReport"><block s="reportConcatenatedLists"><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportIfElse"><block s="reportIsA"><l></l><l><option>list</option></l></block><l></l><custom-block s="sentence $arrowRight list %txt"><l></l></custom-block></block></autolambda><list></list></block><block var="phrase"/></block></block></block></script></block-definition><block-definition s="error %&apos;msg&apos;" type="command" category="control"><header></header><code></code><translations>pt:lança o erro _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doApplyExtension"><l>err_error(msg)</l><list><block var="msg"/></list></block></script></block-definition><block-definition s="printable %&apos;data&apos;" type="reporter" category="lists"><comment x="0" y="0" w="188.66666666666666" collapsed="false">Takes a (possibly deep) list as input,&#xD;and reports a human-readable text form &#xD;of the list (namely, Lisp notation).</comment><header></header><code></code><translations>ca:notació textual de _&#xD;</translations><inputs><input type="%l"></input></inputs><script><block s="doIf"><block s="reportNot"><block s="reportIsA"><block var="data"/><l><option>list</option></l></block></block><script><block s="doReport"><block var="data"/></block></script></block><block s="doIf"><block s="reportListIsEmpty"><block var="data"/></block><script><block s="doReport"><l>()</l></block></script></block><block s="doReport"><block s="reportJoinWords"><list><l>(</l><block s="reportCombine"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="printable %l"><l/></custom-block></autolambda><list></list></block><block var="data"/></block><block s="reifyReporter"><autolambda><block s="reportJoinWords"><list><l></l><l> </l><l></l></list></block></autolambda><list></list></block></block><l>)</l></list></block></block></script></block-definition><block-definition s="require nonempty %&apos;text&apos; %&apos;message&apos;" type="reporter" category="operators" helper="true"><comment x="0" y="0" w="220" collapsed="false">Helper function for word/sentence library.&#xD;Reports its first input, unless that input is empty, in which case it gives its second input as an error message.</comment><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doIfElse"><block s="reportIfElse"><block s="reportIsA"><block var="text"/><l><option>list</option></l></block><block s="reportListIsEmpty"><block var="text"/></block><block s="reportEquals"><block s="reportStringSize"><block var="text"/></block><l>0</l></block></block><script><custom-block s="error %txt"><block var="message"/></custom-block></script><script><block s="doReport"><block var="text"/></block></script></block></script></block-definition><block-definition s="first letter of %&apos;word&apos;" type="reporter" category="operators"><comment x="0" y="0" w="260" collapsed="false">Takes a text string as input, and reports the first character in the string.</comment><header></header><code></code><translations>pt:a primeira palavra de _&#xD;ca:primera lletra de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIfElse"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="first letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script><script><block s="doReport"><block s="reportLetter"><l>1</l><custom-block s="require nonempty %s %s"><block var="word"/><l>First of empty word.</l></custom-block></block></block></script></block></script></block-definition><block-definition s="%&apos;LIST&apos; contains %&apos;ITEM&apos;" type="reporter" category="variables"><header></header><code></code><translations></translations><inputs><input type="%l"></input><input type="%s"></input></inputs><script><block s="doSetVar"><l>h</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><block s="doForEach"><l>item</l><block var="LIST"/><script><block s="doIf"><block s="reportEquals"><block var="item"/><block var="ITEM"/></block><script><block s="doSetVar"><l>h</l><block s="reportBoolean"><l><bool>true</bool></l></block></block></script></block></script></block><block s="doReport"><block var="h"/></block></script></block-definition><block-definition s="index %&apos;number&apos; of %&apos;list&apos;" type="reporter" category="variables"><header></header><code></code><translations></translations><inputs><input type="%n"></input><input type="%l"></input></inputs><script><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="list"/></block><script><block s="doIf"><block s="reportEquals"><block var="number"/><block s="reportListItem"><block var="i"/><block var="list"/></block></block><script><block s="doReport"><block var="i"/></block></script></block></script></block><block s="doReport"><l>-1</l></block></script></block-definition><block-definition s="First EWORD of %&apos;list&apos;" type="reporter" category="variables"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doForEach"><l>item</l><block var="list"/><script><block s="doIf"><block s="reportEquals"><block s="reportLetter"><l>1</l><block var="item"/></block><l>e</l></block><script><block s="doReport"><block var="item"/></block></script></block></script></block><block s="doReport"><l></l></block></script></block-definition><block-definition s="Names" type="reporter" category="variables"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><l></l></block></script></block-definition></blocks><stage name="Stage" width="480" height="360" costume="0" color="255,255,255,1" tempo="60" threadsafe="false" penlog="false" volume="100" pan="0" lines="round" ternary="false" hyperops="true" codify="false" inheritance="true" sublistIDs="false" id="712"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAAAXNSR0IArs4c6QAADoVJREFUeF7t1cEJAAAIxDDdf2m3sJ+4wEEQuuMIECBAgACBd4F9XzRIgAABAgQIjAB7AgIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECByxcQFpoRMBzwAAAABJRU5ErkJggg==</pentrails><costumes><list struct="atomic" id="713"></list></costumes><sounds><list struct="atomic" id="714"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="0" y="0" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="80,80,80,1" pen="tip" id="719"><costumes><list struct="atomic" id="720"></list></costumes><sounds><list struct="atomic" id="721"></list></sounds><blocks></blocks><variables></variables><scripts><script x="10" y="100.6"><block s="receiveKey"><l><option>space</option></l><list></list></block><block s="doIf"><block s="reportLessThan"><block var="counter"/><block s="reportListAttribute"><l><option>length</option></l><block var="Names"/></block></block><script><block s="doSayFor"><block s="reportListItem"><block var="counter"/><block var="Names"/></block><l>2</l></block><block s="doSetVar"><l>counter</l><block s="reportSum"><block var="counter"/><l>2</l></block></block></script></block></script><script x="119" y="318.6"><block s="receiveKey"><l><option>0</option></l><list></list></block><block s="doIf"><block s="reportGreaterThan"><block var="Reverse"/><l>0</l></block><script><block s="doSayFor"><block s="reportListItem"><block var="Reverse"/><block var="Names"/></block><l>2</l></block><block s="doSetVar"><l>Reverse</l><block s="reportDifference"><block var="Reverse"/><l>1</l></block></block></script></block></script><script x="208" y="10"><block s="receiveGo"></block><block s="doSetVar"><l>Names</l><block s="reportNewList"><list><l>Bob</l><l>Jeff</l><l>Francis</l><l>John</l><l>Sally</l><l>Edward</l></list></block></block><block s="doSetVar"><l>counter</l><l>1</l></block><block s="doSetVar"><l>Reverse</l><block s="reportListAttribute"><l><option>length</option></l><block var="Names"/></block></block></script></scripts></sprite><watcher var="h" style="normal" x="10" y="10" color="243,118,29" hidden="true"/><watcher var="counter" style="normal" x="10" y="34.000001999999995" color="243,118,29"/><watcher var="Names" style="normal" x="10" y="55.00000399999999" color="243,118,29" extX="80" extY="70"/><watcher var="Reverse" style="normal" x="10" y="148.00000599999998" color="243,118,29"/></sprites></stage><variables><variable name="h"><bool>false</bool></variable><variable name="counter"><l>1</l></variable><variable name="Names"><list struct="atomic" id="801">Bob,Jeff,Francis,John,Sally,Edward</list></variable><variable name="Reverse"><l>0</l></variable></variables></scene></scenes></project><media name="4.5 lab" app="Snap! 7, https://snap.berkeley.edu" version="2"></media></snapdata>