<snapdata remixID="13934915"><project name="4.5 Its Around Here Somewhere" app="Snap! 10.1-dev, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAES9JREFUeF7tnQdUFNcax/9LUekKqIAN7F3js0RPfHZfYoliiT4LYstRoz4riVGx68NEjeXoSzQ20KiAgDW2Y38+jVGjYCyIsStYAlaK8s53yUx2FnGHYYju8n3n5JDZuffuzm//3pl773f/a8jMzMwEBxN4SwQMLMC3RJ7fVhBgAbIQ3iqB1wowNjYWe/bsyfbB6G5tMBhy/MBaz1esWBEdO3Z8qyD4zd8OgWwCjIqKQq1atfL0aZycnLCoVz1UcEw1207X0Hg8ePhQlHNxcUHJkiXN1uEC1kNAIcD9+/cLAUg9mda/xT094DCvgTpKg8JxLc1Z9KwPHjxA06ZN1dXjUlZBQCHAyZMno0uXLkIMJL569eqBekR/f3/MnDkTkyZNQuPGjTF8+HD07t0bs2bNwunTpxEREYGVK1dixYoVWLJkCXy8veC0oJECUKG2Y2FwLYnUiCDF668GbELC8yKy6OvWrWsVYPki1BFQCPCbb75BkyZNhBjOnj2LUqVKISwsDM2bN0dqaioqVKggzh04cACurq4oXLgw6HmRXu/Tpw+++uorDBgwAGVKl4LLwsaKT1C421xkptxD2u55itdfBm7AhRRbWfSNGimFq+4yuJSlElAI8OnTpzh16lSer8XPtxyKLvlAVTsveizHr08dRdnLly8LAXMUHALZBiELFy5EzZo15R5JQiHdltUeN2zYUAwq3hQZGRk4fPgwXr16hfPnz2PEiBEFhzxfqSCQ4zTM3r17cxyMSOxyGqRoPU8DoM6dO8PBwYG/ngJCIJsAt23bJk/DmPZ6pkzy6zwNbEiIHNZPQCHAY8eOwdvbW/VV9+/fH6tWrRLlaSKZpnGePHkijpcvX47Bgwerbsu0oK+vr+a6XNFyCCgEOG/ePDENQ0FCojm5MmXK4NKlS2KUa2tri7S0NNy4cUNMuQwcOBDvvfeemJbp1KkTvLy8cOjQIezatUuMlAMCAmQSpqsk5o79/PwshyJ/Us0EFAKcO3cuunXrJp79aGBQvHhxJCUlCWE9evQIRYsWRXp6Oh4+fCheu3//Pl68eAE3NzdRp1ChQuKDuLu7izIpKSk5Dmak23dOgxua2uGwfgIKAYaEhKBr167vxFXT+jCH9RNQCHDOnDlyD+jtVRIPJlaHvU0WhKTCPsg0/HGgE5eiaUko9Cprvdit5WDcrtZL7jErV66s07twM+8yAYUAZ8+eLfeAqY8foXz4J4jyGoim/v2EMGxsbODi7Cxuz+Yi5fHjN2bOUP3ff/8dL58lo3J0H9HcrQF/ZuBUqVLF3FvweSsgoBAgrfdKz4DpT5NhFz0OjoPC5PnAHauWosXP35kVFnHxnrMTt23dYGdnJzDZ29sr5hVpaS85OVkMWP7m+hjN7mzEjcBdcg9YrVo1K8DLl2COgEKAM2bMkHvAjGcpOLp3B9p27ycnIswc2hcTilxQtFlh/VVc6ZV9xOo+dgUSi1cV68VSGA88aER99+5d9O3bF1HhP6Dcen9c7/ejXLZ69ermPjuftwICCgFOnz5dCFCMgl88wY69B0SPuGjRIowcORIzhwXgSxMBFv90DpJWBgMZ6QocJMC7HpUxduxYLF26VLRpvHJCI2ZJgNu3b4f3ila4FrBTtEHlaDmQw/oJKAQ4bdo0OR2LBLh9z34hSA8PD5GrN3t4YDYBVt7yEHcXDEHK/k0KWsXGLBcCdHTMSjR4+fKl4jz1jJIAafXF5/vW+K3vDlmkLEDrFx9doUKAU6ZMkZ8BkfYMW37cK46luHDyf6i+aYwqMhWjkhAbFyfmCSkofct48pnWe0mANFkdExOD0qvaIqH3NvkZsHbt2qrehwtZNgGFAIODg+VnQEP6c8Ts3KOYF/Tz9UVwP39c/e262asOWb8FqenpIo+QwvhZUKpM53r06IHo6GiUXfMhrvTaKrdbp04ds+/BBSyfgEKAlPEsjYJtX6Yiavsu+ZgGEBsXzECfxN2qrrro6O9w0628WCWhoJ7Q+BmQUrWkHjAyMhK+oe1wuWeM3APSEh+H9RNQCHDixIlyj2f3Kg2RW3eKY+qpaBluFg1CHC4qqPgu+S9+G94kGym3USRAP1GPgpJdpSAx0y1ZegYkAfqFtcelHtFyGdoOwGH9BBQCnDBhgtzjFUIGwmO2o379+mjfvj3i4uKwYNyQbAJ0bfFJtgEIYXMb9S2uu/iiXLlyIjGVEhqMe8BixYrJPeDGjRtR8YePcaH7ZrkHpPflsH4CCgF+8cUXcg9Y2PASm6K3KZ4BFwYNyybAnBC5jlyG665+YgRNQYkJxkEJC1IPSAKstKETfu0WKRdp0EDlrjrr/46s+goVAgwKCpJ7QAfbTGzYvEWeF6Tbpr2dHUo+vQWDwdYslCclK4kMGsqeMc6UoYp0TLdgOr9jxw6RS1g1vAviuoTz5iSzZK2rgEKA48ePF4IjsZEA10dEK3pAdxcnJP6rCXL2RvgTToNtSThx8qTIIaQwdVSgvSB0a378+LHIO6wW0RWx/llziVSWd8dZl9ByuhqFAMeNGyf3gE72BoRt2owOHTpg0KBBCA0NxXdTx+Fz+zhVZFxGLkOCQ2mRN0hBuYOSuKgHvHjxosg1fP/998V6cY3N3XGu80a5B6T9xxzWT0AhQFo2kzamOxeyQejGSHHcr18/rFmzBv8JHoOJJqNgWgm59LF7NlKmAkxMTHzjTrta0T1wttMGeaBC+5M5rJ+AQoCjR4+We0DXInZYvX6TeD5r2bIlzpw5g/ljh2Cio3IahkbBYpBhshTnPGIp4gv7iM3tFPfu3Xuj5UedLf/EmY7rZZF+8IG6fcXW/xVZ9xUqBDhq1Cj5mc/NwR6r1m2Uj+m2uebfwQiy/UUVEY/pMYhNfoXSpUuL8rdv31Y8B3bv3l2MgsPDw8Vtuu7WXjjdYZ3cNnvEqMJs8YUUAqSMF2klpJhTYaxYu14cUyIBDSbMbSTK7XkagEib1+tt74Of24XKPWCzZs0sHi5fgHkCCgGSM4G0J8TduQiWr1kHslqTtlfSbjgp1q5dq9j1ZvxW586dU1i8zZ8/Xwi5bNmy2T4R+RC2adMG9XcG4ORHa+Xz5EfDYf0EFAL87LPP5B7Q09UR364KFbdOShagLZvGzlXkmjVkyBAcP35c1KFtnORsQGlbtGpC+4upLgUt5Tk7O4s5QSloqmX37t1CfBQNdwXixD9Wyz0gPXdyWD8BhQCHDRsmzwOSAC+GBSMq0ROUKU1x9epV8ZfEQ6IkKzZaPaH5Q+NtnPRcR2Kk3o161HXr1qFVq1bylAzVJ+sPem3fvn2o4pyGbinhON42a5M7nWcBWr/4xHdtbFJOfn/SBHCJos5iU9KR5t/iwMGDYt5u6NChcg9luq+Xjlu3bi16P2nAkZN3DIlOEh/9bbx3oKB9rPX38kCF2uKwfgLZ7NmOHj0qREDPgFWiewsC05JboK6PI1KVSc15pnM+KRVTXfbK7ZAASbTkmtWuXbs8t88NvPsEspkT0YChRo0aQoSUEEBZK39F/PTTT8JNgf6juUd6ZuSwfgJsz2b93/E7fYVsz/ZOfz3W/+EUAjxy5Ii8crFs2TIxldKzZ0+xqZwmjY2DBiyUQb169WoEBgaKxNNr166JIpI5UV7wsT1bXuhZTl2FAL/++mt5IpqexWiKhZ4F6bmQBHbr1i1hSJ6QkCBeo/OUpEDJCjR4oU3mdI5ctaTkAwlFbldJLNGejTyub968madvv0WLFnmqb2mVc7RnI+GVL19eCIlGpT4+PuL/aTslpU9Rr0g9Hq1uGNtuPH/+XJQhIRpPw0hgXjd9Y/x7idJ5S7Nnu3PnDi5cuIC8CEgScF7asGgBsj2b9q+P3GH1EI5e7Wi/kr+2Zo72bPRjMymTq8NWtmcrjUzKhaZ0aPqBVx3+FktLhP0f9mzOTQNxq0aAxdqzGQtn8eLFGFl1ZBanN8QvXr+ItXYK2pw/ZswYYXOsh5D/Whlpfzez9mzhPkPRsnMv8Q6UEePs5CRureYi+Q931DeVoz0htAG+QkQPUcyS7dkk4QjxNRyJuLJxqHG9Ro6X3zGuIxY0W6A4TwMvsjgusAI0tWezjfkcTgPXyM9y275fjDZnVqqyZ/OavR23bIvKtr3G6VwkYEpMkDYlNXJ/gb/f/sGi7dkkARqOZ+2YIQHeeXwHrW+2RkvvlhjrOhbtSrVDwJUAhN4PRdcjXRHSOUQhQJp1oOSOAitAU3u2Q/t24aNufbLZs1EaPoVpKr5j7aZ4dvawOJcbe7boyE0oG/axRduzGd86JRGau0vEe8bLRaT9MQX6FqzWno0EmJmRhpfJ95HQvyY8ek2AQ7WGeP7rCTxYP0cWILljUYYN/ZRDTvZsZE5E7liWbs9mKhwa0aoJ2uxFswZkCkBRoAWo1p5N6gEzHtzG3QVDUWpqOG5N7Q7voJW40qeSAFnQ7Nno1knTUXm1FCnQAjRnzxZ34ihqRYxX8w8bFaMSERt3vkDZs5F4KEiEkimTKliA+HVSSuYtSM9/xCZ39mx+fpgS2AXxCVmJqWqj3+gvUalufdmqjXoKMjy3Rns2yoWk3EkSkvRjjGo4kYlTQXQEyzd7NlPo6XMOo0iRIuJl+pJoBcUa7dloawKlltE/MhrpF7QeTc0/NuMyubZnW7EhUgw8TF2xKm2+K9q93CXLCcE0Xsw8IE+60poyrS1boz2bdBumrabs9G9ejrm2Z5MESCPf57FHUOLTENg4ucLWzVO8W2Z6Kmwcsn4nmAYpJFaK5zP2iyRTWuM9ePAgaNJV6gHfRXs2Eg/NCtD+ZbUh9X7c66klZvIMqKc9m+lHeDptn3DEoqCMEUmAlEHzrtqzkS2JtOoTHx8vnLzoxxs59COQK3u2Qvb2KJFyHQYb8/Zsxh+xeOMPcerUKXlbJq2K0CjREuzZ/P39s9GmjB16vtu69U9Pa/2+koLVUq7s2TxcnXFvRGMYVPiz2VDewow9YrsmfWGUpiX9ZAMhthR7tpwESD9bSxPoHHkjkG/2bPSxHk3cKXo6GhFaoj2b8S34ypUr4hYsed3kDTvXlgjk2p5tVqMSoq6dhzcyHtxB6Zkx4jhp5SR4BgSL5bmnp/bh3uJ/4eGXO4RJuSRAaTlOfnODQX7Getfs2apWrQr69dDX9YAsH/0I5NqeLaR9HSE8EiBZspUcsRAOVRog49E93Jzsj/KrYuWRb9LnW4VHtCRAmpjNKSOa7dn0+1ItqaV8s2cjCIlBW+Dp6SkL0Ngbhu3ZLEkm+fdZ2Z4t/9hyyyoIsD2bCkhcJP8IsD1b/rHlllUQYHs2FZC4SP4RYHu2/GPLLasgwPZsKiBxkfwjwPZs+ceWW1ZB4LX2bCrqcREmoAsBFqAuGLkRrQRYgFrJcT1dCLAAdcHIjWglwALUSo7r6UKABagLRm5EKwEWoFZyXE8XAixAXTByI1oJsAC1kuN6uhBgAeqCkRvRSoAFqJUc19OFAAtQF4zciFYCLECt5LieLgRYgLpg5Ea0EmABaiXH9XQhwALUBSM3opUAC1ArOa6nCwEWoC4YuRGtBFiAWslxPV0IsAB1wciNaCXAAtRKjuvpQoAFqAtGbkQrARagVnJcTxcCLEBdMHIjWgmwALWS43q6EGAB6oKRG9FKgAWolRzX04UAC1AXjNyIVgIsQK3kuJ4uBFiAumDkRrQSYAFqJcf1dCHAAtQFIzeilQALUCs5rqcLARagLhi5Ea0EWIBayXE9XQiwAHXByI1oJcAC1EqO6+lCgAWoC0ZuRCsBFqBWclxPFwIsQF0wciNaCbAAtZLjeroQYAHqgpEb0UqABaiVHNfThQALUBeM3IhWAixAreS4ni4EWIC6YORGtBJgAWolx/V0IcAC1AUjN6KVwP8BuXNLPvhIp1gAAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="4.5 Its Around Here Somewhere"><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" type="predicate" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><l></l></block></script></block-definition><block-definition s="Contain %&apos;List&apos; %&apos;Search Value&apos;" type="command" category="other"><header></header><code></code><translations></translations><inputs><input type="%s" initial="1"></input><input type="%s" initial="1"></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="reportVariadicEquals"><list><block var="Search Value"/><block s="reportListItem"><block var="i"/><block var="List"/></block></list></block><script><block s="bubble"><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doStopThis"><l><option>this block</option></l></block></script><list></list></block></script></block><block s="bubble"><block s="reportBoolean"><l><bool>false</bool></l></block></block></script></block-definition><block-definition s="Index Of %&apos;List&apos; %&apos;Search Value&apos;" type="command" category="other"><header></header><code></code><translations></translations><inputs><input type="%s" initial="1"></input><input type="%s" initial="1"></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="reportVariadicEquals"><list><block var="Search Value"/><block s="reportListItem"><block var="i"/><block var="List"/></block></list></block><script><block s="bubble"><block var="i"/></block><block s="doStopThis"><l><option>this block</option></l></block></script><list></list></block></script></block><block s="bubble"><l>-1</l></block></script></block-definition><block-definition s="first e word %&apos;Search List&apos;" type="command" category="other"><header></header><code></code><translations></translations><inputs><input type="%s" initial="1"></input></inputs><script><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="search list"/></block><script><block s="doIf"><block s="reportVariadicEquals"><list><block s="reportLetter"><l>1</l><block s="reportListItem"><block var="i"/><block var="search list"/></block></block><l>e</l></list></block><script><block s="doSayFor"><block s="reportListItem"><block var="i"/><block var="search list"/></block><l>2</l></block><block s="doStopThis"><l><option>this block</option></l></block></script><list></list></block></script></block></script></block-definition><block-definition s="First word that start with %&apos;Search List&apos; %&apos;Letter&apos;" type="command" category="other"><header></header><code></code><translations></translations><inputs><input type="%s" initial="1"></input><input type="%s" initial="1"></input></inputs><script><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="Search List"/></block><script><block s="doIf"><block s="reportVariadicEquals"><list><block s="reportLetter"><l>1</l><block s="reportListItem"><block var="i"/><block var="Search List"/></block></block><block var="Letter"/></list></block><script><block s="doSayFor"><block s="reportListItem"><block var="i"/><block var="Search List"/></block><l>2</l></block><block s="doStopThis"><l><option>this block</option></l></block></script><list></list></block></script></block></script></block-definition></blocks><primitives><block-definition s="set %&apos;#1&apos; to %&apos;#2&apos;" type="command" category="variables" selector="doSetVar" primitive="doSetVar"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" irreplaceable="true"><options>§_getVarNamesDict</options></input><input type="%s">0</input></inputs><script><block s="doPrimitive"><l><bool>true</bool></l><l>doSetVar</l></block></script></block-definition></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="833"><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="834"></list></costumes><sounds><list struct="atomic" id="835"></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="840"><costumes><list struct="atomic" id="841"></list></costumes><sounds><list struct="atomic" id="842"></list></sounds><blocks></blocks><variables></variables><scripts><script x="475" y="53"><block s="receiveKey"><l><option>2</option></l><list></list></block><block s="doSetVar"><l>search list</l><block s="reportNewList"><list><l>2</l><l>4</l><l>5</l></list></block></block><custom-block s="Index Of %s %s"><block var="search list"/><l>2</l></custom-block></script><script x="139" y="158"><block s="receiveKey"><l><option>3</option></l><list></list></block><block s="doSetVar"><l>Word List</l><block s="reportNewList"><list><l>Brad</l><l>Bruce</l><l>Brain</l></list></block></block><custom-block s="first e word %s"><block var="Word List"/></custom-block></script><script x="475" y="160"><block s="receiveKey"><l><option>4</option></l><list></list></block><block s="doSetVar"><l>Word List</l><block s="reportNewList"><list><l>Brad</l><l>Brother</l><l>Sister</l></list></block></block><custom-block s="First word that start with %s %s"><block var="Word List"/><l>S</l></custom-block></script><script x="144" y="44.83333333333334"><block s="receiveKey"><l><option>1</option></l><list></list></block><block s="doSetVar"><l>search list</l><block s="reportNewList"><list><l>2</l><l>4</l><l>5</l></list></block></block><custom-block s="Contain %s %s"><block var="search list"/><l>2</l></custom-block></script></scripts></sprite><watcher var="contains" style="normal" x="10" y="10" color="243,118,29"/><watcher var="search list" style="normal" x="10" y="31.000001999999995" color="243,118,29" extX="80" extY="70"/><watcher var="Word List" style="normal" x="10" y="124.00000399999999" color="243,118,29" extX="80" extY="70"/></sprites></stage><variables><variable name="contains"><l>0</l></variable><variable name="search list"><list struct="atomic" id="913">2,4,5</list></variable><variable name="Word List"><list struct="atomic" id="914">Brad,Brother,Sister</list></variable></variables></scene></scenes></project><media name="4.5 Its Around Here Somewhere" app="Snap! 10.1-dev, https://snap.berkeley.edu" version="2"></media></snapdata>