<snapdata remixID="14918885"><project name="4-5" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAANu0lEQVR4AeydfWxV5R3Hv7f0hVagQFsoLbBWyou2hWhBMymKhNGFoDMGZGCY/jE2wpiyBBXj/jCLC1ncVAJY0cUtywYGBYdDTRzBEeVFAXlrXbFFXqS8FKQtLbSFQne+P3nuzr3tLZfe3nra50f6O8/LOc/b9/fJc+455zmHmBb9pwp8jwrEwPXvwoUL+Pzzz7Fz507s2LGjy0K2ybZdXdGoJQr4ASR0x44dQ3p6OjIyMpCZmdllIds8evSoQG+J7jrM6woIgGVlZRg8eDD69euHa9euwZmR2wxffvllxMfHt9rPGWzjxo2IjY2Vclu3bkVcXFyr40LVy3y2PWTIEBw6dOh61zSwQQEBcODAgfD5fALMK6+8gtWrV+ONN96QU/CyZcuwatUqLF++XADbtGkTnnvuOcybNw/FxcUYNGiQ6FRSUiJlHn/8cezZswe9e/eW+riTgIUT8pj+/fszULNEAQHQzFYE5e6778bUqVNRWFiIAQMGSJzpmTNnSl5KSgpmzZqF559/Hvfccw8aGhrAmYvHjB8/HkuXLsW0adMEPtZ3s8YZ1hLtdZiOAgKgE/qBIYBZWVkYPXo0cnJyUFBQICEhy8/Px7hx48AwOzsbeXl5qK2tFQB53G233YZRo0ZhzJgxqKmp8dd5MxCyL11i2ognFBAA3YDUVJ3EwVcXYu+Lc7vEqt56Fr169QqA1RPKaCe6RAEBkC0ZCP+7dSOmxJQiNyMZqTN/h4Kn12DCs+s61cY+8WcMnb4I+akxyKvdgb59+/oBZF/U7FFAADTwmfBU/FBcfmAZsnJGA74YVO7fiX/PzsPmR3Lbt9m5QPlu8PTLUzOtsbFR4HJfXccn9cXg/EKcnrgU/GfaNSHz1OxQQADkUAOcnzkOfZMH4IsvvhB4ks5UYFJaLAoHxfntR1Mm++P+/LQ43FJVjsuXLyMpKUmsqalJbs2wfjeETA8bnY+vE3LAf0zTGFezRwEBkI53W3LKIBxzbkrzIoT5bcmRMueZtrIlj2W2b9+OkydPCsBMh7LzvVJaHSOV6MYKBQRAjtQAInG0YNiwYTKTMZ95wdZQsi04y59mmSlTpuDWW2+VPKZDmtMWDzL7GVeLqgKeqlwANM43IZlgPDk5WWanS3W1rTr97do/tMpjRnNzMwPU1dWJsZ6bNalAN1YoIABypAYSE+fvNRrzR817CicW/BWHHyu+oTUUzgGfZsTExIDG34KsxxjrM3GGhN20yX2Mq9mjgABIxweYQ4VJE5J961YjZeVjGP6XBTe03p+sQXV1tVx4sGx9fb3Mou76TFxCV1uSbmmxR30dKQRA6hDgfIeBvXv34rXXXpNnuqnxPiTG+hAX83/L+PkLAWn/vuuLEPh4j2bqDRU6/LF5P6SS0I01CgiAreBwqOBjNj5S475gNRKycpGQnRecHZDmVfDZs2f9YLGecC2gIk30aAUEQI7QwMG4wx8OHjzoX+kiea5N09FSfPvWi66cwCjr4kKFtLQ02cF0SGNjzlFmvxPVP4sUEACN8/2hAwUXHHBhAX/DNacNhy8hMUCWhtLtAWlJxMbhatY4ebZrroLNc17+HmT9waHTVKtZUurSjRUKCIAcKeGgueMGlrjB2agv+hWaH1rSvs14ElVNLQLgpUuXQGN9pp42QxLoHMS2aU5U/yxSQACk491GJvg47bPPPpPZqfHAf3DLe39E7D9vbENOHQCf/3KFNY31uOsOjrOtVnkWOcD2oQqAFMFAIHGHioqKChw4cACJiYlIcK5+me+2/g/8ErwYcee1FTf1hgydtljO7GdczR4FBEDjfIYydOc2zMWLF2WZVEJCgmQFb+IzRoAXI8H5TLMeLmTg/UDGb8ZYXs0eBQRADjcYkjvuuAMLFy5EqNcl67ZtZLE2jXXdeeedsqSfB7T528+54cz86xOgnOpZjsYyanYoIADS6cY47BaHCsJx+vRpcDlVy5gfYsDsp5Ay5xm/JeUX+uMmf+BPn0bVsALwBnRlZSVoN7oKZlumbYZsv+eZjiiUAgIgd9L5xhz+AmakhvNVeG/lMmxc/kK79t6K3yOu/hyuXr0qp2+udCbIpt62QrbVqn1mqFmhgADoBoOjNrPSl19+KSAmVR0OWJBqFqP+5MnfBi5KTYvDgOpjAiDf86VxdYy7/hvF2b6aPQoIgByuGwzOSnwSwjfgmM/9buMpt/+MXyAmsQ/6FD7k3iVxluGjuHAWpBJ2FmIZY0yr2aGAAGgcz5DDJhR8NZMQ8hTKPLdxMWrjoV1IHHsvmo6UuHdJnPWYBamM01hPWyFhZ74xqUA31iggAHK0BgAT8v7fiBEj5BRcV1vNQ/zGxaiN5XtxfPF9uFJZ4c9nhDeeGZpHcawvFHySTwKdAjzOmJPUP0sUEACN4xnKuJ37gIwb+8EjT4S9ILW64CH5fsz58+dB4/diTD1theTPnS/t66bHKHCjgQiAPMgNAU/B7vRX//pb2AtSk3e/K7du+L0Z2pUrV2QWddcXECeBTgfceU5S/yxRQABs5XxnBly/fj32798v8AQvSM16YQOSho1Ezqs7Wi1K7e08OWF9vBdIY/xmzBLddZjXFRAAGQ+AxJmVsrOzZWk9b6Vwv9uunDqCPuOn4dqlujafB7MuXgWHsyDVaUqqZhljkqEbKxQQAI3jGXLUDPlCEV+r5IUC89xW98m7uLD1bdTv3ITmmir3Ln/cLEhlXawjlAWf7v0VaMQKBQRAjpSgGOOslJubK1+94mc2LvZLD1iQytswV2vOonrDCjBkebHYODRm3i5RLkSg+Xw+OY2buoNDtsUC7nym1exQQAAMdn7wrNSUlo0TC/+Oyt+sb99+/Ra+utpHXsc0t2Eoo7v+ffv24f7778fixYu/A9Mh0L2fx6vZo4AAyOEGQOBchDDNT++eOHHiO1BaHCw7wcaOHYuXXnoJ/NwvnxWznVbtMyNS0/LdQgEBkBAYY68d1MAFqbwRzVXNXOHM33A85vDhw7Lk3qSZR+MzX65+MV9T4H4+SeETFV4NM83jaHzExy+hlpeXw5kAAwBn+2r2KCAAcrgEwxhh4RdSV6xYIZ/gPXfunEDCfAK4bt06fPrpp3jzzTexefNmbNmyReLffPMN3nnnHZw5c0a+jsC34jjTyZIuZ/ZkebbFRa7Hjx/HyJEj4cM1Zkn9pn3J0I0VCgiAxvEMOeqTx46AM9qSJUvAhaXmg+PcT+O3o/msNz09XT7ly89vDB06FGVlZZgzZ44sxeJTEC7L4uyZmpoqgPl8PnnRnfANHz4cJSUHkRd7WvaxXhrbV7NHAQHQzFAEgHZ7czl2796FmpoavP/++zCnVe4jeJMmTZKZkR8j57ejeYp9+OGH8eijj+LUqVPyKI7H8gv6/Lg5Z0SmCfKRI0dAWBlmx5xDeq96UZv7aQRWMnRjhQICIN/95emRAPhi49Evpgkzqv6B/ke34HLDRXBdoLHS0tJWaQLIN+h4TFv7mU/btWsXqqqqULJnJ9LL3kZB6QoRmQsY2Db7wHdRJFM3ViggAN51112ycIAzXsGMn+H42Pnw5dyLEalJmNr7axT1rvDbjxMP++PM70j6voSjyMgciuNZD6Cy6E/yMUy2zdP2hAkTrBA+ioPsVlULgOzx3Llz5f4cIajoOw4VmUVdYofqE+RLWrw3yD6wL2r2KOAHkEPmb7bp06fjwQcf7FJjm2ybfVCzS4EAAO0auo7WCwoogF7wgsV9UAAtdr4Xhq4AesELFvehUwG0WEcdegcVUAA7KJwW6xwFFMDO0VFr6aACCmAHhdNinaOAAtg5OmotHVRAAeygcFqscxRQAEPouGHDBvmPerjKO8QhrmyNdlQBBTCEcnw+/fHHH2PRokWYOHEiXn/9dRQXF8tC3RBFNLsDCiiAIUTj4lnCV1tbK/9hz4cffoiPPvoIs2bNQlFREdauXYs1a9aEKK3Z4SqgAIarlOs4vrTPJD8/zFCt4woogCG046sBq1atktcRuIqbp2TOfHzpirMh332ZPXt2iNKaHa4CCmAIpT744ANMnjwZK1euxLZt2zB//nwsWLBAXkkNUUSzO6CAAhhCNL5kReAyMzNDHKHZVCBSUwAjVVDLR6SAAhiRfFo4UgUUwEgV1PIRKaAARiSfFo5UAQUwUgW1fEQKKIARyaeFI1Wg+wIY6ci1vCcUUAA94QZ7O6EA2ut7T4xcAfSEG+zthAJor+89MXIF0BNusLcTCmD3832P6rEC2KPc2f0GowB2P5/1qB4rgD3Knd1vMApg9/NZj+qxAtij3Nn9BqMAdj+f9age3xSAPWrkOhhPKKAAesIN9nZCAbTX954YuQLoCTfY2wkF0F7fe2LkCqAn3GBvJxTAsHyvB0VLAQUwWspqvWEpoACGJZMeFC0FFMBoKav1hqWAAhiWTHpQtBRQAKOlrNYblgIKYFgy2XtQtEeuAEZbYa2/XQUUwHbl0Z3RVkABjLbCWn+7CiiA7cqjO6OtgAIYbYW1/nYVUADblUd3RlsB7wIY7ZFr/Z5QQAH0hBvs7YQCaK/vPTFyBdATbrC3Ewqgvb73xMgVQE+4wd5OKIDe871VPVIArXK39warAHrPJ1b1SAG0yt3eG6wC6D2fWNUjBdAqd3tvsAqg93xiVY8CALRq5DpYTyigAHrCDfZ2QgG01/eeGLkC6Ak32NsJBdBe33ti5P8DAAD//0yWpT4AAAAGSURBVAMAneELQ11JIWEAAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="4-5"><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;es:todos menos la primera letra de _&#xD;pl:_ bez pierwszej litery&#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><list></list></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;es:todas menos la primera palabra de _&#xD;pl:_ bez pierwszego słowa&#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><list></list></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;es:todos menos la última letra de _&#xD;pl:_ bez ostatniej litery&#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><list></list></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;es:todos menos la última palabra de _&#xD;pl:_ bez ostatniego słowa&#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><list></list></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;es:primera palabra de _&#xD;pl:pierwsze słowo _&#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;es:última letra de _&#xD;pl:ostatnia litera _&#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><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block s="reportTextAttribute"><l><option>length</option></l><block var="word"/></block><l>0</l></list></block><script><custom-block s="error %txt"><l>Last of empty word.</l></custom-block></script><list></list></block><block s="doReport"><block s="reportLetter"><block s="reportTextAttribute"><l><option>length</option></l><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;es:última palabra de _&#xD;pl:ostatnie słowo _&#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><list></list></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;es:¿palabra vacía? _&#xD;pl:puste słowo? _&#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><list></list></block><block s="doReport"><block s="reportVariadicEquals"><list><block s="reportTextAttribute"><l><option>length</option></l><block var="word"/></block><l>0</l></list></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;es:¿oración vacía? _&#xD;pl:puste zdanie? _&#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><list></list></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;pl:połącz słowa _&#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><list></list></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><list></list></block><block s="doIf"><custom-block s="empty sentence? %txt"><block var="first"/></custom-block><script><block s="doReport"><block var="bf"/></block></script><list></list></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;pl:lista $arrowRight zdanie _&#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;pl:zdanie $arrowRight lista _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doReport"><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportNot"><block s="reportVariadicEquals"><list><block s="reportTextAttribute"><l><option>length</option></l><l></l></block><l>0</l></list></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;pl:słowo $arrowRight lista _&#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><list></list></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;pl:lista $arrowRight słowo _&#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><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><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></list></block><script><block s="doReport"><block s="reportJoinWords"><block var="list"/></block></block></script><list></list></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;es:oración _&#xD;pl:zdanie _&#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;pl:błąd _&#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;es:imprimible _&#xD;pl:tekstowa _&#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><list></list></block><block s="doIf"><block s="reportListIsEmpty"><block var="data"/></block><script><block s="doReport"><l>()</l></block></script><list></list></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>es:requerir no vacío _ _&#xD;</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="reportVariadicEquals"><list><block s="reportTextAttribute"><l><option>length</option></l><block var="text"/></block><l>0</l></list></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;es:primera letra de _&#xD;pl:pierwsza litera _&#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="contains %&apos;number&apos;" type="command" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input></inputs><script><block s="doAsk"><l>what number are you looking for?</l></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><block s="reportListItem"><l>1</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>1</l><l>2</l></block><block s="doReport"><l>1</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><block s="reportListItem"><l>2</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>2</l><l>2</l></block><block s="doReport"><l>2</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><block s="reportListItem"><l>3</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>3</l><l>2</l></block><block s="doReport"><l>3</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><block s="reportListItem"><l>4</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>4</l><l>2</l></block><block s="doReport"><l>4</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><block s="reportListItem"><l>5</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>5</l><l>2</l></block><block s="doReport"><l>5</l></block></script><script><block s="doReport"><l>-1</l></block></script></block></script></block></script></block></script></block></script></block></script></block-definition><block-definition s="contains" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>number</l><l>0</l></block><block s="doAsk"><l>what number are you looking for?</l></block><block s="doSetVar"><l>number</l><block s="getLastAnswer"></block></block><block s="doFor"><l>i</l><l>0</l><block s="reportListAttribute"><l><option>length</option></l><block var="number list"/></block><script><block s="doIf"><block s="reportVariadicEquals"><list><block var="number"/><block s="reportLetter"><block var="i"/><block s="reportListContainsItem"><block var="number list"/><block var="number"/></block></block></list></block><script><block s="doSayFor"><block s="reportListItem"><block s="getLastAnswer"></block><block var="number list"/></block><l>2</l></block><block s="doReport"><block s="reportBoolean"><l><bool>true</bool></l></block></block></script><list></list></block><block s="doIf"><block s="reportNot"><block s="reportVariadicEquals"><list><block var="number"/><block s="reportLetter"><block var="i"/><block s="reportListContainsItem"><block var="number list"/><block var="number"/></block></block></list></block></block><script><block s="doSayFor"><l>-1</l><l>2</l></block><block s="doReport"><block s="reportBoolean"><l><bool>false</bool></l></block></block></script><list></list></block></script></block></script></block-definition><block-definition s="contains the letter e" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doFor"><l>e</l><block s="reportVariadicOr"><list><block s="reportVariadicEquals"><list><block var="word list"/><l>e</l></list></block><block s="reportVariadicEquals"><list><block var="word list"/><l>E</l></list></block></list></block><block s="reportListAttribute"><l><option>length</option></l><block var="word list"/></block><script><block s="doIf"><block s="reportLetter"><l>1</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>1</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>1</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>1</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>2</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>2</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>2</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>2</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>3</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>3</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>3</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>3</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>4</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>4</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>4</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>4</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>5</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>5</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>5</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>5</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>6</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>6</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>6</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>6</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>7</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>7</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>e</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportLetter"><l>7</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><script><block s="doSayFor"><block s="reportLetter"><l>7</l><block s="reportVariadicEquals"><list><block s="reportListItem"><block var="e"/><block var="word list"/></block><l>E</l></list></block></block><l>2</l></block><block s="doReport"><block s="reportListItem"><block var="e"/><block var="word list"/></block></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="e"/><block s="reportListAttribute"><l><option>length</option></l><block var="word list"/></block></list></block><script><block s="doReport"><l></l></block></script><list></list></block></script></block></script></block-definition><block-definition s="certain letter" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs></block-definition><block-definition s="index" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doAsk"><l>what number are you looking for?</l></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="number"/><block s="reportListItem"><l>1</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>1</l><l>2</l></block><block s="doReport"><l>1</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="number"/><block s="reportListItem"><l>2</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>2</l><l>2</l></block><block s="doReport"><l>2</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="number"/><block s="reportListItem"><l>3</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>3</l><l>2</l></block><block s="doReport"><l>3</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="number"/><block s="reportListItem"><l>4</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>4</l><l>2</l></block><block s="doReport"><l>4</l></block></script><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="number"/><block s="reportListItem"><l>5</l><block var="number list"/></block></list></block><script><block s="doSayFor"><l>5</l><l>2</l></block><block s="doReport"><l>5</l></block></script><script><block s="doReport"><l>-1</l></block></script></block></script></block></script></block></script></block></script></block></script></block-definition></blocks><primitives></primitives><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="1514"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAQAElEQVR4AezVC27kNhAEUCP3P3SC/NZeez6SSDWb9YJg1zsjkV2vDdQfH/4jQIAAAQIEbhdQwLeTu5AAAQIECHx8ZBew3wACBAgQIFAkoICL4F1LgAABAtkCCjh3/5ITIECAQKGAAi7EdzUBAgQI5Aoo4NzdZyeXngABAsUCCrh4Aa4nQIAAgUwBBZy5d6mzBaQnQGABAQW8wBKMQIAAAQJ5Ago4b+cSE8gWkJ7AIgIKeJFFGIMAAQIEsgQUcNa+pSVAIFtA+oUEFPBCyzAKAQIECOQIKOCcXUtKgACBbIHF0ivgxRZiHAIECBDIEFDAGXuWkgABAgQWE7i5gBdLbxwCBAgQIFAkoICL4F1LgAABAtkCCvjG/buKAAECBAj8J6CA/5PwNwECBAgQuFFAAd+InX2V9AQIECDwWUABf9bwMwECBAgQuElAAd8E7ZpsAekJECDwu4AC/l3EvwkQIECAwA0CCvgGZFcQyBaQngCBnwQU8E8qPiNAgAABApMFFPBkYMcTIJAtID2BRwIK+JGMzwkQIECAwEQBBTwR19EECBDIFpD+mYACfqbjOwIECBAgMElAAU+CdSwBAgQIZAu8Sq+AXwn5ngABAgQITBBQwBNQHUmAAAECBF4J7F3Ar9L7ngABAgQIFAko4CJ41xIgQIBAtoAC3nf/khEgQIDAwgIKeOHlGI0AAQIE9hVQwPvuNjuZ9AQIEFhcQAEvviDjESBAgMCeAgp4z71KlS0gPQECDQQUcIMlGZEAAQIE9hNQwPvtVCIC2QLSE2gioICbLMqYBAgQILCXgALea5/SECCQLSB9IwEF3GhZRiVAgACBfQQU8D67lIQAAQLZAs3SK+BmCzMuAQIECOwhoID32KMUBAgQINBMYHABN0tvXAIECBAgUCSggIvgXUuAAAEC2QIKeOD+HUWAAAECBN4VUMDvSnmOAAECBAgMFFDAAzGzj5KeAAECBI4IKOAjWp4lQIAAAQKDBBTwIEjHZAtIT4AAgaMCCviomOcJECBAgMAAAQU8ANERBLIFpCdA4IyAAj6j5h0CBAgQIHBRQAFfBPQ6AQLZAtITOCuggM/KeY8AAQIECFwQUMAX8LxKgACBbAHprwgo4Ct63iVAgAABAicFFPBJOK8RIECAQLbA1fQK+Kqg9wkQIECAwAkBBXwCzSsECBAgQOCqQO8Cvpre+wQIECBAoEhAARfBu5YAAQIEsgUUcN/9m5wAAQIEGgso4MbLMzoBAgQI9BVQwH13lz259AQIEGguoICbL9D4BAgQINBTQAH33JupswWkJ0BgAwEFvMESRSBAgACBfgIKuN/OTEwgW0B6ApsIKOBNFikGAQIECPQSUMC99mVaAgSyBaTfSEABb7RMUQgQIECgj4AC7rMrkxIgQCBbYLP0CnizhYpDgAABAj0EFHCPPZmSAAECBDYTOFjAm6UXhwABAgQIFAko4CJ41xIgQIBAtoACPrB/jxIgQIAAgVECCniUpHMIECBAgMABAQV8ACv7UekJECBAYKSAAh6p6SwCBAgQIPCmgAJ+E8pj2QLSEyBAYLSAAh4t6jwCBAgQIPCGgAJ+A8kjBLIFpCdAYIaAAp6h6kwCBAgQIPBCQAG/API1AQLZAtITmCWggGfJOpcAAQIECDwRUMBPcHxFgACBbAHpZwoo4Jm6ziZAgAABAg8EFPADGB8TIECAQLbA7PQKeLaw8wkQIECAwA8CCvgHFB8RIECAAIHZAmsX8Oz0zidAgAABAkUCCrgI3rUECBAgkC2ggNfdv8kIECBAYGMBBbzxckUjQIAAgXUFFPC6u8meTHoCBAhsLqCAN1+weAQIECCwpoACXnMvpsoWkJ4AgQABBRywZBEJECBAYD0BBbzeTkxEIFtAegIhAgo4ZNFiEiBAgMBaAgp4rX2YhgCBbAHpgwQUcNCyRSVAgACBdQQU8Dq7MAkBAgSyBcLSK+CwhYtLgAABAmsIKOA19mAKAgQIEAgT+K2Aw9KLS4AAAQIEigQUcBG8awkQIEAgW0ABf9q/HwkQIECAwF0CCvguafcQIECAAIFPAgr4E0b2j9ITIECAwJ0CCvhObXcRIECAAIF/BRTwvxD+yhaQngABAncLKOC7xd1HgAABAgT+ElDAfyH4n0C2gPQECFQIKOAKdXcSIECAQLyAAo7/FQBAIFtAegJVAgq4St69BAgQIBAtoICj1y88AQLZAtJXCijgSn13EyBAgECsgAKOXb3gBAgQyBaoTq+AqzfgfgIECBCIFFDAkWsXmgABAgSqBWoLuDq9+wkQIECAQJGAAi6Cdy0BAgQIZAso4Lr9u5kAAQIEggUUcPDyRSdAgACBOgEFXGeffbP0BAgQCBdQwOG/AOITIECAQI2AAq5xd2u2gPQECBD4UMB+CQgQIECAQIGAAi5AdyWBaAHhCRD4W0AB/83gDwIECBAgcK+AAr7X220ECGQLSE/gfwEF/D+FHwgQIECAwH0CCvg+azcRIEAgW0D6LwIK+AuHfxAgQIAAgXsEFPA9zm4hQIAAgWyBb+kV8DcSHxAgQIAAgfkCCni+sRsIECBAgMA3gagC/pbeBwQIECBAoEhAARfBu5YAAQIEsgUUcMz+BSVAgACBlQQU8ErbMAsBAgQIxAgo4JhVZweVngABAqsJKODVNmIeAgQIEIgQUMARaxYyW0B6AgRWFFDAK27FTAQIECCwvYAC3n7FAhLIFpCewKoCCnjVzZiLAAECBLYWUMBbr1c4AgSyBaRfWUABr7wdsxEgQIDAtgIKeNvVCkaAAIFsgdXTK+DVN2Q+AgQIENhSQAFvuVahCBAgQGB1gbkFvHp68xEgQIAAgSIBBVwE71oCBAgQyBZQwPP272QCBAgQIPBQQAE/pPEFAQIECBCYJ6CA59lmnyw9AQIECDwVUMBPeXxJgAABAgTmCCjgOa5OzRaQngABAi8FFPBLIg8QIECAAIHxAgp4vKkTCWQLSE+AwFsCCvgtJg8RIECAAIGxAgp4rKfTCBDIFpCewNsCCvhtKg8SIECAAIFxAgp4nKWTCBAgkC0g/SEBBXyIy8MECBAgQGCMgAIe4+gUAgQIEMgWOJxeAR8m8wIBAgQIELguoICvGzqBAAECBAgcFtiqgA+n9wIBAgQIECgSUMBF8K4lQIAAgWwBBbzN/gUhQIAAgU4CCrjTtsxKgAABAtsIKOBtVpkdRHoCBAh0E1DA3TZmXgIECBDYQkABb7FGIbIFpCdAoKOAAu64NTMTIECAQHsBBdx+hQIQyBaQnkBXAQXcdXPmJkCAAIHWAgq49foMT4BAtoD0nQUUcOftmZ0AAQIE2goo4LarMzgBAgSyBbqnV8DdN2h+AgQIEGgpoIBbrs3QBAgQINBd4FoBd09vfgIECBAgUCSggIvgXUuAAAEC2QIK+Pz+vUmAAAECBE4LKODTdF4kQIAAAQLnBRTwebvsN6UnQIAAgUsCCvgSn5cJECBAgMA5AQV8zs1b2QLSEyBA4LKAAr5M6AACBAgQIHBcQAEfN/MGgWwB6QkQGCKggIcwOoQAAQIECBwTUMDHvDxNgEC2gPQEhgko4GGUDiJAgAABAu8LKOD3rTxJgACBbAHphwoo4KGcDiNAgAABAu8JKOD3nDxFgAABAtkCw9Mr4OGkDiRAgAABAq8FFPBrI08QIECAAIHhAq0KeHh6BxIgQIAAgSIBBVwE71oCBAgQyBZQwG32b1ACBAgQ2ElAAe+0TVkIECBAoI2AAm6zquxBpSdAgMBuAgp4t43KQ4AAAQItBBRwizUZMltAegIEdhRQwDtuVSYCBAgQWF5AAS+/IgMSyBaQnsCuAgp4183KRYAAAQJLCyjgpddjOAIEsgWk31lAAe+8XdkIECBAYFkBBbzsagxGgACBbIHd0yvg3TcsHwECBAgsKaCAl1yLoQgQIEBgd4HnBbx7evkIECBAgECRgAIugnctAQIECGQLKODH+/cNAQIECBCYJqCAp9E6mAABAgQIPBZQwI9tsr+RngABAgSmCijgqbwOJ0CAAAECPwso4J9dfJotID0BAgSmCyjg6cQuIECAAAEC3wUU8HcTnxDIFpCeAIFbBBTwLcwuIUCAAAECXwUU8FcP/yJAIFtAegK3CSjg26hdRIAAAQIEfgko4F8WfiJAgEC2gPS3CijgW7ldRoAAAQIE/hFQwP84+JMAAQIEsgVuT6+Abyd3IQECBAgQ+PhQwH4LCBAgQIBAgcBSBVyQ35UECBAgQKBEQAGXsLuUAAECBNIFFPAyvwEGIUCAAIEkAQWctG1ZCRAgQGAZAQW8zCqyB5GeAAECaQIKOG3j8hIgQIDAEgIKeIk1GCJbQHoCBBIFFHDi1mUmQIAAgXIBBVy+AgMQyBaQnkCqgAJO3bzcBAgQIFAqoIBL+V1OgEC2gPTJAgo4efuyEyBAgECZgAIuo3cxAQIEsgXS0yvg9N8A+QkQIECgREABl7C7lAABAgSyBT4+FHD6b4D8BAgQIFAioIBL2F1KgAABAukCyQWcvnv5CRAgQKBQQAEX4ruaAAECBHIFFHDq7uUmQIAAgVIBBVzK73ICBAgQSBVQwKmbz84tPQECBMoFFHD5CgxAgAABAokCCjhx6zJnC0hPgMASAgp4iTUYggABAgTSBBRw2sblJZAtID2BZQQU8DKrMAgBAgQIJAko4KRty0qAQLaA9EsJKOCl1mEYAgQIEEgRUMApm5aTAAEC2QLLpVfAy63EQAQIECCQIKCAE7YsIwECBAgsJ3BrAS+X3kAECBAgQKBIQAEXwbuWAAECBLIFFPBt+3cRAQIECBD4JaCAf1n4iQABAgQI3CaggG+jzr5IegIECBD4KqCAv3r4FwECBAgQuEVAAd/C7JJsAekJECDwXUABfzfxCQECBAgQmC6ggKcTu4BAtoD0BAj8LKCAf3bxKQECBAgQmCqggKfyOpwAgWwB6Qk8FlDAj218Q4AAAQIEpgko4Gm0DiZAgEC2gPTPBRTwcx/fEiBAgACBKQIKeAqrQwkQIEAgW+B1egX82sgTBAgQIEBguIACHk7qQAIECBAg8Fpg5wJ+nd4TBAgQIECgSEABF8G7lgABAgSyBRTwrvuXiwABAgSWFlDAS6/HcAQIECCwq4AC3nWz2bmkJ0CAwPICCnj5FRmQAAECBHYUUMA7blWmbAHpCRBoIaCAW6zJkAQIECCwm4AC3m2j8hDIFpCeQBsBBdxmVQYlQIAAgZ0EFPBO25SFAIFsAelbCSjgVusyLAECBAjsIqCAd9mkHAQIEMgWaJdeAbdbmYEJECBAYAcBBbzDFmUgQIAAgXYCQwu4XXoDEyBAgACBIgEFXATvWgIECBDIFlDAw/bvIAIECBAg8L6AAn7fypMECBAgQGCYgAIeRpl9kPQECBAgcExAAR/z8jQBAgQIEBgioICHMDokW0B6AgQIHBdQwMfNvEGAAAECBC4LKODLhA4gkC0gPQECv+uE6gAAAkNJREFU5wQU8Dk3bxEgQIAAgUsCCvgSn5cJEMgWkJ7AeQEFfN7OmwQIECBA4LSAAj5N50UCBAhkC0h/TUABX/PzNgECBAgQOCWggE+xeYkAAQIEsgWup1fA1w2dQIAAAQIEDgso4MNkXiBAgAABAtcFOhfw9fROIECAAAECRQIKuAjetQQIECCQLaCAu+7f3AQIECDQWkABt16f4QkQIECgq4AC7rq57LmlJ0CAQHsBBdx+hQIQIECAQEcBBdxxa2bOFpCeAIEtBBTwFmsUggABAgS6CSjgbhszL4FsAekJbCOggLdZpSAECBAg0ElAAXfallkJEMgWkH4rAQW81TqFIUCAAIEuAgq4y6bMSYAAgWyB7dIr4O1WKhABAgQIdBBQwB22ZEYCBAgQ2E7gUAFvl14gAgQIECBQJKCAi+BdS4AAAQLZAgr47f17kAABAgQIjBNQwOMsnUSAAAECBN4WUMBvU2U/KD0BAgQIjBVQwGM9nUaAAAECBN4SUMBvMXkoW0B6AgQIjBdQwONNnUiAAAECBF4KKOCXRB4gkC0gPQECcwQU8BxXpxIgQIAAgacCCvgpjy8JEMgWkJ7APAEFPM/WyQQIECBA4KGAAn5I4wsCBAhkC0g/V0ABz/V1OgECBAgQ+FFAAf/I4kMCBAgQyBaYn14Bzzd2AwECBAgQ+CaggL+R+IAAAQIECMwXWLmA56d3AwECBAgQKBJQwEXwriVAgACBbAEFvOr+zUWAAAECWwso4K3XKxwBAgQIrCrwJwAAAP//lVwoVAAAAAZJREFUAwDU5ALRcl29HAAAAABJRU5ErkJggg==</pentrails><costumes><list struct="atomic" id="1515"></list></costumes><sounds><list struct="atomic" id="1516"></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="false" costume="0" color="80,80,80,1" pen="tip" id="1521"><costumes><list struct="atomic" id="1522"></list></costumes><sounds><list struct="atomic" id="1523"></list></sounds><blocks></blocks><variables></variables><scripts><script x="20" y="20"><block s="receiveKey"><l><option>1</option></l><list></list></block><custom-block s="contains"></custom-block></script><script x="20" y="89.83333333333337"><block s="receiveKey"><l><option>2</option></l><list></list></block><custom-block s="contains the letter e"></custom-block></script><script x="20" y="159.66666666666669"><block s="receiveKey"><l><option>3</option></l><list></list></block><custom-block s="index"></custom-block></script><script x="20" y="229.49999999999994"><block s="receiveGo"></block><block s="doSayFor"><l>press one and three for number and two for letters</l><l>4</l></block><block s="doSetVar"><l>number</l><l>0</l></block><block s="doSetVar"><l>number list</l><block s="reportNewList"><list><l>1</l><l>4</l><l>7</l><l>10</l><l>16</l></list></block></block><block s="doSetVar"><l>word list</l><block s="reportNewList"><list><l>one</l><l>four</l><l>seven</l><l>ten</l><l>sixteen</l></list></block></block></script></scripts></sprite><watcher var="word list" style="normal" x="10" y="31.000001999999995" color="243,118,29" hidden="true"/><watcher var="number list" style="normal" x="4" y="5" color="243,118,29" extX="81" extY="108.00000000000001"/><watcher var="number" style="normal" x="10" y="124.00000399999999" color="243,118,29" hidden="true"/></sprites></stage><variables><variable name="number list"><list struct="atomic" id="1575">1,4,7,10,16</list></variable><variable name="word list"><list struct="atomic" id="1576">one,four,seven,ten,sixteen</list></variable><variable name="number"><l>67</l></variable></variables></scene></scenes></project><media name="4-5" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"></media></snapdata>