<snapdata remixID="12263203"><project name="scheme out scratch" app="Snap! 8.1, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAAmRJREFUeF7t18GJg1AARdGfimzBFizNTqzCXqziD8xiyGaSnRfkZKvw8P6Dkteccw4/BaICLwCj8mZ/CwAIQloAwDS/cQAZSAsAmOY3DiADaQEA0/zGAWQgLQBgmt84gAykBQBM8xsHkIG0AIBpfuMAMpAWADDNbxxABtICAKb5jQPIQFoAwDS/cQAZSAsAmOY3DiADaQEA0/zGAWQgLQBgmt84gAykBQBM8xsHkIG0AIBpfuMAMpAWADDNbxxABtICAKb5jQPIQFoAwDS/cQAZSAsAmOY3DiADaQEA0/zGAWQgLQBgmt84gAykBQBM8xsHkIG0AIBpfuMAMpAWADDNbxxABtICAKb5jQPIQFoAwDS/cQAZSAsAmOY3DiADaQEA0/zGAWQgLQDgP/nXdR37vo9lWdIDevo4gB9OeNu2v6vneY7rup7u4fbnA/BL8neE77cexzHmnLcf2NMGAQQwNQ2gTzCAaQF/QtL83oBpfuMAMpAWADDNbxxABtICAKb5jQPIQFoAwDS/cQAZSAsAmOY3DiADaQEA0/zGAWQgLQBgmt84gAykBQBM8xsHkIG0AIBpfuMAMpAWADDNbxxABtICAKb5jQPIQFoAwDS/cQAZSAsAmOY3DiADaQEA0/zGAWQgLQBgmt84gAykBQBM8xsHkIG0AIBpfuMAMpAWADDNbxxABtICAKb5jQPIQFoAwDS/cQAZSAsAmOY3DiADaQEA0/zGAWQgLQBgmt84gAykBQBM8xsHkIG0AIBpfuMAMpAWADDNbxxABtICAKb5jQPIQFoAwDS/cQAZSAsAmOY3/gPWVfyo0JVwGwAAAABJRU5ErkJggg==</thumbnail><scenes select="1"><scene name="scheme out scratch"><notes></notes><palette><category name="scheme-blocks-patch" color="9,185,0,1"/></palette><hidden></hidden><headers></headers><code></code><blocks><block-definition s="new gobbler %&apos;x&apos;" type="reporter" category="control"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>p</l></list></block><block s="doSetVar"><l>p</l><l>1</l></block><block s="doReport"><block s="reifyScript"><script><block s="doIf"><block s="reportEquals"><block var="func"/><l>eat</l></block><script><block s="doChangeVar"><l>p</l><l>1</l></block><block s="doIf"><block s="reportNotEquals"><block s="reportLetter"><block s="reportDifference"><block var="p"/><l>1</l></block><block var="x"/></block><block var="input"/></block><script><block s="doReport"><block s="reportBoolean"><l><bool>false</bool></l></block></block></script></block><block s="doReport"><block s="reportBoolean"><l><bool>true</bool></l></block></block></script></block><block s="doIf"><block s="reportEquals"><block var="func"/><l>spit</l></block><script><block s="doChangeVar"><l>p</l><l>1</l></block><block s="doReport"><block s="reportLetter"><block s="reportDifference"><block var="p"/><l>1</l></block><block var="x"/></block></block></script></block><block s="doIf"><block s="reportEquals"><block var="func"/><l>explode</l></block><script><block s="doReport"><block s="reportGreaterThan"><block var="p"/><block s="reportStringSize"><block var="x"/></block></block></block></script></block><block s="doIf"><block s="reportEquals"><block var="func"/><l>before</l></block><script><block s="doDeclareVariables"><list><l>got</l><l>last</l></list></block><block s="doSetVar"><l>got</l><l></l></block><block s="doSetVar"><l>last</l><block s="reportLetter"><block var="p"/><block var="x"/></block></block><block s="doUntil"><block s="reportOr"><block s="reportListContainsItem"><block var="input"/><block var="last"/></block><block s="reportGreaterThan"><block var="p"/><block s="reportStringSize"><block var="x"/></block></block></block><script><block s="doSetVar"><l>got</l><block s="reportJoinWords"><list><block var="got"/><block var="last"/></list></block></block><block s="doChangeVar"><l>p</l><l>1</l></block><block s="doSetVar"><l>last</l><block s="reportLetter"><block var="p"/><block var="x"/></block></block></script></block><block s="doReport"><block var="got"/></block></script></block><block s="doIf"><block s="reportEquals"><block var="func"/><l>retreat</l></block><script><block s="doChangeVar"><l>p</l><l>-1</l></block></script></block></script><list><l>func</l><l>input</l></list></block></block></script></block-definition><block-definition s="$flash assoc %&apos;key&apos; %&apos;a-list&apos;" type="reporter" category="lists"><comment x="0" y="0" w="289.3333333333333" collapsed="false">The second input is an &quot;association list,&quot; a list of two-item lists.  Each of those smaller lists has a &quot;key&quot; as its first item and a &quot;value&quot; as its second.  ASSOC reports the first key-value pair in the association list whose key matches the first input.</comment><header></header><code></code><translations>ca:associació _ _&#xD;</translations><inputs><input type="%s"></input><input type="%l"></input></inputs><script><block s="doReport"><block s="reportAtomicFindFirst"><block s="reifyPredicate"><autolambda><block s="reportEquals"><block var="key"/><block s="reportListItem"><l>1</l><l/></block></block></autolambda><list></list></block><block var="a-list"/></block></block></script></block-definition><block-definition s="☠︎ linked? %&apos;data&apos;" type="predicate" category="lists" helper="true"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportApplyExtension"><l>lst_linked(list)</l><list><block var="data"/></list></block></block></script></block-definition><block-definition s="☠︎ link %&apos;data&apos;" type="reporter" category="lists" helper="true"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doIf"><block s="reportListIsEmpty"><block var="data"/></block><script><block s="doReport"><block var="data"/></block></script></block><block s="doReport"><block s="reportCONS"><block s="reportListItem"><l>1</l><block var="data"/></block><block s="reportCDR"><block var="data"/></block></block></block></script></block-definition><block-definition s="space gobbler %&apos;x&apos;" type="command" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><custom-block s="gobble trash %s"><block s="evaluate"><block var="x"/><list><l>before</l><block s="reportUnicodeAsLetter"><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportNot"><block s="reportListContainsItem"><block s="reportNewList"><list><l>32</l><l>10</l><l>7</l></list></block><block var="value"/></block></block></autolambda><list><l>value</l></list></block><block s="reportNumbers"><l>0</l><l>255</l></block></block></block></list></block></custom-block></script></block-definition><block-definition s="gobble trash %&apos;x&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs></block-definition><block-definition s="Standard Library" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportNewList"><list><block s="reportNewList"><list><l>if</l><block s="reifyReporter"><autolambda><custom-block s="if-cbn %s %s %s"><l></l><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>true</l><block s="reifyReporter"><autolambda><block s="reportBoolean"><l><bool>true</bool></l></block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>false</l><block s="reifyReporter"><autolambda><block s="reportBoolean"><l><bool>false</bool></l></block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>var</l><block s="reifyReporter"><autolambda><custom-block s="getvar-cbn %s"><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>define</l><block s="reifyReporter"><autolambda><custom-block s="define-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>lambda</l><block s="reifyReporter"><autolambda><custom-block s="ringify-with-params-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>+</l><block s="reifyReporter"><autolambda><custom-block s="+-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>-</l><block s="reifyReporter"><autolambda><custom-block s="--cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>*</l><block s="reifyReporter"><autolambda><custom-block s="*-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>/</l><block s="reifyReporter"><autolambda><custom-block s="/-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>**</l><block s="reifyReporter"><autolambda><custom-block s="**-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block><block s="reportNewList"><list><l>apply</l><block s="reifyReporter"><autolambda><custom-block s="call-with-input-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></list></block></list></block></block></script></block-definition><block-definition s="new script parser %&apos;gobbler&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>name</l><l>params</l></list></block><custom-block s="space gobbler %s"><block var="gobbler"/></custom-block><block s="doIfElse"><block s="reportListContainsItem"><block s="reportNewList"><list><l>"</l><l>&apos;</l></list></block><block s="evaluate"><block var="gobbler"/><list><l>spit</l><l>`</l></list></block></block><script><block s="doRun"><block var="gobbler"/><list><l>retreat</l></list></block><block s="doReport"><block s="reportNewList"><list><custom-block s="parse a string %s"><block var="gobbler"/></custom-block><l>lit</l></list></block></block></script><script><block s="doRun"><block var="gobbler"/><list><l>retreat</l></list></block></script></block><block s="doIf"><block s="reportNot"><block s="evaluate"><block var="gobbler"/><list><l>eat</l><l>(</l></list></block></block><script><block s="doRun"><block var="gobbler"/><list><l>retreat</l></list></block><block s="doSetVar"><l>name</l><block s="evaluate"><block var="gobbler"/><list><l>before</l><block s="reportNewList"><list><l> </l></list></block></list></block></block><block s="doReport"><block s="reportNewList"><list><block var="name"/><l>niladic</l></list></block></block></script></block><block s="doSetVar"><l>name</l><block s="evaluate"><block var="gobbler"/><list><l>before</l><block s="reportNewList"><list><l> </l></list></block></list></block></block><custom-block s="space gobbler %s"><block var="gobbler"/></custom-block><block s="doSetVar"><l>params</l><block s="reportNewList"><list><custom-block s="new script parser %s"><block var="gobbler"/></custom-block></list></block></block><block s="doUntil"><block s="evaluate"><block var="gobbler"/><list><l>eat</l><l>)</l></list></block><script><block s="doRun"><block var="gobbler"/><list><l>retreat</l></list></block><custom-block s="space gobbler %s"><block var="gobbler"/></custom-block><block s="doAddToList"><custom-block s="new script parser %s"><block var="gobbler"/></custom-block><block var="params"/></block></script></block><custom-block s="space gobbler %s"><block var="gobbler"/></custom-block><block s="doReport"><block s="reportNewList"><list><block var="name"/><block var="params"/></list></block></block></script></block-definition><block-definition s="gobble leftovers %&apos;x&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doIf"><block s="reportEquals"><block s="reportListItem"><l>2</l><block var="x"/></block><l>lit</l></block><script><block s="doReport"><block s="reportJoinWords"><list><block s="reifyReporter"><autolambda><custom-block s="%s"><l></l></custom-block></autolambda><list></list></block><block s="reportListItem"><l>1</l><block var="x"/></block></list></block></block></script></block><block s="doIf"><block s="reportEquals"><block s="reportListItem"><l>2</l><block var="x"/></block><l>niladic</l></block><script><block s="doReport"><block s="reportListItem"><block s="reportListItem"><l>1</l><block var="x"/></block><block var="vars"/></block></block></script></block><block s="doIf"><block s="reportListItem"><block s="reportListItem"><l>1</l><block var="x"/></block><block var="vars"/></block><script><block s="doReport"><block s="reportJoinWords"><block s="reportCONS"><block s="reportListItem"><block s="reportListItem"><l>1</l><block var="x"/></block><block var="vars"/></block><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportJoinWords"><list><block s="reifyReporter"><autolambda><block s="reifyReporter"><script></script><list></list></block></autolambda><list></list></block><custom-block s="gobble leftovers %s"><l></l></custom-block></list></block></autolambda><list></list></block><block s="reportListItem"><l>2</l><block var="x"/></block></block></block></block></block></script></block><block s="doReport"><block s="reportJoinWords"><list><block s="reifyReporter"><autolambda><custom-block s="call-with-inputs-special-cbv %s %mult%s"><l></l><list><l></l></list></custom-block></autolambda><list></list></block><block s="reportListItem"><l>1</l><block var="x"/></block><block s="reportCONS"><block s="reportListAttribute"><l><option>length</option></l><block s="reportListItem"><l>2</l><block var="x"/></block></block><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportJoinWords"><list><block s="reifyReporter"><autolambda><block s="reifyReporter"><script></script><list></list></block></autolambda><list></list></block><custom-block s="gobble leftovers %s"><l></l></custom-block></list></block></autolambda><list></list></block><block s="reportListItem"><l>2</l><block var="x"/></block></block></block></list></block></block></script></block-definition><block-definition s="numlit %&apos;x&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doReport"><block s="reportQuotient"><block var="x"/><l>1</l></block></block></script><scripts><script x="233" y="41.833333333333314"><block s="doDeclareVariables"><list><l>arr</l><l>result</l><l>decimalpoint</l><l>power</l></list></block><block s="doSetVar"><l>arr</l><block s="reportTextSplit"><block var="x"/><l></l></block></block><block s="doSetVar"><l>result</l><l>0</l></block><block s="doFor"><l>i</l><l>1</l><block s="reportStringSize"><block var="x"/></block><script><block s="doIf"><block s="reportEquals"><block s="reportLetter"><block var="i"/><block var="x"/></block><l>.</l></block><script><block s="doSetVar"><l>decimalpoint</l><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doSetVar"><l>power</l><l>0.1</l></block></script></block><block s="doIfElse"><block var="decimalpoint"/><script><block s="doSetVar"><l>result</l><block s="reportVariadicSum"><list><block var="x"/><block s="reportVariadicProduct"><list><block var="power"/><block s="reportDifference"><block s="reportUnicode"><block s="reportLetter"><block var="i"/><block var="x"/></block></block><l>48</l></block></list></block></list></block></block><block s="doSetVar"><l>power</l><block s="reportQuotient"><block var="power"/><l>10</l></block></block></script><script><block s="doSetVar"><l>result</l><block s="reportVariadicSum"><list><block s="reportVariadicProduct"><list><block var="x"/><l>10</l></list></block><block s="reportDifference"><block s="reportUnicode"><block s="reportLetter"><block var="i"/><block var="x"/></block></block><l>48</l></block></list></block></block></script></block></script></block><block s="doReport"><block var="result"/></block></script><comment x="15" y="132.03333333333336" w="90" collapsed="false">me dumb&#xD;autoconvert!</comment></scripts></block-definition><block-definition s="USE BIGNUMS %&apos;bool&apos;" type="command" category="operators"><comment x="0" y="0" w="303.3333333333333" collapsed="false">call with True to turn on the entire Scheme numeric tower, including infinite-precision integers, exact rationals, and complex numbers; call with False to restore native JavaScript arithmetic.</comment><header></header><code></code><translations>pt:altera utilização de aritmética do Scheme para _&#xD;ca:sistema numèric d&apos;Scheme _&#xD;</translations><inputs><input type="%b"></input></inputs><script><block s="doApplyExtension"><l>src_load(url)</l><list><l>libraries/biginteger.js</l></list></block><block s="doApplyExtension"><l>src_load(url)</l><list><l>libraries/schemeNumber.js</l></list></block><block s="doApplyExtension"><l>src_load(url)</l><list><l>libraries/bignums.js</l></list></block><block s="doApplyExtension"><l>big_switch(bool)</l><list><block var="bool"/></list></block></script></block-definition><block-definition s="%&apos;n&apos; !" type="reporter" category="operators"><comment x="0" y="0" w="190.66666666666666" collapsed="false">The factorial function, to make very large numbers, to demo bignums.</comment><header></header><code></code><translations></translations><inputs><input type="%n"></input></inputs><script><block s="doReport"><block s="reportIfElse"><block s="reportEquals"><block var="n"/><l>0</l></block><l>1</l><block s="reportVariadicProduct"><list><block var="n"/><custom-block s="%n !"><block s="reportDifference"><block var="n"/><l>1</l></block></custom-block></list></block></block></block></script></block-definition><block-definition s="%&apos;x&apos;" type="reporter" category="operators"><comment x="0" y="0" w="234.66666666666666" collapsed="false">The identity function: reports its input.&#xD;It&apos;s useful to get things like 3/4 or 5-2i into&#xD;numeric input slots.</comment><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doReport"><block var="x"/></block></script></block-definition><block-definition s="Scheme number %&apos;function&apos; of %&apos;number&apos;" type="reporter" category="operators"><comment x="0" y="0" w="300" collapsed="true">Provides Scheme arithmetic functions not in JavaScript</comment><header></header><code></code><translations>pt:_ de _&#xD;ca:Scheme _ de _&#xD;</translations><inputs><input type="%s" readonly="true"><options>number?&#xD;complex?&#xD;real?&#xD;rational?&#xD;integer?&#xD;exact?&#xD;inexact?&#xD;exact&#xD;inexact&#xD;finite?&#xD;infinite?&#xD;nan?&#xD;numerator&#xD;denominator&#xD;real-part&#xD;imag-part&#xD;magnitude&#xD;angle</options></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportApplyExtension"><l>big_scheme(fn, num)</l><list><block var="function"/><block var="number"/></list></block></block></script></block-definition><block-definition s="blockify list %&apos;x&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="x"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportJoinWords"><list><block s="reifyReporter"><autolambda><block s="reportNewList"><list></list></block></autolambda><list></list></block><block s="reportCONS"><block s="reportListAttribute"><l><option>length</option></l><block var="x"/></block><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="blockify list %l"><l/></custom-block></autolambda><list></list></block><block var="x"/></block></block></list></block></block></script></block><block s="doReport"><block var="x"/></block></script></block-definition><block-definition s="if-cbn %&apos;x&apos; %&apos;y&apos; %&apos;z&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportIfElse"><block s="evaluate"><block var="x"/><list></list></block><block s="evaluate"><block var="y"/><list></list></block><block s="evaluate"><block var="z"/><list></list></block></block></block></script></block-definition><block-definition s="parse a string %&apos;x&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>escape</l><l>end</l><l>s</l><l>res</l></list></block><block s="doSetVar"><l>end</l><block s="evaluate"><block var="x"/><list><l>spit</l></list></block></block><block s="doSetVar"><l>s</l><block s="evaluate"><block var="x"/><list><l>spit</l></list></block></block><block s="doSetVar"><l>res</l><l></l></block><block s="doUntil"><block s="reportOr"><block s="evaluate"><block var="x"/><list><l>explode</l></list></block><block s="reportAnd"><block s="reportEquals"><block var="s"/><block var="end"/></block><block s="reportNot"><block var="escape"/></block></block></block><script><block s="doIfElse"><block s="reportEquals"><block var="s"/><l>\</l></block><script><block s="doIfElse"><block var="escape"/><script><block s="doSetVar"><l>res</l><block s="reportJoinWords"><list><block var="res"/><block var="s"/></list></block></block><block s="doSetVar"><l>escape</l><block s="reportBoolean"><l><bool>false</bool></l></block></block></script><script><block s="doSetVar"><l>escape</l><block s="reportBoolean"><l><bool>true</bool></l></block></block></script></block></script><script><block s="doIfElse"><block var="escape"/><script><block s="doSetVar"><l>escape</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><block s="doIfElse"><block s="reportEquals"><block var="s"/><block var="end"/></block><script><block s="doSetVar"><l>res</l><block s="reportJoinWords"><list><block var="res"/><block var="s"/></list></block></block></script><script><block s="doIfElse"><block s="reportOr"><block s="reportEquals"><block var="s"/><l>x</l></block><block s="reportEquals"><block var="s"/><l>u</l></block></block><script><block s="doSetVar"><l>s</l><block s="evaluate"><block var="x"/><list><l>spit</l></list></block></block><block s="doSetVar"><l>s</l><block s="reportJoinWords"><list><block var="s"/><block s="evaluate"><block var="x"/><list><l>spit</l></list></block></list></block></block><block s="doSetVar"><l>s</l><block s="reportJoinWords"><list><block var="s"/><block s="evaluate"><block var="x"/><list><l>spit</l></list></block></list></block></block><block s="doSetVar"><l>s</l><block s="reportJoinWords"><list><block var="s"/><block s="evaluate"><block var="x"/><list><l>spit</l></list></block></list></block></block><block s="doSetVar"><l>res</l><block s="reportJoinWords"><list><block var="res"/><block s="reportUnicodeAsLetter"><custom-block s="hex to int %s"><block var="s"/></custom-block></block></list></block></block></script><script><block s="doIfElse"><block s="reportEquals"><block var="s"/><l>n</l></block><script><block s="doSetVar"><l>res</l><block s="reportJoinWords"><list><block var="res"/><block s="reportUnicodeAsLetter"><l>10</l></block></list></block></block></script><script><block s="doIfElse"><block s="reportEquals"><block var="s"/><l>t</l></block><script><block s="doSetVar"><l>res</l><block s="reportJoinWords"><list><block var="res"/><block s="reportUnicodeAsLetter"><l>7</l></block></list></block></block></script><script><block s="doSetVar"><l>res</l><block s="reportJoinWords"><list><block var="res"/><l>\</l><block var="s"/></list></block></block></script></block></script></block></script></block></script></block></script><script><block s="doSetVar"><l>res</l><block s="reportJoinWords"><list><block var="res"/><block var="s"/></list></block></block></script></block></script></block><block s="doSetVar"><l>s</l><block s="evaluate"><block var="x"/><list><l>spit</l></list></block></block></script></block><block s="doReport"><block var="res"/></block></script></block-definition><block-definition s="hex to int %&apos;x&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l></list></block><block s="doSetVar"><l>a</l><l>0</l></block><block s="doForEach"><l>item</l><block s="reportTextSplit"><block var="x"/><l></l></block><script><block s="doSetVar"><l>a</l><block s="reportVariadicSum"><list><block s="reportVariadicProduct"><list><block var="a"/><l>16</l></list></block><block s="reportIfElse"><block s="reportIsA"><block var="item"/><l><option>number</option></l></block><block var="item"/><block s="reportDifference"><block s="reportUnicode"><block var="item"/></block><l>87</l><comment w="90" collapsed="false">assume lowercase</comment></block></block></list></block></block></script></block><block s="doReport"><block var="a"/></block></script></block-definition><block-definition s="more scratch %&apos;x&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%code"></input></inputs><script><block s="doReport"><custom-block s="gobble leftovers %s"><custom-block s="new script parser %s"><custom-block s="new gobbler %s"><block var="x"/></custom-block></custom-block></custom-block></block></script></block-definition><block-definition s="getvar-cbn %&apos;x&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doReport"><block s="reportListItem"><block s="evaluate"><block var="x"/><list></list></block><block var="vars"/></block></block></script></block-definition><block-definition s="define-cbn %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l><l>b</l></list></block><block s="doSetVar"><l>a</l><block s="evaluate"><block var="y"/><list></list></block></block><block s="doSetVar"><l>b</l><block s="reportTextSplit"><block var="y"/><l><option>blocks</option></l></block></block><block s="doDefineBlock"><l>block</l><block s="reportJoinWords"><list><l>(custom)</l><block s="evaluate"><block var="x"/><list></list></block><block s="reportIfElse"><block s="reportIsA"><block var="a"/><l><option>command</option></l></block><l> _</l><l></l></block></list></block><block var="a"/></block><block s="doSetBlockAttribute"><l><option>category</option></l><block var="block"/><l>11</l></block><block s="doSetBlockAttribute"><l><option>type</option></l><block var="block"/><l>2</l></block><block s="doSetBlockAttribute"><l><option>scope</option></l><block var="block"/><l>2</l></block><block s="doWait"><l>0</l></block><block s="doReplaceInList"><block s="evaluate"><block var="x"/><list></list></block><block var="vars"/><custom-block s="block named %s"><block s="reportJoinWords"><list><l>(custom)</l><block s="evaluate"><block var="x"/><list></list></block><block s="reportIfElse"><block s="reportIsA"><block var="a"/><l><option>command</option></l></block><l> _</l><l></l></block></list></block></custom-block></block><block s="doReport"><block var="a"/></block></script><scripts><script x="593" y="113.33333333333331"><block s="doIfElse"><block s="reportEquals"><block s="reportListItem"><l>1</l><block var="b"/></block><block s="reifyReporter"><autolambda><custom-block s="ringify-with-params-cbn %s %s"><l></l><l></l></custom-block></autolambda><list></list></block></block><script><block s="doDefineBlock"><l>block</l><block s="reportJoinWords"><list><l>(custom)</l><block s="evaluate"><block var="x"/><list></list></block><l> %</l><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block var="b"/></block></block></block></list></block><block s="evaluate"><block s="reportJoinWords"><custom-block s="%l deep replace getvars of %s"><block s="reportListItem"><l>3</l><block var="b"/></block><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block var="b"/></block></block></block></custom-block></block><list></list></block></block><block s="doSetBlockAttribute"><l><option>category</option></l><block var="block"/><l>11</l></block><block s="doReplaceInList"><block s="evaluate"><block var="x"/><list></list></block><block var="vars"/><block var="block"/></block><block s="doReport"><block var="a"/></block></script><script><block s="doDefineBlock"><l>block</l><block s="reportJoinWords"><list><l>(custom)</l><block s="evaluate"><block var="x"/><list></list></block></list></block><block var="y"/></block><block s="doSetBlockAttribute"><l><option>category</option></l><block var="block"/><l>11</l></block><block s="doReplaceInList"><block s="evaluate"><block var="x"/><list></list></block><block var="vars"/><block var="block"/></block><block s="doReport"><block var="a"/></block></script></block></script><script x="338.8837890625" y="261.1666666666667"><block var="block"/></script></scripts></block-definition><block-definition s="ringify-with-params-cbn %&apos;z&apos; %&apos;w&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportJoinWords"><list><block s="reifyScript"><script><block s="doRepeat"><l></l><script></script></block></script><list></list></block><l>1</l><block s="reportJoinWords"><list><block s="reportNewList"><list><block s="reifyScript"><script><block s="doDeclareVariables"><list><l>x</l><l>y</l></list></block></script><list></list></block></list></block><block s="reportNewList"><list><block s="reportJoinWords"><list><block s="reifyScript"><script><block s="doSetVar"><l></l><l></l></block></script><list></list></block><l>x</l><block var="z"/></list></block></list></block><block s="reportNewList"><list><block s="reportJoinWords"><list><block s="reifyScript"><script><block s="doSetVar"><l></l><l></l></block></script><list></list></block><l>y</l><block s="reportJoinWords"><list><block s="reifyReporter"><autolambda><block s="reifyReporter"><script></script><list></list></block></autolambda><list></list></block><block var="w"/></list></block></list></block></list></block><block s="reportNewList"><list><block s="reifyScript"><script><block s="doDeclareVariables"><list><l>temp</l><l>b</l></list></block><block s="doIfElse"><block s="reportListItem"><block var="x"/><block var="vars"/></block><script><block s="doSetVar"><l>temp</l><block s="reportListItem"><block var="x"/><block var="vars"/></block></block><block s="doReplaceInList"><block var="x"/><block var="vars"/><block var="#1"/></block><block s="doSetVar"><l>b</l><block s="evaluate"><block var="y"/><list></list></block></block><block s="doReplaceInList"><block var="x"/><block var="vars"/><block var="temp"/></block><block s="doReport"><block var="b"/></block></script><script><block s="doReplaceInList"><block var="x"/><block var="vars"/><block var="#1"/></block><block s="doSetVar"><l>b</l><block s="evaluate"><block var="y"/><list></list></block></block><block s="doDeleteFromList"><block var="x"/><block var="vars"/></block><block s="doReport"><block var="b"/></block></script></block></script><list><l>#1</l></list></block></list></block></list></block><l>#1</l></list></block></block></script><scripts><script x="303.14290364583337" y="21.166666666666686"><block s="reportJoinWords"><list><block s="reifyReporter"><autolambda><block s="reifyReporter"><script></script><list></list></block></autolambda><list></list></block><l></l></list></block></script></scripts></block-definition><block-definition s="+-cbn %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportVariadicSum"><list><block s="evaluate"><block var="x"/><list></list></block><block s="evaluate"><block var="y"/><list></list></block></list></block></block></script></block-definition><block-definition s="--cbn %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportDifference"><block s="evaluate"><block var="x"/><list></list></block><block s="evaluate"><block var="y"/><list></list></block></block></block></script></block-definition><block-definition s="*-cbn %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportVariadicProduct"><list><block s="evaluate"><block var="x"/><list></list></block><block s="evaluate"><block var="y"/><list></list></block></list></block></block></script></block-definition><block-definition s="/-cbn %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportQuotient"><block s="evaluate"><block var="x"/><list></list></block><block s="evaluate"><block var="y"/><list></list></block></block></block></script></block-definition><block-definition s="**-cbn %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportPower"><block s="evaluate"><block var="x"/><list></list></block><block s="evaluate"><block var="y"/><list></list></block></block></block></script></block-definition><block-definition s="%&apos;l&apos; deep replace %&apos;x&apos; %&apos;y&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input><input type="%s"></input><input type="%s"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="l"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="%l deep replace %s %s"><l/><block var="x"/><block var="y"/></custom-block></autolambda><list></list></block><block var="l"/></block></block></script></block><block s="doReport"><block s="reportIfElse"><block s="reportEquals"><block var="l"/><block var="x"/></block><block s="reportMonadic"><l><option>id</option></l><block var="y"/></block><block var="l"/></block></block></script></block-definition><block-definition s="%&apos;l&apos; deep replace getvars of %&apos;x&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input><input type="%s"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="l"/><l><option>list</option></l></block><script><block s="doIf"><block s="reportAnd"><block s="reportEquals"><block s="reportListItem"><l>1</l><block s="reportListItem"><l>2</l><block var="l"/></block></block><block s="reifyReporter"><autolambda><custom-block s="getvar-cbn %s"><l></l></custom-block></autolambda><list></list></block></block><block s="reportAnd"><block s="reportEquals"><block var="x"/><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block var="l"/></block></block></block></block></block><block s="reportEquals"><block s="reportListItem"><l>1</l><block var="l"/></block><block s="reifyReporter"><autolambda><block s="reifyReporter"><script></script><list></list></block></autolambda><list></list></block></block></block></block><script><block s="doReport"><block s="reportNewList"><list><block s="reifyReporter"><autolambda><block var=" "/></autolambda><list></list></block><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block s="reportListItem"><l>2</l><block var="l"/></block></block></block></block></list></block></block></script></block><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="%l deep replace getvars of %s"><l/><block var="x"/></custom-block></autolambda><list></list></block><block var="l"/></block></block></script></block><block s="doReport"><block var="l"/></block></script></block-definition><block-definition s="clean (custom) scheme" type="command" category="control"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doForEach"><l>item</l><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportAnd"><block s="reportEquals"><block s="reportBlockAttribute"><l><option>scope</option></l><block s="reifyReporter"><script></script><list></list></block></block><l>2</l></block><block s="reportAnd"><block s="reportBlockAttribute"><l><option>custom?</option></l><block s="reifyReporter"><script></script><list></list></block></block><block s="reportEquals"><block s="reportJoinWords"><block s="reportLetter"><block s="reportNumbers"><l>1</l><l>8</l></block><block s="reportBlockAttribute"><l><option>label</option></l><block s="reifyReporter"><script></script><list></list></block></block></block></block><l>(custom)</l></block></block></block></autolambda><list></list></block><block s="reportGet"><l><option>blocks</option></l></block></block><script><block s="doDeleteBlock"><block var="item"/></block></script></block></script></block-definition><block-definition s="call-with-input-cbn %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="evaluate"><block s="evaluate"><block var="x"/><list></list></block><list><block var="y"/></list></block></block></script></block-definition><block-definition s="call-with-inputs-special-cbv %&apos;x&apos; %&apos;y&apos;" type="reporter" category="scheme-blocks-patch"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%mult%s"></input></inputs><script><block s="doReport"><block s="evaluate"><block s="reportAttributeOf"><block s="reportListItem"><block var="x"/><block var="vars"/></block><block s="reifyReporter"><script></script><list></list></block></block><block s="reportMap"><block s="reifyReporter"><autolambda><block s="evaluate"><block s="reifyReporter"><script></script><list></list></block><list></list></block></autolambda><list></list></block><block var="y"/></block></block></block></script></block-definition><block-definition s="block named %&apos;x&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doReport"><block s="reportListItem"><l>1</l><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportAnd"><block s="reportBlockAttribute"><l><option>custom?</option></l><block s="reifyReporter"><script></script><list></list></block></block><block s="reportEquals"><block s="reportBlockAttribute"><l><option>label</option></l><block s="reifyReporter"><script></script><list></list></block></block><block var="x"/></block></block></autolambda><list></list></block><block s="reportGet"><l><option>blocks</option></l></block></block></block></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="1960"><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="1961"></list></costumes><sounds><list struct="atomic" id="1962"></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="1967"><costumes><list struct="atomic" id="1968"></list></costumes><sounds><list struct="atomic" id="1969"></list></sounds><blocks></blocks><variables></variables><scripts><script x="30" y="20"><block s="receiveGo"></block><custom-block s="USE BIGNUMS %b"><l><bool>true</bool></l></custom-block><block s="doSetVar"><l>vars</l><custom-block s="Standard Library"></custom-block></block><custom-block s="clean (custom) scheme"></custom-block></script><script x="30" y="131.83333333333331"><custom-block s="more scratch %code"><l>(if true "hello" "world")</l></custom-block></script><script x="30" y="164.83333333333331"><custom-block s="parse a string %s"><custom-block s="new gobbler %s"><l>|\t213\|123123|</l></custom-block><comment w="226" collapsed="false">easter egg:I was too lazy to check if the string is enclosed by quotes or double quotes here(i did it in the parser)</comment></custom-block></script><script x="30" y="245.83333333333331"><custom-block s="new script parser %s"><custom-block s="new gobbler %s"><l>(define "square" (lambda "x" (* (var "x") (var "x"))))</l></custom-block></custom-block></script><script x="30" y="282.8333333333333"><block s="reportNewList"><list><l>define</l><block s="reportNewList"><list><block s="reportNewList"><list><l>square</l><l>lit</l></list></block><block s="reportNewList"><list><l>lambda</l><block s="reportNewList"><list><block s="reportNewList"><list><l>x</l><l>lit</l></list></block><block s="reportNewList"><list><l>*</l><block s="reportNewList"><list><block s="reportNewList"><list><l>var</l><block s="reportNewList"><list><block s="reportNewList"><list><l>x</l><l>lit</l></list></block></list></block></list></block><block s="reportNewList"><list><l>var</l><block s="reportNewList"><list><block s="reportNewList"><list><l>x</l><l>lit</l></list></block></list></block></list></block></list></block></list></block></list></block></list></block></list></block></list></block></script><script x="30" y="530.0000000000002"><custom-block s="more scratch %code"><l>(define "square" (lambda "x" (* (var "x") (var "x"))))</l></custom-block></script><script x="30" y="563.0000000000002"><custom-block s="more scratch %code"><l>(apply (var "square") "4")</l></custom-block></script><script x="30" y="596.0000000000002"><custom-block s="more scratch %code"><l>(square "4")</l></custom-block></script><script x="30" y="629.0000000000002"><custom-block s="define-cbn %s %s"><block s="reifyReporter"><autolambda><custom-block s="%s"><l>square</l></custom-block></autolambda><list></list></block><block s="reifyReporter"><autolambda><custom-block s="ringify-with-params-cbn %s %s"><block s="reifyReporter"><autolambda><custom-block s="%s"><l>x</l></custom-block></autolambda><list></list></block><block s="reifyReporter"><autolambda><custom-block s="*-cbn %s %s"><block s="reifyReporter"><autolambda><custom-block s="getvar-cbn %s"><block s="reifyReporter"><autolambda><custom-block s="%s"><l>x</l></custom-block></autolambda><list></list></block></custom-block></autolambda><list></list></block><block s="reifyReporter"><autolambda><custom-block s="getvar-cbn %s"><block s="reifyReporter"><autolambda><custom-block s="%s"><l>x</l></custom-block></autolambda><list></list></block></custom-block></autolambda><list></list></block></custom-block></autolambda><list></list></block></custom-block></autolambda><list></list></block></custom-block></script><script x="30" y="750.0000000000002"><custom-block s="call-with-inputs-special-cbv %s %mult%s"><l>square</l><list><block s="reifyReporter"><autolambda><custom-block s="%s"><l>4</l></custom-block></autolambda><list></list></block></list></custom-block></script><script x="30" y="793.0000000000002"><block s="receiveUserEdit"><l><option>anything</option></l><list><l>data</l></list></block><block s="doSayFor"><l>WDYM edited?</l><l>2</l></block><block s="doSayFor"><block var="data"/><l>2</l></block></script></scripts></sprite><watcher var="tasks" style="normal" x="9.99999999999909" y="10.000000000000036" color="243,118,29" hidden="true"/><watcher var="vars" style="normal" x="10" y="10" color="243,118,29" hidden="true"/></sprites></stage><variables><variable name="vars"><list id="2152"><item><list id="2153"><item><l>if</l></item><item><context id="2154"><inputs></inputs><variables></variables><custom-block s="if-cbn %s %s %s"><l></l><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><context id="2161"><inputs></inputs><variables></variables><receiver><ref id="1967"></ref></receiver><origin></origin></context></context></item></list></item><item><list id="2163"><item><l>true</l></item><item><context id="2164"><inputs></inputs><variables></variables><block s="reportBoolean"><l><bool>true</bool></l></block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2169"><item><l>false</l></item><item><context id="2170"><inputs></inputs><variables></variables><block s="reportBoolean"><l><bool>false</bool></l></block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2175"><item><l>var</l></item><item><context id="2176"><inputs></inputs><variables></variables><custom-block s="getvar-cbn %s"><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2181"><item><l>define</l></item><item><context id="2182"><inputs></inputs><variables></variables><custom-block s="define-cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2188"><item><l>lambda</l></item><item><context id="2189"><inputs></inputs><variables></variables><custom-block s="ringify-with-params-cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2195"><item><l>+</l></item><item><context id="2196"><inputs></inputs><variables></variables><custom-block s="+-cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2202"><item><l>-</l></item><item><context id="2203"><inputs></inputs><variables></variables><custom-block s="--cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2209"><item><l>*</l></item><item><context id="2210"><inputs></inputs><variables></variables><custom-block s="*-cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2216"><item><l>/</l></item><item><context id="2217"><inputs></inputs><variables></variables><custom-block s="/-cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2223"><item><l>**</l></item><item><context id="2224"><inputs></inputs><variables></variables><custom-block s="**-cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item><item><list id="2230"><item><l>apply</l></item><item><context id="2231"><inputs></inputs><variables></variables><custom-block s="call-with-input-cbn %s %s"><l></l><l></l></custom-block><receiver><ref id="1967"></ref></receiver><origin><ref id="1967"></ref></origin><ref id="2161"></ref></context></item></list></item></list></variable></variables></scene></scenes></project><media name="scheme out scratch" app="Snap! 8.1, https://snap.berkeley.edu" version="2"></media></snapdata>