<snapdata remixID="12188222"><project name="lab 4.5 Logan and Hunter" app="Snap! 7, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAADztJREFUeF7tXQl4jVcafm+Wm00SYksMQUjsjLWqlg4xo0VRDGobpo/H2CqoWkLHLpaOmUfbDJ0gVVukdjKx1wzVsYyEqpDY1SBpEpUgi3m+o//fnOTG/anc/Pf+3/c8feLee+5/vu/93p7/nnO+8/6mJ0+ePAEbI1BKCJiYgKWEPHcrEGACMhFKFQGLBDx9+jQOHz4MujubTCab/a1YsSLefPNNlCtXrlRB4c5th0ARAu7fvx/BwcG288BCT2fOnEH37t1L1Qfu3DYISAQ8efIkypcvL3o+ceIEQkNDkZubi/v376Nr167YvXu3bbwCUKNGDZv1xR2VHgISAZcsWYLevXsLb4iMP/zwA6pVq4aJEyfC2dkZ27Zts5mnNWvWtFlf3FHpISARcNGiRSoBySU/Pz/k5OSgUqVKuHPnDvLy8pCVlWUTb2vVqmWTfriT0kVAImBERIREwNJ0rXbt2qXZPfdtIwQkAi5YsEAloIfZBXlL28PD1YT/eLaCu6sLEn1av9RZsWd6CnpkbhGh+jT+Ha63mayGHRISYiMIuJvSREAi4Pz581UCPrqfhqCYfjjSeDrqt+0ifDSbgOgeDeBssu7yu3uScO1/93Dr1i3RuF69etKXvv/+e5w7d05MdLw/7QgzcnFzWLzapk6dOtY74RZ2j4BEwLlz56oEzHmQjptbF6PGwHno06cPdu7ciVkjBmKax3eagvYLW4lrvjXh6+sr2js5OUnfo+UexSrkpyE05WNcHxqnvleYsJo65UZ2h4BEwDlz5giy0QJ0blYGYnfEYejQoWJNbseOHfjziIEI97ygBulerxWcXD2QlXC4SOB+YStw1acmypYtKz4rvKB94MAB9TsdO3ZE5ZUdcW3IHrVd/fr17Q5Mdvj5EZAIOHv2bHUEzMvOxO59h8X6X5MmTXD16lVMH9YX4Z5Jai/manXg3f5tpH6xoEjP5YiA3jUQGBgIb29v3LhxQ2pTmIAB/wjF1cE/rzM2aNDg+aPhb9gdAhIBZ82apRIw/+F97Iw/KEZExeaNGY7p7t9qCtJ/4T9x4cHTpRwyWsJRtvbodWECVonqjCuDdqnXbtiwoaZ+uJF9IyAR8MMPP/x5GebxA2yP26/ekilMFxcXBAUFiUVpa5aSkoJHjx6pt9TC7R8/foyHDx/i5s2bYoJSbU0XpLyzQ23WuHFja13w5w6AgETAmTNnqgQ05WRh25590rrgwZjP0fabSE1h11x2EOfTHqFChQqiPZGxoHl5eeH27dsYMmQItmzZgsDoN5A8YLvahG77bI6PgETA8PBwlXDOeQ+xZVe8eE2jUUJCAhaNf1f6DUjwhGxPQ9JbT2+zBc33vUhc9goEVbiQZWdnS5/T70KFgLGxsaixtisu9tuqtmnatKnjo88RyvWA06dPVwnokv9IzILd3NxA71OFypIJIyQCulSsCnNALYuzYJ9xnwoC0jYe2YMHDyS46bq0rde/f3/ExMQgaF13JP3+6aI0WbNmzTg9BkBAGgGnTp2qEtCMHMRs2y3dgj+aNLLQCGhCyPZUiyMgETDZoyr8/f0FjFRRU9Co5o9GwMGDB2PTpk2ovaEHvusTqzZp0aKFAeDnECUCTpkyRZ10uJlysWnrLomAy8PD8IFzgibU/JccQOLdB+osmCYcBY1mx8oteMOGDQje2BPne29WJy0tW7bU1A83sm8EJAJOnjxZXXZxd8rD+tjtKiFpIbl69eq4efkSipxionNNJnl/zuTqjpzc3GL3jl1dXcUs+Pr166L2r+7m3jjXa5NoT9aqVSv7Rpa914SARMD3339fJZynyxOs27xNGgHXLpmN0dn/1nThSgv2IDHtMapUqSLap6WlSd87cuSI+rpdu3aoF9sHZ3tuVAnbunVrTf1wI/tGQCLgpEmTVMJ5uQKfb/wS9FtswIABOHbsGJZPG4cZXhfViGkrzuwfhMyDG4qg4D3mYyS5VUHVqlXFZ/fu3ZMWoqm+8MKFCyDy0QJ1w639kNjj5+u8+uqr9o0se68JAYmAVPmsVESXMZsQvSFWbKPVrVtXLMXMH/MHiYDUg2fjDhZnwWWIgOYA0NriqlWrREErmbInrHinvG60rT8S3lqvOt2mTRtNAXAj+0ZAImBYWJhKQB93Z6xeFyPdgiNnTihCwOLCLzN6OS6YA8ReMBlNOJ5lTXa8g/92+0Jt0rZtW/tGlr3XhIBEwPHjx6uE8/VwQdTajdIkpLKfL55M6aDpwhUiE5CQdAm05SZGSk9P6Xjn6tWrERUVBfotSLfgprsG4XTXtdLvQk0dcSO7RkAi4Lhx41QClvMy47Po9eI17VRQcUBJFInSDPjKlStovmcITr4RrYLZoYM2ots1+uy8vBMyduxYdcTzK+OGlWvWiWKBxYsXC6hoyUSxs2fPClJqsczMTPTs2VOqgKHvEfnmzZuHgQMHokXcUJzoskb9jfj6669ruTS3sXMEpBFw9OjRKgEr+Hgg+YuZiL5SBlu3bsXSpUtFXaCyTkcEpJkxFY7SPq+HhweGDx8uZrs0YaGtNyIe3YJXrlwpdjyIzMr36dglHQGYNm0aLl++jFbxw/DNb1epBKQiVTbHR0Ai4KhRo1QCVvT1xPnocGy47gM6L0xGRFGMznPk5+eDlm6oXP/o0aNiNEtMTMT69etB16KyLXqdkZEBOnFHhCOjki46AEVbf/S3eTVvDMqKxfHOUSoBO3Xq5Pjoc4TyLZgI9MorrwhYKpX1EoeS1pUbjD3HvwVtjVnbn6W1OzpHTKoKzzIqPqBtv4ULF4q/Zf8eCjenfBzr9Jk6QtJhJTbHR0AaAWmphEYsMj9vd9TZMlD8e1d2MFwAxGUHqQSh9wtWOL/I60DndIz3+fonlE04FvqZ+Hd6ejr69u3r+OhzhEXl2SIjI6HIYrRs2QJ+5YrW+pUEbhcvXQJVURP5SCGLFsDZHB+BYuXZDh069ItHOEsjZKNGjcRZYEumTFAcH3aOUEGgCAHj4uLwPLIYVQICsKZvIMwaTqu/FXVeTEjInqcPTpfjIiAR8Pjx4+LW9zzClPfv3kTDPe9qQsh9XgqSkpLE9UkEc9CgQZq+x40cFwGJgDNmzFB3QmjtrnPnzti7d68ox6c1PR8fH0EeKrGixWNaSH6YfqcIActEXMOPHzzdAy5oREBaPySj9UGu+XNcYmmNTCLgsmXLULAMighJpfRUOEpClWR0vve1114Ti8s0YuZnZ6BRoRHQpdnbom3uqS8lP9zmJuPUqVPivbt376Jbt25a/eR2DoqAREAqmVJukZq1oR/dx6/3jtQET960RLHMQ6MojaykxMBmbASKTEJWrFiB5xWHbN68Gcr6PtWAKc4yMjNw4sRJ8TEJoDP5jE08Jfpil2FYJZ8JYgsEihCQVfJtATv3YXEE1KKST3JtVPlCOyYlaaySX5Lo6ufa0gioRSWfTrdRdbO7u3uJRsEq+SUKr24uLhHQmkq+QjpaD0xOTi7RIJ53IlSizvDFSwwBiYCskl9iOPOFi0FAIiCr5DNPbI2AREBrKvnl/fyQfP6sJmmO8v6/Qv4zHkVMKvm02E3iRaySb+u066c/iYCWVPLr/nGp6u1fp76HUVn/0uR9QEQ8LmY7FauST6r5VABLJf0TB3dnlXxNqDpeI4mAllTy+/XrBzrDO3LkyCIq+c+Cw5pKPsn9KupY9BBEVsl3PHJpiUgioCWVfDoXvHz5cowZMwZz/jRY6AOSJkxgRByyzhxGWswyeDRqg9R1C+HZqB2yEr4S/Soq+RMmTBDSHHSAqaCZzWZRkEBVNXSoiVXytaTL8dpIBLSmkj931BBJoLLy2L8h++xRgUrmoY0yAcevwBXv6sWq5BMB6WmcpJBKzyBhlXzHI5eWiCQCWlPJ93J1xsMJ2mTT/KO+xaVrtwTJyBSZNsUpWsxWFFLpMbCskq8lXY7XRiKgNZX8sl6e+LxnQ03Pihu+6zySb9xGamqqQE0RKVIgZJV8xyPTi0QkEdCSSj4VjdKZYFLJXxw2AtM1PivOmkq+IlpOT2AidQVWyX+R9Nn/dyQCWlLJp0kIzY5pjZAmIdH7vsbdqJmoMCQceRmpcCkfgNSNi+EbSmeITcjYt1Y8usuaSj6VeylGQkSskm//ZHqRCCQCWlLJp+KDTz75RBwiIpX8yKURop8bM3ohaNU5PL6RBHPVEORnZcLJ0xspw54KFikq+cHBweKgE6mhFrTCBNSbSj6pQJBeIs3S2UoOAYmA1lTyl30wVvOz4ioviMPZ9Bz1MQ10qKmgffXV0+Uasvbt2+tSJb9Xr16qj3RofvPmzaD/odheHgISAa2p5JPYEB0s1/KsOBIvItWs4s6WFBYp16tKfkESKrDTLg49eozWL9l+GQISAa2p5B/fvRntvlmhqccaHx1Awp0f7V4lnwmoKd0v3EgioCWV/JCQEDFLpa2zwir5BXut/peDuBr2G/UtR1DJL3wLJlUvwoPt5SEgEdCSSn6XLl2k3z3FqdwrLhX3OYkOxcfHi1sy/Y5SniGnV5V8noS8PJI960oSAS2p5FMxgjWjbTU6sE7/PcsKznzpcHtBY5V8ayg75ucSAYtTyaflGeU5Hy8KA5V6URk/jXj0DBBWyX9RJB3rexIBWSXfsZJrD9FIBGSVfHtImWP5KBGQVfIdK7n2EI1EQFbJt4eUOZaPEgFZJd+xkmsP0UgEZJV8e0iZY/lYRJyIVfIdK8F6j8aiPBs5TSKStjZWybc14qXfX7EELH3X2AMjIMAENEKWdRwjE1DHyTGCa0xAI2RZxzEyAXWcHCO4xgQ0QpZ1HCMTUMfJMYJrTEAjZFnHMTIBdZwcI7jGBDRClnUcIxNQx8kxgmtMQCNkWccxMgF1nBwjuMYENEKWdRwjE1DHyTGCa0xAI2RZxzEyAXWcHCO4xgQ0QpZ1HCMTUMfJMYJrTEAjZFnHMTIBdZwcI7jGBDRClnUcIxNQx8kxgmtMQCNkWccxMgF1nBwjuMYENEKWdRwjE1DHyTGCa0xAI2RZxzEyAXWcHCO4xgQ0QpZ1HCMTUMfJMYJrTEAjZFnHMTIBdZwcI7jGBDRClnUcIxNQx8kxgmtMQCNkWccxMgF1nBwjuMYENEKWdRwjE1DHyTGCa0xAI2RZxzEyAXWcHCO4xgQ0QpZ1HCMTUMfJMYJrTEAjZFnHMTIBdZwcI7jGBDRClnUcIxNQx8kxgmv/B1UImyAe1nESAAAAAElFTkSuQmCC</thumbnail><scenes select="1"><scene name="lab 4.5 Logan and Hunter"><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="index of" type="reporter" category="control"><header></header><code></code><translations></translations><inputs></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 s="reportListItem"><block var="i"/><block var="list"/></block><block var="value"/></block><script><block s="doReport"><block var="i"/></block></script></block></script></block><block s="doReport"><l>-1</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="661"><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="662"></list></costumes><sounds><list struct="atomic" id="663"></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="668"><costumes><list struct="atomic" id="669"></list></costumes><sounds><list struct="atomic" id="670"></list></sounds><blocks></blocks><variables></variables><scripts><script x="57.3583984375" y="16.333333333333343"><block s="receiveGo"></block><block s="bubble"><l>press 1 to change value. Press 2 to change list 1 (numbers). Press 3 for list 2(names, words). press 4 for to see if the list contains the value and where. press space for first letter with E.</l></block></script><script x="694" y="131.33333333333334"><block s="receiveKey"><l><option>3</option></l><list></list></block><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="list 2"/></block><script><block s="doAsk"><l>put in item</l></block><block s="doReplaceInList"><block var="i"/><block var="list 2"/><block s="getLastAnswer"></block></block></script></block></script><script x="246.3583984375" y="395.33333333333337"><block s="receiveKey"><l><option>4</option></l><list></list></block><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 s="reportListItem"><block var="i"/><block var="list"/></block><block var="value"/></block><script><block s="doSayFor"><block s="reportBoolean"><l><bool>true</bool></l></block><l>2</l></block><block s="doSayFor"><custom-block s="index of"></custom-block><l>2</l></block><block s="doStopThis"><l><option>all</option></l></block></script></block></script></block><block s="doSayFor"><block s="reportBoolean"><l><bool>false</bool></l></block><l>2</l></block></script><script x="49" y="220.33333333333337"><block s="receiveKey"><l><option>1</option></l><list></list></block><block s="doAsk"><l>what should the value be?</l></block><block s="doSetVar"><l>value</l><block s="getLastAnswer"></block></block></script><script x="368" y="137.33333333333337"><block s="receiveKey"><l><option>2</option></l><list></list></block><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="list"/></block><script><block s="doAsk"><l>put in item</l></block><block s="doReplaceInList"><block var="i"/><block var="list"/><block s="getLastAnswer"></block></block></script></block></script><script x="654" y="312"><block s="receiveKey"><l><option>space</option></l><list></list></block><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="list 2"/></block><script><block s="doIf"><block s="reportEquals"><block s="reportLetter"><l>1</l><block s="reportListItem"><block var="i"/><block var="list 2"/></block></block><l>E</l></block><script><block s="doSayFor"><block s="reportListItem"><block var="i"/><block var="list 2"/></block><l>2</l></block></script></block></script></block></script></scripts></sprite><watcher var="list" style="normal" x="10" y="10" color="243,118,29" extX="80" extY="70"/><watcher var="value" style="normal" x="10" y="103.000002" color="243,118,29"/><watcher var="list 2" style="normal" x="10" y="124.00000399999999" color="243,118,29" extX="80" extY="70"/></sprites></stage><variables><variable name="list"><list struct="atomic" id="802">2,6,9,5,9</list></variable><variable name="value"><l>5</l></variable><variable name="list 2"><list struct="atomic" id="803">egg,fence,cat,dog,everything</list></variable></variables></scene></scenes></project><media name="lab 4.5 Logan and Hunter" app="Snap! 7, https://snap.berkeley.edu" version="2"></media></snapdata>