<snapdata remixID="14108783"><project name="DRAWSCAN" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><notes>Used With Snap+</notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAGC0lEQVR4AeycW2gdVRSG/0YTCAYMQm59EUGoior1ghqxWkVtpIilXmqlSkEfFEQxqOiDJE8KIqigCCJaWyxKRJEqalWsFi1KVbzQltILtCVJCeQlbSGEpHuacDgd5pA5M2vvvfbsP8w0M/vMrMu3Pk7aniEtAOa4k4EvBxIBTW5uJOCHAAX0w51ZFwhQwAUQ/OaHAAX0w51ZFwhQwAUQ/OaHQLwC+uHNrCkCFDAFhKduCVBAt7yZLUWAAqaA8NQtAQroljezpQhQwBQQnrolQAHd8taQTVUNFFDVOOIrhgLGN3NVHVNAVeOIrxgKGN/MVXVMAVWNI75iKGB8M1fVsVMBVXXOYlQQoIAqxhBvERQw3tmr6JwCqhhDvEVQwHhnr6JzCqhiDPEWQQGdzJ5JGhGggI3IcN0JAQroBDOTNCJAARuR4boTAhTQCWYmaUSAAjYiw3UnBChgk5gvMNe/bHZu+QgsdhUFXIxQ3es3meM9Zj9kdm4yBChgTo63mOt2mv0Bs282OzcZAhQwJ8ft5rpbzb7D7NzkCFDAnCzbzHWUz0AQ3iigMFCGa44ABWyOF68WJlBdAYVBMZwdAhTQDldGzUmAAuYExcvsEKCAdrgyak4CFDAnKF5mhwAFtMOVUXMSoIA5QQV0WVClUsCgxlW9Yilg9WYaVEcUMKhxVa9YCli9mQbVEQUMalzVK5YCVm+mQXUkKmBQnbNYFQQooIoxxFsEBYx39io6p4AqxhBvERQw3tmr6JwCqhhDvEVQQJHZM0hRAhSwKDneJ0KAAopgZJCiBChgUXK8T4QABRTByCBFCVDAouR4nwgBCiiCMd4gZTungGUJ8v5SBChgKXy8uSwBCliWIO8vRYAClsLHm8sSoIBlCSq5v729Hf39/UqqyV8GBczPSvWVg4ODGBgYUF1jVnHhCpjVTcRr4+Pj6O7uDo4ABQxuZNkFj42Noa+vL/tFxasU0NJwnnoVePhZS8Ezwo6OjlLADC7RLo0fAS69xl37iYC9vb3uEgpl4jugEMh0mE/fBlatT6/aO0/+DtjT02MvgaXIFNAS2CTs798DdzyYHNnfZ2Zm0Nraaj+RcAYKKAy0PtzfO4FlV9WviBxXKggFtDjOLa8Dj75gMUEFQlNAi0M8OQUc2Q9cfr3FJIGHpoCWB/jNx0D/KstJAg5PAS0P77tPgLVPWE4ScHgKaHl4h/cCHecDXUstJwo0PAV0MLhN5lORNY87SBRgiqYEDLA/FSX/uwu4ebWKUtQVQQEdjOS3b83HctcCS5aAXykCFDAFxNbpyLvAxhdtRZ+POzU1hY6OjvmTQP6kgI4Gte9P86nIcrvJkgcSQnskiwLadaIW/fP3gNvvq51aOUieCQztiRgKaEWF7KC/bAPu3pD9msQq3wElKKqMIVPU/38Al1wtEysrCgXMosK1GoEPzf8Hrn+mdip+MDk5ic7OTvG4NgPyR7BNuqnYM9PAgf+A5StSL0R8SgEdD/+HEeC6lY6TKk5HAR0P56vNwLqnHSdVnI4COh7OsYM484nI0ovAL0OAAhoIrretbwCrH3GdtVg+23dRQNuEM+Lv3gHctjbjhQiXKKCHoe/+Cbj4CuCccz0kV5aSAnoayNY3gY0veUquKC0F9DSMfX8Blzn8zQme2lw0LQVcFJGdC7ZtAlbcIxt7dnYWLS1hjTSsamXn5T3aj58B9z4mV8bExAS6urrkAjqIpFdAB837TrFX+BlBPozge6KB5f/gFeD+J+WKTp4H5AOpcjwrH2luDkjeBW+4U6bV5B2QD6TKsIwmys9fAlfeKNNuIiDfAWVYRhPli/eBDc/JtDs9PY22tjaZYI6i8B8hjkA3SnP8KHDqBHDhskZXVHudAiqY78g7wF3raoVEdUABFYx713Yj4EMKCvFQAgX0AD2d8p9f538Et5+XfqX586GhoeZv8ngHBfQIvz71R68BK9fUrxQ7Hh4eLnajp7sooCfw6bRvPQ98vSW9Wv1zClj9GavukAKqHk/1iztLwOq3yw61EaCA2iYSWT0UMLKBa2uXAmqbSGT1UMDIBq6t3dMAAAD//1EYJVwAAAAGSURBVAMAONpAYL4oJZsAAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="DRAWSCAN"><notes>Used With Snap+</notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="change z by %&apos;a&apos;" type="command" category="motion"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">10</input></inputs><script><block s="changeXPosition"><block var="a"/></block><block s="changeYPosition"><block var="a"/></block></script></block-definition><block-definition s="z position" type="reporter" category="motion"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportVariadicSum"><list><block s="xPosition"></block><block s="yPosition"></block></list></block></block></script></block-definition><block-definition s="position" type="reporter" category="motion"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportJoinWords"><list><block s="xPosition"></block><l> </l><block s="reportJoinWords"><list><block s="yPosition"></block><l>, </l></list></block><custom-block s="z position"></custom-block></list></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="error %&apos;a&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s" initial="1"></input></inputs><script><block s="doApplyExtension"><l>err_error(msg)</l><list><block var="a"/></list></block></script></block-definition><block-definition s="clicked?" type="predicate" category="sensing"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportVariadicAnd"><list><block s="reportTouchingObject"><l><option>mouse-pointer</option></l></block><block s="reportMouseDown"></block></list></block></block></script></block-definition><block-definition s="milliseconds in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">second<options>second&#xD;minute&#xD;hour&#xD;day&#xD;week&#xD;month&#xD;year&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>second</l></list></block><script><block s="doReport"><l>1000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>minute</l></list></block><script><block s="doReport"><l>60000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>hour</l></list></block><script><block s="doReport"><l>3600000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>day</l></list></block><script><block s="doReport"><l>86400000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>week</l></list></block><script><block s="doReport"><l>604800000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>month</l></list></block><script><block s="doReport"><l>2627856000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>year</l></list></block><script><block s="doReport"><l>31534272000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>decade</l></list></block><script><block s="doReport"><l>315342720000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>century</l></list></block><script><block s="doReport"><l>3153427200000</l></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block var="choice"/><l>millenium</l></list></block><script><block s="doReport"><l>31534272000000</l></block></script><list></list></block></script></block-definition><block-definition s="seconds in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;minute&#xD;hour&#xD;day&#xD;week&#xD;month&#xD;year&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>millisecond</l></list></block><script><block s="doReport"><l>0.001</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="milliseconds in a %s"><block var="choice"/></custom-block><l>1000</l></block></block></script></block></script></block-definition><block-definition s="minutes in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;hour&#xD;day&#xD;week&#xD;month&#xD;year&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>second</l></list></block><script><block s="doReport"><l>0.0166666667</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="seconds in a %s"><block var="choice"/></custom-block><l>60</l></block></block></script></block></script></block-definition><block-definition s="hours in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;day&#xD;week&#xD;month&#xD;year&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>minute</l></list></block><script><block s="doReport"><l>0.0166666667</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="minutes in a %s"><block var="choice"/></custom-block><l>60</l></block></block></script></block></script></block-definition><block-definition s="days in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;hour&#xD;week&#xD;month&#xD;year&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>hour</l></list></block><script><block s="doReport"><l>0.0416667</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="hours in a %s"><block var="choice"/></custom-block><l>24</l></block></block></script></block></script></block-definition><block-definition s="weeks in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;hour&#xD;day&#xD;month&#xD;year&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>day</l></list></block><script><block s="doReport"><l>0.1428571429</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="days in a %s"><block var="choice"/></custom-block><l>7</l></block></block></script></block></script></block-definition><block-definition s="months in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;hour&#xD;day&#xD;week&#xD;year&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>week</l></list></block><script><block s="doReport"><l>0.2301495972</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="weeks in a %s"><block var="choice"/></custom-block><l>4.345</l></block></block></script></block></script></block-definition><block-definition s="years in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;hour&#xD;day&#xD;week&#xD;month&#xD;decade&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>month</l></list></block><script><block s="doReport"><l>0.08333333333</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="months in a %s"><block var="choice"/></custom-block><l>12</l></block></block></script></block></script></block-definition><block-definition s="decades in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;hour&#xD;day&#xD;week&#xD;month&#xD;year&#xD;century&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>year</l></list></block><script><block s="doReport"><l>0.1</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="years in a %s"><block var="choice"/></custom-block><l>10</l></block></block></script></block></script></block-definition><block-definition s="centuries in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;hour&#xD;day&#xD;week&#xD;month&#xD;year&#xD;decade&#xD;millenium</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>decade</l></list></block><script><block s="doReport"><l>0.1</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="decades in a %s"><block var="choice"/></custom-block><l>10</l></block></block></script></block></script></block-definition><block-definition s="milleniums in a %&apos;choice&apos;" type="reporter" category="sensing"><header></header><code></code><translations></translations><inputs><input type="%s" readonly="true" initial="1">millisecond<options>millisecond&#xD;second&#xD;minute&#xD;hour&#xD;day&#xD;week&#xD;month&#xD;year&#xD;decade&#xD;century</options></input></inputs><script><block s="doIfElse"><block s="reportVariadicEquals"><list><block var="choice"/><l>century</l></list></block><script><block s="doReport"><l>0.1</l></block></script><script><block s="doReport"><block s="reportQuotient"><custom-block s="centuries in a %s"><block var="choice"/></custom-block><l>10</l></block></block></script></block></script></block-definition><block-definition s="OE list" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportNewList"><list><l>1</l><l>3</l><l>5</l><l>7</l><l>9</l></list></block></block></script></block-definition><block-definition s="EE list" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportNewList"><list><l>0</l><l>2</l><l>4</l><l>6</l><l>8</l></list></block></block></script></block-definition><block-definition s="is %&apos;n&apos; odd?" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportListContainsItem"><custom-block s="OE list"></custom-block><block s="reportLetter"><l><option>last</option></l><block var="n"/></block></block></block></script></block-definition><block-definition s="is %&apos;n&apos; even?" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">0</input></inputs><script><block s="doReport"><block s="reportListContainsItem"><custom-block s="EE list"></custom-block><block s="reportLetter"><l><option>last</option></l><block var="n"/></block></block></block></script></block-definition><block-definition s="10^ %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportMonadic"><l><option>10^</option></l><block var="n"/></block></block></script></block-definition><block-definition s="2^ %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportMonadic"><l><option>2^</option></l><block var="n"/></block></block></script></block-definition><block-definition s="e^ %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input></inputs><script><block s="doReport"><block s="reportMonadic"><l><option>e^</option></l><block var="n"/></block></block></script></block-definition><block-definition s="e" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportMonadic"><l><option>e^</option></l><l>1</l></block></block></script></block-definition><block-definition s="√ %&apos;n&apos;" type="reporter" category="operators" space="true"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input></inputs><script><block s="doReport"><block s="reportMonadic"><l><option>sqrt</option></l><block var="n"/></block></block></script></block-definition><block-definition s="∛ %&apos;n&apos; %&apos;n2&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input><input type="%n" initial="1"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l></list></block><block s="doSetVar"><l>a</l><block s="reportMonadic"><l><option>sqrt</option></l><block var="n"/></block></block><block s="doReport"><block s="reportQuotient"><block var="a"/><block var="n2"/></block></block></script></block-definition><block-definition s="%&apos;n&apos; ^2" type="reporter" category="operators" space="true"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportPower"><block var="n"/><l>2</l></block></block></script></block-definition><block-definition s="%&apos;n&apos; ^3" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportPower"><block var="n"/><l>3</l></block></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="reportVariadicEquals"><list><block var="n"/><l>0</l></list></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="half of %&apos;n&apos;" type="reporter" category="operators" space="true"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportQuotient"><block var="n"/><l>2</l></block></block></script></block-definition><block-definition s="quarter of %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportQuotient"><block var="n"/><l>4</l></block></block></script></block-definition><block-definition s="eigth of %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportQuotient"><block var="n"/><l>8</l></block></block></script></block-definition><block-definition s="third of %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportQuotient"><block var="n"/><l>3</l></block></block></script></block-definition><block-definition s="fifth of %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportQuotient"><block var="n"/><l>5</l></block></block></script></block-definition><block-definition s="tenth of %&apos;n&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportQuotient"><block var="n"/><l>10</l></block></block></script></block-definition><block-definition s="%&apos;x&apos; &lt;&lt; %&apos;y&apos;" type="predicate" category="operators" space="true"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input><input type="%n" initial="1"></input></inputs><script><block s="doReport"><block s="reportVariadicLessThan"><list><block var="x"/><block s="reportQuotient"><block var="y"/><l>10</l></block></list></block></block></script></block-definition><block-definition s="%&apos;x&apos; ≠ %&apos;y&apos;" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input><input type="%n" initial="1"></input></inputs><script><block s="doReport"><block s="reportNot"><block s="reportVariadicEquals"><list><block var="x"/><block var="y"/></list></block></block></block></script></block-definition><block-definition s="%&apos;x&apos; ≈ %&apos;y&apos;" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input><input type="%n" initial="1"></input></inputs><script><block s="doReport"><block s="reportVariadicOr"><list><block s="reportVariadicEquals"><list><block s="reportRound"><block var="x"/></block><block var="y"/></list></block><block s="reportVariadicEquals"><list><block s="reportRound"><block var="y"/></block><block var="x"/></list></block></list></block></block></script></block-definition><block-definition s="%&apos;x&apos; &gt;&gt; %&apos;y&apos;" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1"></input><input type="%n" initial="1"></input></inputs><script><block s="doReport"><block s="reportVariadicGreaterThan"><list><block var="x"/><block s="reportVariadicProduct"><list><block var="y"/><l>10</l></list></block></list></block></block></script></block-definition><block-definition s="%&apos;n&apos; v" type="reporter" category="operators" space="true"><header></header><code></code><translations></translations><inputs><input type="%n" initial="1">1</input></inputs><script><block s="doReport"><block s="reportDifference"><block s="reportVariadicProduct"><list><block s="reportVariadicSum"><list><block var="n"/><l>9</l></list></block><block var="n"/></list></block><l>10</l></block></block></script></block-definition><block-definition s="USE BIGNUMS %&apos;bool&apos;" type="command" category="operators" space="true"><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;pl:system liczbowy 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="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;pl:liczba _ z _&#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></blocks><primitives></primitives><stage name="Stage" width="480" height="360" costume="1" 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="703"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAQAElEQVR4AezdW6wtd10H8N9Q2kopCARBvKAlkiAotdBSrnIRCw20YGKaGOPlwfiiDyY+mPhgePHFRHnyUWOC+sCLSLkJWkq4FXoKKaCoCCgoCiJUoEJpe8bf7K61zpyevc9el1lrZv7/z8n818zeey7/3+e/9v6emXV7RPhHgAABAgQIHFxAAB+c3AEJECBAgEBE3QHsHkCAAAECBEYSEMAjwTssAQIECNQtIIDrHX+VEyBAgMCIAgJ4RHyHJkCAAIF6BQRwvWNfd+WqJ0CAwMgCAnjkAXB4AgQIEKhTQADXOe6qrltA9QQITEBAAE9gEHSBAAECBOoTEMD1jbmKCdQtoHoCExEQwBMZCN0gQIAAgboEBHBd461aAgTqFlD9hAQE8IQGQ1cIECBAoB4BAVzPWKuUAAECdQtMrHoBPLEB0R0CBAgQqENAANcxzqokQIAAgYkJHDiAJ1a97hAgQIAAgZEEBPBI8A5LgAABAnULCOADjr9DESBAgACBpYAAXkqYEyBAgACBAwoI4ANi130o1RMgQIBAX0AA9zUsEyBAgACBAwkI4ANBO0zdAqonQIDAwwUE8MNFfE2AAAECBA4gIIAPgOwQBOoWUD0BAscJCODjVHyPAAECBAjsWUAA7xnY7gkQqFtA9QROEhDAJ8n4PgECBAgQ2KOAAN4jrl0TIECgbgHVX0xAAF9Mx88IECBAgMCeBATwnmDtlgABAgTqFjitegF8mpCfEyBAgACBPQgI4D2g2iUBAgQIEDhNoOwAPq16PydAgAABAiMJCOCR4B2WAAECBOoWEMDljr/KCBAgQGDCAgJ4woOjawQIECBQroAALnds665M9QQIEJi4gACe+ADpHgECBAiUKSCAyxxXVdUtoHoCBGYgIIBnMEi6SIAAAQLlCQjg8sZURQTqFlA9gZkICOCZDJRuEiBAgEBZAgK4rPFUDQECdQuofkYCAnhGg6WrBAgQIFCOgAAuZyxVQoAAgboFZla9AJ7ZgOkuAQIECJQhIIDLGEdVECBAgMDMBAYO4JlVr7sECBAgQGAkAQE8ErzDEiBAgEDdAgJ4wPG3KwIECBAgsK6AAF5XynoECBAgQGBAAQE8IGbdu1I9AQIECGwiIIA30bIuAQIECBAYSEAADwRpN3ULqJ4AAQKbCgjgTcWsT4AAAQIEBhAQwAMg2gWBugVUT4DANgICeBs12xAgQIAAgR0FBPCOgDYnQKBuAdUT2FZAAG8rZzsCBAgQILCDgADeAc+mBAgQqFtA9bsICOBd9GxLgAABAgS2FBDAW8LZjAABAgTqFti1egG8q6DtCRAgQIDAFgICeAs0mxAgQIAAgV0F5h3Au1ZvewIECBAgMJKAAB4J3mEJECBAoG4BATzf8ddzAgQIEJixgACe8eDpOgECBAjMV0AAz3fs6u656gkQIDBzAQE88wHUfQIECBCYp4AAnue46XXdAqonQKAAAQFcwCAqgQABAgTmJyCA5zdmekygbgHVEyhEQAAXMpDKIECAAIF5CQjgeY2X3hIgULeA6gsSEMAFDaZSCBAgQGA+AgJ4PmOlpwQIEKhboLDqBXBhA6ocAgQIEJiHgACexzjpJQECBAgUJrBhABdWvXIIECBAgMBIAgJ4JHiHJUCAAIG6BQTwBuNvVQIECBAgMJSAAB5K0n4IECBAgMAGAgJ4A6y6V1U9AQIECAwpIICH1LQvAgQIECCwpoAAXhPKanULqJ4AAQJDCwjgoUXtjwABAgQIrCEggNdAsgqBugVUT4DAPgQE8D5U7ZMAAQIECJwiIIBPAfJjAgTqFlA9gX0JCOB9ydovAQIECBC4iIAAvgiOHxEgQKBuAdXvU0AA71PXvglsKdBGPDrbn2W7PdtTttyNzQgQmLCAAJ7w4OhanQKLwH1/Vv8r2V6a7feymQgQOLDAvg8ngPctbP8ENhDI8H1Wrn5HtmuyLacPLBfMCRAoR0AAlzOWKpm5QIbvK7OED2V7arZuuj9vfrmJ+IucmwgQKExg2gFcGLZyCJwkkOH7q/mzd2R7bLZu+kbe3Jjh+6acmwgQKFBAABc4qEqal0CG7+9nj/8026XZuunf8uZFGb5/l3MTAQKFCgjg6Q6snhUukMF7abY/zzJ/N1vmbd5GnMnb6/OLT+XcRIBAwQICuODBVdp0BTJ4H5e9e0+2X8y2nG7NhZdm+H455yYCBAoXEMCFD/Bsyyu44xm+j87yupcZdS8xysWj6Y/z9vUZvv+XcxMBAhUICOAKBlmJkxN4ZvboJ7J109m8+e0M3t/M1i3nlyYCBGoQEMA1jLIaJyWQQXtndqh77Pe/c/7z+fUf5bw/WSZAoAIBAVzBICtxegIZur+U7UnZ/mp6vdMjAgQOISCAD6HsGAQIrC9gTQKVCAjgSgZamQQIECAwLQEBPK3x0BsCBOoWUH1FAgK4osFWKgECBAhMR0AAT2cs9IQAAQJ1C1RWvQCubMCVS4AAAQLTEBDA0xgHvSBAgACBygQeFsCVVa9cAgQIECAwkoAAHgneYQkQIECgbgEB3Bt/iwQIECBA4FACAvhQ0o5DgAABAgR6AgK4h1H3ouoJECBA4JACAviQ2o5FgAABAgQWAgJ4AWFWt4DqCRAgcGgBAXxocccjQIAAAQIpIIATwUSgbgHVEyAwhoAAHkPdMQkQIECgegEBXP1dAACBugVUT2AsAQE8lrzjEiBAgEDVAgK46uFXPAECdQuofkwBATymvmMTIECAQLUCArjaoVc4AQIE6hYYu3oBPPYIOD4BAgQIVCkggKscdkUTIECAwNgC4wbw2NU7PgECBAgQGElAAI8E77AECBAgULeAAB5v/B2ZAAECBCoWEMAVD77SCRAgQGA8AQE8nn3dR1Y9AQIEKhcQwJXfAZRPgAABAuMICOBx3B21bgHVEyBAIASwOwEBAgQIEBhBQACPgO6QBKoWUDwBAkcCAviIwQ0BAgQIEDisgAA+rLejESBQt4DqCawEBPCKwgIBAgQIEDicgAA+nLUjESBAoG4B1Z8nIIDP4/AFAQIECBA4jIAAPoyzoxAgQIBA3QIXVC+ALyDxDQIECBAgsH8BAbx/Y0cgQIAAAQIXCFQVwBdU7xsECBAgQGAkAQE8ErzDEiBAgEDdAgK4mvFXKAECBAhMSUAAT2k09IUAAQIEqhEQwNUMdd2Fqp4AAQJTExDAUxsR/SFAgACBKgQEcBXDrMi6BVRPgMAUBQTwFEdFnwgQIECgeAEBXPwQK5BA3QKqJzBVAQE81ZHRLwIECBAoWkAAFz28iiNAoG4B1U9ZQABPeXT0jQABAgSKFRDAxQ6twggQIFC3wNSrF8BTHyH9I0CAAIEiBQRwkcOqKAIECBCYusB+A3jq1esfAQIECBAYSUAAjwTvsAQIECBQt4AA3t/42zMBAgQIEDhRQACfSOMHBAgQIEBgfwICeH+2de9Z9QQIECBwUQEBfFEePyRAgAABAvsREMD7cbXXugVUT4AAgVMFBPCpRFYgQIAAAQLDCwjg4U3tkUDdAqonQGAtAQG8FpOVCBAgQIDAsAICeFhPeyNAoG4B1RNYW0AAr01lRQIECBAgMJyAAB7O0p4IECBQt4DqNxIQwBtxWZkAAQIECAwjIICHcbQXAgQIEKhbYOPqBfDGZDYgQIAAAQK7Cwjg3Q3tgQABAgQIbCxQVABvXL0NCBAgQIDASAICeCR4hyVAgACBugUEcDHjrxACBAgQmJOAAJ7TaOkrAQIECBQjIICLGcq6C1E9AQIE5iYggOc2YvpLgAABAkUICOAihlERdQuongCBOQoI4DmOmj4TIECAwOwFBPDsh1ABBOoWUD2BuQoI4LmOnH4TIECAwKwFBPCsh0/nCRCoW0D1cxYQwHMePX0nQIAAgdkKCODZDp2OEyBAoG6BuVcvgOc+gvpPgAABArMUEMCzHDadJkCAAIG5C+wWwHOvXv8JECBAgMBIAgJ4JHiHJUCAAIG6BQTw9uNvSwIECBAgsLWAAN6azoYECBAgQGB7AQG8vV3dW6qeAAECBHYSEMA78dmYAAECBAhsJyCAt3OzVd0CqidAgMDOAgJ4Z0I7IECAAAECmwsI4M3NbEGgbgHVEyAwiIAAHoTRTggQIECAwGYCAngzL2sTIFC3gOoJDCYggAejtCMCBAgQILC+gABe38qaBAgQ2Eigbdu/zHZvtjdutOFUV9avQQUE8KCcdkaAAIGHBDJ0u7+vv5BfXZHt17OZCJwn0N1BzvuGLwgQIEBgd4Gmac7mXrqWs7giA7npFrTZCgzecQE8OKkdEiBAYCVw32op4nt6yxYJhAB2JyBAgMD+BL7d2/WjessWCcwrgI0XAQIEZibwnV5/nQH3MCyGAHYnIECAwB4FBPAecee+a5egZzOCOkqAwAwFBPAMB+1QXRbAh5J2HAIEahTwGHCNo75mzQJ4TSirjSvg6PsXONPGM+5q47fubONp+z9aNUdwBlzNUG9eqADe3MwWBIoT+FAb3TN072gjundselNxBY5XkAAez37yRxbAkx8iHSSwf4F/j3gww/fy7khNxAs/0sZV3bK2s4AA3pmw3B0I4HLHVmUE1ha4pYnvZvD+zXKD/MPw+uWy+U4CAngnvrI3zt+zsgtUHQEC6wnkGfBbe2u+rrc86uLMD+5JWDMfwH12XwDvU9e+CcxIIM+AuwB+sOtyLr84Hxd+Qres7STgDHgnvrI3FsBlj6/qCKwtcG0TX82VP5ytmy65LOKmbkHbSWDHAN7p2DaeuIAAnvgA6R6BAwv89fJ4eUn65uWy+dYCAnhruvI3FMDlj7EKCawtkJee37JcOf843PCZNo6eGb38nvnGAh4D3pjs3AalL+XvWOklqo8AgXUFntvEv+S6n84WeQZ85dcifrZb1rYW6H8cof/MbM1Y5oYCuMxxVRWBXQS6J2MdbZ9/IDwOfCSx9U3/EnT3Zidb78iG5Qnk79dFivIjAgSqE3ggYnUZOiJe17aRV6ZzybSNQP8StI8j3Eaw4G0EcMGDqzQC2whcH/GR3O6/snXJ++SPRjy/W9a2EuifAQvgrQjL3UgAnzy2fkKgSoGmiTzpjf5laO+Ktf09QQBvb1f8lgK4+CFWIIHNBfKa8yqAc9nLkTYnXG4hgJcS5hcICOALSHzjSMBN1QKfi3hPAnwrWzc94442nt4taBsL9B8D9iSsjfnK3kAAlz2+qiOwlUD34QxtxOrDGS6JcBk6tvrnDHgrtjo2EsB1jLMqNxOw9kMCq8vQ+aUPZ0iELSYBvAVaLZsI4FpGWp0ENhS4POLW3OSBbN2zoV/wwTae1C1rGwkI4I246lpZANc13qolcLrAYo1nN/H1vAz9gcWXj7gs4rWLZbP1BfoB7DHg9d2qWFMAVzHMiiSwnUD+gVh9OEMuuwy9OWP/SVheB7y5X9Fb5O9U0fUpjgCBHQTyD8TqXbHORtxwpo0rdtjdHDYduo/9M2ABPLTuhbe/6wAADqZJREFUzPeXv18zr0D3CRDYm8A1TfxrRHwiW/c4cBcgN3TL2toCAnhtqvpWFMD1jbmKCWwkkGe+q2dDNxE+nGEjvZhXAG9Wm7V3FBDAOwLanEDpAm3E6nHgXL75DW34u7H+oHcfR5hsRxt8T9u2+X+Yo2U3BPwiuQ8QIHBxgeubOJNr/Ee2bnpingK/qFvQThdomqYL3y6Elytfvlwwn5zAwTvkf7IHJ3dAArMU6J8Fezb0ZkPYvwztpUib2RW9tgAuengVR2AwgX4A/9xge61jR16KVMc4b1zlpAJ4497bgACBgwh8M+K2PNA3skU+iPm0j7XxzG5ZW0ugfwbcPZN8rY2sVL6AAC5/jFVIYGeBlzfxQD6Y+c7ljs5G+IjCJcbpcwF8ulGVawjgyQy7jhCYtkCe+a5ejpQ99elIibDm1A9gjwGviVbDagK4hlFWI4FhBN6eu7k/Wzc970wbT+kWtFMFPAZ8KlGdKwjgOsd9clXr0PQFrm3if7OXt2frpiYvQ9/ULWinCvTPgD0GfCpXPSsI4HrGWqUEdhbIx4FXl6Hzj4eXI60nKoDXc6purfwdqq5mBROYmMB8upMB3L0cKWcR+Zjwz3yqjSvDv9MEBPBpQpX+XABXOvDKJrCNwPOa+GJu9/FskSl8eT64+epuWbuoQD+APQnrolR1/VAA1zXeqiUwhMDqIwrzLHjnx4GH6NDE95H/T1n10GPAKwoLAth9gACBjQTyj8bqceDc8KY3t3FJzk0nC/TPgAXwyU7V/SR/l6qrWcEECOwg8Jwm7s7Lz19Y7OLxT4v46cWy2fECFwng4zfw3ToEBHAd46xKAoMK5KXn1WXo3LFnQyfCRaZ+AHsM+CJQtf1IANc24uolMIBABnD3bOjlnrwr1lLi+Hk/gH0cYc+o9kUBXPs9QP0EthD4bMT7crOvZ+umH/lIG1d3C9qxAv0AdgZ8LFGd3xTAdY67qgnsJHBLEw/m48DdW1Me7eeSCM+GPpI49qYfwJ6EdSxRjd+MEMB1jruqCews0ET0nw3tMvTJol6GdLJN1T8RwFUPv+IJbC+Qp3XvyhC+b7GH59zdxg8tls3OF0iq1TecAa8oLNQcwEafAIEdBF7cxDdz89uydVNzf8TN3YJ2gYAAvoDENzoBAdwpaAQIbCWQjwOvLkPnssvQxyv2A9iTsI43qvK7ArjKYY8IdRMYRqB7OVJmb0Rejn7ZHW08Nvx7uIDHgB8u4usjAQF8xOCGAIFtBK5t4j8zfe9cbHvpIyNeu1g2OyfwnXOL4THgHkbtiwK49ntAnfWrekCBDODVu2LlspcjXWgrgC808Z0UEMCJYCJAYHuBy3ovR8rL0De+t408Ed5+fwVu2Q9gjwEXOMDbliSAt5WzHYG5Cgzc759q4u9zl5/L1k3f+5iIV3QL2kqgH8AuQa9YLAhg9wECBIYQWF2GzrNgL0c6X9STsM738NVCQAAvIMwIENhe4GxE92zoox3k48BTfjnSUR8PfOMM+MDgczmcAJ7LSOkngQkLvCPiA9m9r2brph+8q43ndgvakUA/gD0GfETiphMQwJ2CRoDATgJvaCJPguNty53kWbDPCF5iRPQDeNyPIzzXJ0sTEBDAExgEXSBQgsCDvWdDZz0COBG6qWma/P9ILN8zu2nbVgh3MFoIYHcCAgQGEbgn4t2ZNMuzvWd/uI0fDf+WAkuX7muXoTuFw7fJHVEAT25IdIjAPAVe1cS92fP3ZDuaLvXhDEcOi5t+AHsp0gKl9pkArv0eoH4CAwo051+G9mzoc7ZeinTOwtJC4KABvDimGQEChQrkWW/36UjdE7K6Cl/yiTYe3y1o5z0RyxmwO8SRgAA+YnBDgMAQAlc38ZV8HPiOxb4eeV+E94Z+CKN/CdpjwA+ZVH8rgA92F3AgAnUI5B+V/rtiCeCHhr0fwM6AHzKp/jZ/V6o3AECAwIACef25uwy93OOr39zGZcsvKp5/u1e7AO5h1LwogGse/QPW7lD1CFzXxD/lZeh/XlR85VURr1ws1zxzBlzz6J9QuwA+Aca3CRDYSWB1GTr/yPhwhvPfDctjwDvdtcrZOH83yilGJQSmKVBfr/IMePXhDHlJ+nVtG019CudV7Az4PA5fdAICuFPQCBAYVOC6iA/nDr+crUve778r4nndcsVNAFc8+CeVLoBPkvF9AgS2FmiaaHPjW7PFotX+3tCehLW4I5idExDA5ywsESAwoEBec15dhs7d1h7AzoDzTmA6X0AAn+/hKwIEBhJ4bET3vtDd+0N3e3zmh9r4sW6hrraqth/AnoS1Yql7QQDXPf6qJ7A3gac3Rx/B9+7lAS6r+8MZ+gHs4wiXd4rK5wK48juA8gnsWaB/GbrmD2foB3A1Z8B7vm/NfvcCePZDqAAC0xV4MOJt2buc5W3EC8+08cSjpfpu+gHsnbDqG/9jKxbAx7L4JgECQwhc38T/tBEfXOzrkqbeD2cQwIs7QT2z0ysVwKcbWYMAgd0EVu+KlWFc67tieRnSbvehIrcWwEUOq6IITEfgbMQqgCPihs+0UeOTkPpnwB4DzjuCKaLkADa+BAhMQCAvQ38+u/GpbN10xT0Rr+oWKmv9APYYcGWDf1K5AvgkGd8nQGAwgSZi9RGFuVzjZWgBPNi9qZwdCeByxvL8SnxFYEICeRm6/3Kkm9/QRm1/ezwGPKH741S6UtsvwVTc9YNAVQLXNfHRLPhL2brp+14T8YJuoaLmDLiiwV63VAG8rpT15iSgr9MUWF2Gzu7V9t7Q/QD2JKy8A5iiustAxpwAgZEEmojVZehcru1dsfoB7ElYI90Hp3ZYZ8BTGxH9IbCrwES3/2zEbW3ENxfde/pdbfz4YrmGmQCuYZQ3rFEAbwhmdQIEthO4pYnv5pnvu5Zbn63rXbE8CWs58OYrAQG8orBAgMC+BTKAV5eh81j7uAydu53k1D8D9hjwJIfo8J0SwIc3d0QC1QrkH5y3Z/EPZIsM4+vvaOPJ3XIFrR/ANb4TWAVDvHmJ+fuw+Ua2IECAwDYC1zRxTz4O/L7Fto+4tJLPCG6aJq+4x3eXdbdte9liediZvc1KQADParh0lsD8BfLMd3UZOsO4ppcj9c+CXYae/1155woE8M6EdkCAwIYCXQBn9kZ3GfqVd7fx6KjjXz+AvRRp+DGf3R4F8OyGTIcJzFvg2ia+kBXcnS0yhS/PB4Rr+XAGAdwNurYSEMArCgsECBxQYPWuWBnCtXw4g5ciHfAONodDDRrAcyhYHwkQGF8gQ/cty17k8k1vbuOS5dcFz/tnwB4DLnig1y1NAK8rZT0CBAYTuK6Jj2fwfrHbYRPxhKsiXtItF976Aewx4MIHe53yBPA6SmutYyUCBDYU6J6MtdykhsvQAng52uZHAgL4iMENAQIjCPQDuIZ3xfIY8Ah3sikfUgBPeXRm1DddJbCpwLcibo+IeyL/5WXoq8608ZO5WPLUPwN+VMmFqm09AQG8npO1CBAYWODlTTyQu+zemjJn0b0muPTL0P0A9hhw+CeA3QcI7CxgB9sKnI24tbdt6e+KJYB7g20xQgC7FxAgMJpABvA78+D3Z+velOPaj7XxA91yoU0AFzqw25YlgLeVsx0BAkcCu9w8v4lv5Pa3Zeum7hMLSj4L9iSsbpS1lYAAXlFYIEBgJIH+s6FLDuD+GbAnYY10Z5vSYQXwlEZDXwhUKJB/hLoAbhelv+If23jMYnkGs4262A/gyzfa0spFCuR9v8i6FEWAwEwEntPElzJ971p099J7I25cLJc26wewM+DSRneLegTwFmg2IUBgWIEmojsLPtpphnGpL0fqB3ARL0M6GjA3WwsI4K3pbEiAwIACqwDOfb7mvW08MuelTQK4tBHdsR4BvCOgzQkQ2F3g2iY+mWe+n1/s6XFXRrwsyvsngIsa092LEcC7G9oDAQLDCKzOgvOSdImXofsvQ/IY8DD3mVnvRQDPevh0nkBRAqsAzqpKfDmSM+AcWNM5gTkH8LkqLBEgMHuBvP78/rwM/bVFIU+9s41rFsulzARwKSM5UB0CeCBIuyFAYDeBW5p4MC89r94bOpdL+4hCAbzbXaS4rQXwXIdUvwkUKJBnwKsAzuXSHgfuPwbsZUgF3n83LUkAbypmfQIE9iZwWcS78sz3vu4AOb/6k238cLdcSOufAXsSViGDuksZAngXPduOJeC4hQpc3cS9eeb7t4vymkziki5D9wPYGfBikGueCeCaR1/tBCYokGe+q2dDZxiX9GxoATzB+9uYXRLAY+o7NoFtBArf5v6It2aJZ7NFhvFLP97G46KMf18vowxVDCUggIeStB8CBAYReH4TX84dfTRbNz0yk/g13cLcW9M092YNf5DtH7L9YTZT5QICuPI7gPIJTFEgQ7d/Gbr/bOgpdnftPmUI/062Z2V749obWbFYAQFc7NAqjMB8BS45/9ORbjzTxqXzrUbPCRwvIICPd/FdAgRGFHhuE5/Ow3eXarvHgR+T6fv4/NpEoCgBAVzUcCqGQDkCbcRvZDVvz/mvXd3EV3LZRKAoAQFc1HAqhkA5Atc1cfu1Tbw2539STlUq2UGguE0FcHFDqiACBAgQmIOAAJ7DKOkjAQIECBQnsFEAF1e9gggQIECAwEgCAngkeIclQIAAgboFBPDa429FAgQIECAwnIAAHs7SnggQIECAwNoCAnhtqrpXVD0BAgQIDCsggIf1tDcCBAgQILCWgABei8lKdQuongABAsMLCODhTe2RAAECBAicKiCATyWyAoG6BVRPgMB+BATwflztlQABAgQIXFRAAF+Uxw8JEKhbQPUE9icggPdna88ECBAgQOBEAQF8Io0fECBAoG4B1e9XQADv19feCRAgQIDAsQIC+FgW3yRAgACBugX2X70A3r+xIxAgQIAAgQsEBPAFJL5BgAABAgT2LzDlAN5/9Y5AgAABAgRGEhDAI8E7LAECBAjULSCApzr++kWAAAECRQsI4KKHV3EECBAgMFWB/wcAAP//ekHKCwAAAAZJREFUAwALYDXvuzAaEAAAAABJRU5ErkJggg==</pentrails><costumes><list id="704"><item><ref mediaID="DRAWSCAN_Stage_cst_Untitled"></ref></item></list></costumes><sounds><list struct="atomic" id="705"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="2"><sprite name="Sprite" idx="1" x="105.47311653786505" y="-27.44597427864386" heading="21.15883826935169" scale="1" volume="100" pan="0" rotation="1" draggable="false" hidden="true" costume="0" color="255,255,255,1" pen="tip" id="710"><costumes><list struct="atomic" id="711"></list></costumes><sounds><list struct="atomic" id="712"></list></sounds><blocks></blocks><variables></variables><scripts><script x="22.666666666666686" y="14"><block s="receiveGo"></block><block s="hide"></block><block s="setSize"><l>3</l></block><block s="down"></block><block s="setColor"><block s="reportNewColor"><list><l>0</l><l>0</l><l>100</l></list></block></block><block s="doSetVar"><l>i</l><l>0</l></block><block s="gotoXY"><l>0</l><l>0</l></block><custom-block s="USE BIGNUMS %b"><block s="reportBoolean"><l><bool>true</bool></l></block></custom-block><block s="clear"></block><block s="doForever"><script><block s="clear"></block><block s="doChangeVar"><l>i</l><l>1</l></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="i"/><l>3</l></block><l>0</l></list></block><script><block s="forward"><block s="reportVariadicProduct"><list><block s="reportQuotient"><custom-block s="third of %n"><custom-block s="√ %n"><block var="i"/></custom-block></custom-block><custom-block s="fifth of %n"><custom-block s="√ %n"><block var="i"/></custom-block></custom-block></block><l>2</l></list></block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script><script><block s="doIf"><custom-block s="is %n even?"><block var="i"/></custom-block><script><block s="forward"><block s="reportVariadicSum"><list><custom-block s="e"></custom-block><custom-block s="eigth of %n"><block s="reportVariadicSum"><list><block var="i"/><block var="i"/></list></block></custom-block></list></block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script><list><custom-block s="is %n odd?"><block var="i"/></custom-block><script><block s="forward"><custom-block s="third of %n"><block s="reportRound"><block s="reportVariadicSum"><list><l>3.1415926535</l><custom-block s="eigth of %n"><block s="reportVariadicSum"><list><block var="i"/><block var="i"/></list></block></custom-block></list></block></block></custom-block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script></list></block></script></block></script></block></script></scripts></sprite><watcher var="i" style="normal" x="10" y="10" color="243,118,29" hidden="true"/><sprite name="Sprite(2)" idx="2" x="-7.909405216651294" y="84.29603593078551" heading="72.84116173064831" scale="1" volume="100" pan="0" rotation="1" draggable="false" hidden="true" costume="0" color="255,0,0,1" pen="tip" id="835"><costumes><list struct="atomic" id="836"></list></costumes><sounds><list struct="atomic" id="837"></list></sounds><blocks></blocks><variables></variables><scripts><script x="22.666666666666686" y="13.999999999999993"><block s="receiveGo"></block><block s="hide"></block><block s="setSize"><l>3</l></block><block s="down"></block><block s="setColor"><block s="reportNewColor"><list><l>0</l><l>100</l><l>100</l></list></block></block><block s="doSetVar"><l>i</l><l>0</l></block><block s="gotoXY"><l>0</l><l>0</l></block><custom-block s="USE BIGNUMS %b"><block s="reportBoolean"><l><bool>true</bool></l></block></custom-block><block s="doForever"><script><block s="doChangeVar"><l>i</l><l>1</l></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="i"/><l>3</l></block><l>0</l></list></block><script><block s="forward"><block s="reportVariadicProduct"><list><block s="reportQuotient"><custom-block s="third of %n"><custom-block s="√ %n"><block var="i"/></custom-block></custom-block><custom-block s="fifth of %n"><custom-block s="√ %n"><block var="i"/></custom-block></custom-block></block><l>7</l></list></block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script><script><block s="doIf"><custom-block s="is %n even?"><block var="i"/></custom-block><script><block s="forward"><block s="reportVariadicSum"><list><custom-block s="e"></custom-block><custom-block s="eigth of %n"><block s="reportVariadicSum"><list><block var="i"/><block var="i"/></list></block></custom-block></list></block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script><list><custom-block s="is %n odd?"><block var="i"/></custom-block><script><block s="forward"><custom-block s="third of %n"><block s="reportRound"><block s="reportVariadicSum"><list><block s="reportRandom"><l>1</l><l>7</l></block><custom-block s="eigth of %n"><block s="reportVariadicSum"><list><l>8</l><block var="i"/></list></block></custom-block></list></block></block></custom-block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script></list></block></script></block></script></block></script></scripts></sprite><sprite name="Sprite(2)(2)" idx="3" x="20.432674532733017" y="-37.03540405078405" heading="7.8411617306483095" scale="1" volume="100" pan="0" rotation="1" draggable="false" hidden="true" costume="0" color="203.99999999999994,255,0,1" pen="tip" id="960"><costumes><list struct="atomic" id="961"></list></costumes><sounds><list struct="atomic" id="962"></list></sounds><blocks></blocks><variables></variables><scripts><script x="22.666666666666686" y="10"><block s="receiveGo"></block><block s="hide"></block><block s="setSize"><l>3</l></block><block s="down"></block><block s="setColor"><block s="reportNewColor"><list><l>20</l><l>100</l><l>100</l></list></block></block><block s="doSetVar"><l>i</l><l>0</l></block><block s="gotoXY"><l>0</l><l>0</l></block><custom-block s="USE BIGNUMS %b"><block s="reportBoolean"><l><bool>true</bool></l></block></custom-block><block s="doForever"><script><block s="doChangeVar"><l>i</l><l>1</l></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="i"/><l>3</l></block><l>0</l></list></block><script><block s="forward"><block s="reportVariadicProduct"><list><block s="reportQuotient"><custom-block s="third of %n"><custom-block s="√ %n"><block var="i"/></custom-block></custom-block><custom-block s="quarter of %n"><custom-block s="√ %n"><block var="i"/></custom-block></custom-block></block><block s="reportRandom"><l>0.99</l><l>1.99</l></block></list></block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script><script><block s="doIf"><custom-block s="is %n even?"><block var="i"/></custom-block><script><block s="forward"><block s="reportVariadicSum"><list><custom-block s="e"></custom-block><custom-block s="eigth of %n"><block s="reportVariadicSum"><list><block var="i"/><block var="i"/></list></block></custom-block></list></block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script><list><custom-block s="is %n odd?"><block var="i"/></custom-block><script><block s="forward"><custom-block s="third of %n"><block s="reportRound"><block s="reportVariadicSum"><list><block s="reportRandom"><l>1</l><l>6</l></block><custom-block s="eigth of %n"><block s="reportVariadicSum"><list><block var="i"/><block var="i"/></list></block></custom-block></list></block></block></custom-block></block><block s="turn"><block var="i"/></block><block s="bounceOffEdge"></block></script></list></block></script></block></script></block></script></scripts></sprite></sprites></stage><variables><variable name="i"></variable></variables></scene></scenes></project><media name="DRAWSCAN" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><costume name="Untitled" center-x="240" center-y="180" image="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAQAElEQVR4AezViW7kOBIEUGP//593Z+dqu+06JJEiM+MBc3RXSWTGywLiPx8fH//1LwO/Ab8BvwG/Ab+Be38D/y/gP8z9Q4AAAQIECNwpkF3Ad0q7iwABAgQIfBJQwJ8w/JEAAQIECNwloIDvkt7vHhMRIECAwEIBBbwQ39UECBAgkCuggHN3n51cegIECCwWUMCLF+B6AgQIEMgUUMCZe5c6W0B6AgQ2EFDAGyzBCAQIECCQJ6CA83YuMYFsAekJbCKggDdZhDEIECBAIEtAAWftW1oCBLIFpN9IQAFvtAyjECBAgECOgALO2bWkBAgQyBbYLL0C3mwhxiFAgACBDAEFnLFnKQkQIEBgM4GbC3iz9MYhQIAAAQKLBBTwInjXEiBAgEC2gAK+cf+uIkCAAAEC/wgo4H8k/J8AAQIECNwooIBvxM6+SnoCBAgQ+CyggD9r+DMBAgQIELhJQAHfBO2abAHpCRAg8LuAAv5dxN8JECBAgMANAgr4BmRXEMgWkJ4AgZ8EFPBPKj4jQIAAAQKTBRTwZGDHEyCQLSA9gUcCCviRjM8JECBAgMBEAQU8EdfRBAgQyBaQ/pmAAn6m4zsCBAgQIDBJQAFPgnUsAQIECGQLvEqvgF8J+Z4AAQIECEwQUMATUB1JgAABAgReCfQu4FfpfU+AAAECBBYJKOBF8K4lQIAAgWwBBdx3/5IRIECAwMYCCnjj5RiNAAECBPoKKOC+u81OJj0BAgQ2F1DAmy/IeAQIECDQU0AB99yrVNkC0hMgUEBAARdYkhEJECBAoJ+AAu63U4kIZAtIT6CIgAIusihjEiBAgEAvAQXca5/SECCQLSB9IQEFXGhZRiVAgACBPgIKuM8uJSFAgEC2QLH0CrjYwoxLgAABAj0EFHCPPUpBgAABAsUEBhdwsfTGJUCAAAECiwQU8CJ41xIgQIBAtoACHrh/RxEgQIAAgXcFFPC7Up4jQIAAAQIDBRTwQMzso6QnQIAAgSMCCviIlmcJECBAgMAgAQU8CNIx2QLSEyBA4KiAAj4q5nkCBAgQIDBAQAEPQHQEgWwB6QkQOCOggM+oeYcAAQIECFwUUMAXAb1OgEC2gPQEzgoo4LNy3iNAgAABAhcEFPAFPK8SIEAgW0D6KwIK+IqedwkQIECAwEkBBXwSzmsECBAgkC1wNb0CvirofQIECBAgcEJAAZ9A8woBAgQIELgqULuAr6b3PgECBAgQWCSggBfBu5YAAQIEsgUUcN39m5wAAQIECgso4MLLMzoBAgQI1BVQwHV3lz259AQIECguoICLL9D4BAgQIFBTQAHX3JupswWkJ0CggYACbrBEEQgQIECgnoACrrczExPIFpCeQBMBBdxkkWIQIECAQC0BBVxrX6YlQCBbQPpGAgq40TJFIUCAAIE6Agq4zq5MSoAAgWyBZukVcLOFikOAAAECNQQUcI09mZIAAQIEmgkcLOBm6cUhQIAAAQKLBBTwInjXEiBAgEC2gAI+sH+PEiBAgACBUQIKeJSkcwgQIECAwAEBBXwAK/tR6QkQIEBgpIACHqnpLAIECBAg8KaAAn4TymPZAtITIEBgtIACHi3qPAIECBAg8IaAAn4DySMEsgWkJ0BghoACnqHqTAIECBAg8EJAAb8A8jUBAtkC0hOYJaCAZ8k6lwABAgQIPBFQwE9wfEWAAIFsAelnCijgmbrOJkCAAAECDwQU8AMYHxMgQIBAtsDs9Ap4trDzCRAgQIDADwIK+AcUHxEgQIAAgdkCexfw7PTOJ0CAAAECiwQU8CJ41xIgQIBAtoAC3nf/JiNAgACBxgIKuPFyRSNAgACBfQUU8L67yZ5MegIECDQXUMDNFyweAQIECOwpoID33IupsgWkJ0AgQEABByxZRAIECBDYT0AB77cTExHIFpCeQIiAAg5ZtJgECBAgsJeAAt5rH6YhQCBbQPogAQUctGxRCRAgQGAfAQW8zy5MQoAAgWyBsPQKOGzh4hIgQIDAHgIKeI89mIIAAQIEwgR+K+Cw9OISIECAAIFFAgp4EbxrCRAgQCBbQAF/2r8/EiBAgACBuwQU8F3S7iFAgAABAp8EFPAnjOw/Sk+AAAECdwoo4Du13UWAAAECBP4WUMB/Q/hftoD0BAgQuFtAAd8t7j4CBAgQIPCHgAL+A8E/BLIFpCdAYIWAAl6h7k4CBAgQiBdQwPE/AQAEsgWkJ7BKQAGvkncvAQIECEQLKODo9QtPgEC2gPQrBRTwSn13EyBAgECsgAKOXb3gBAgQyBZYnV4Br96A+wkQIEAgUkABR65daAIECBBYLbC2gFendz8BAgQIEFgkoIAXwbuWAAECBLIFFPC6/buZAAECBIIFFHDw8kUnQIAAgXUCCnidffbN0hMgQCBcQAGH/wDEJ0CAAIE1Agp4jbtbswWkJ0CAwIcC9iMgQIAAAQILBBTwAnRXEogWEJ4AgT8FFPCfDP5DgAABAgTuFVDA93q7jQCBbAHpCfwroID/pfAHAgQIECBwn4ACvs/aTQQIEMgWkP6LgAL+wuEvBAgQIEDgHgEFfI+zWwgQIEAgW+BbegX8jcQHBAgQIEBgvoACnm/sBgIECBAg8E0gqoC/pfcBAQIECBBYJKCAF8G7lgABAgSyBRRwzP4FJUCAAIGdBBTwTtswCwECBAjECCjgmFVnB5WeAAECuwko4N02Yh4CBAgQiBBQwBFrFjJbQHoCBHYUUMA7bsVMBAgQINBeQAG3X7GABLIFpCewq4AC3nUz5iJAgACB1gIKuPV6hSNAIFtA+p0FFPDO2zEbAQIECLQVUMBtVysYAQIEsgV2T6+Ad9+Q+QgQIECgpYACbrlWoQgQIEBgd4G5Bbx7evMRIECAAIFFAgp4EbxrCRAgQCBbQAHP27+TCRAgQIDAQwEF/JDGFwQIECBAYJ6AAp5nm32y9AQIECDwVEABP+XxJQECBAgQmCOggOe4OjVbQHoCBAi8FFDAL4k8QIAAAQIExgso4PGmTiSQLSA9AQJvCSjgt5g8RIAAAQIExgoo4LGeTiNAIFtAegJvCyjgt6k8SIAAAQIExgko4HGWTiJAgEC2gPSHBBTwIS4PEyBAgACBMQIKeIyjUwgQIEAgW+BwegV8mMwLBAgQIEDguoACvm7oBAIECBAgcFigVQEfTu8FAgQIECCwSEABL4J3LQECBAhkCyjgNvsXhAABAgQqCSjgStsyKwECBAi0EVDAbVaZHUR6AgQIVBNQwNU2Zl4CBAgQaCGggFusUYhsAekJEKgooIArbs3MBAgQIFBeQAGXX6EABLIFpCdQVUABV92cuQkQIECgtIACLr0+wxMgkC0gfWUBBVx5e2YnQIAAgbICCrjs6gxOgACBbIHq6RVw9Q2anwABAgRKCijgkmszNAECBAhUF7hWwNXTm58AAQIECCwSUMCL4F1LgAABAtkCCvj8/r1JgAABAgROCyjg03ReJECAAAEC5wUU8Hm77DelJ0CAAIFLAgr4Ep+XCRAgQIDAOQEFfM7NW9kC0hMgQOCygAK+TOgAAgQIECBwXEABHzfzBoFsAekJEBgioICHMDqEAAECBAgcE1DAx7w8TYBAtoD0BIYJKOBhlA4iQIAAAQLvCyjg9608SYAAgWwB6YcKKOChnA4jQIAAAQLvCSjg95w8RYAAAQLZAsPTK+DhpA4kQIAAAQKvBRTwayNPECBAgACB4QKlCnh4egcSIECAAIFFAgp4EbxrCRAgQCBbQAGX2b9BCRAgQKCTgALutE1ZCBAgQKCMgAIus6rsQaUnQIBANwEF3G2j8hAgQIBACQEFXGJNhswWkJ4AgY4CCrjjVmUiQIAAge0FFPD2KzIggWwB6Ql0FVDAXTcrFwECBAhsLaCAt16P4QgQyBaQvrOAAu68XdkIECBAYFsBBbztagxGgACBbIHu6RVw9w3LR4AAAQJbCijgLddiKAIECBDoLvC8gLunl48AAQIECCwSUMCL4F1LgAABAtkCCvjx/n1DgAABAgSmCSjgabQOJkCAAAECjwUU8GOb7G+kJ0CAAIGpAgp4Kq/DCRAgQIDAzwIK+GcXn2YLSE+AAIHpAgp4OrELCBAgQIDAdwEF/N3EJwSyBaQnQOAWAQV8C7NLCBAgQIDAVwEF/NXD3wgQyBaQnsBtAgr4NmoXESBAgACBXwIK+JeFPxEgQCBbQPpbBRTwrdwuI0CAAAECfwko4L8c/JcAAQIEsgVuT6+Abyd3IQECBAgQ+PhQwH4FBAgQIEBggcBWBbwgvysJECBAgMASAQW8hN2lBAgQIJAuoIC3+QUYhAABAgSSBBRw0rZlJUCAAIFtBBTwNqvIHkR6AgQIpAko4LSNy0uAAAECWwgo4C3WYIhsAekJEEgUUMCJW5eZAAECBJYLKODlKzAAgWwB6QmkCijg1M3LTYAAAQJLBRTwUn6XEyCQLSB9soACTt6+7AQIECCwTEABL6N3MQECBLIF0tMr4PRfgPwECBAgsERAAS9hdykBAgQIZAt8fCjg9F+A/AQIECCwREABL2F3KQECBAikCyQXcPru5SdAgACBhQIKeCG+qwkQIEAgV0ABp+5ebgIECBBYKqCAl/K7nAABAgRSBRRw6uazc0tPgACB5QIKePkKDECAAAECiQIKOHHrMmcLSE+AwBYCCniLNRiCAAECBNIEFHDaxuUlkC0gPYFtBBTwNqswCAECBAgkCSjgpG3LSoBAtoD0Wwko4K3WYRgCBAgQSBFQwCmblpMAAQLZAtulV8DbrcRABAgQIJAgoIATtiwjAQIECGwncGsBb5feQAQIECBAYJGAAl4E71oCBAgQyBZQwLft30UECBAgQOCXgAL+ZeFPBAgQIEDgNgEFfBt19kXSEyBAgMBXAQX81cPfCBAgQIDALQIK+BZml2QLSE+AAIHvAgr4u4lPCBAgQIDAdAEFPJ3YBQSyBaQnQOBnAQX8s4tPCRAgQIDAVAEFPJXX4QQIZAtIT+CxgAJ+bOMbAgQIECAwTUABT6N1MAECBLIFpH8uoICf+/iWAAECBAhMEVDAU1gdSoAAAQLZAq/TK+DXRp4gQIAAAQLDBRTwcFIHEiBAgACB1wKdC/h1ek8QIECAAIFFAgp4EbxrCRAgQCBbQAF33b9cBAgQILC1gALeej2GI0CAAIGuAgq462azc0lPgACB7QUU8PYrMiABAgQIdBRQwB23KlO2gPQECJQQUMAl1mRIAgQIEOgmoIC7bVQeAtkC0hMoI6CAy6zKoAQIECDQSUABd9qmLAQIZAtIX0pAAZdal2EJECBAoIuAAu6ySTkIECCQLVAuvQIutzIDEyBAgEAHAQXcYYsyECBAgEA5gaEFXC69gQkQIECAwCIBBbwI3rUECBAgkC2ggIft30EECBAgQOB9AQX8vpUnCRAgQIDAMAEFPIwy+yDpCRAgQOCYgAI+5uVpAgQIECAwREABD2F0SLaA9AQIEDguoICPm3mDQsK36gAAAlVJREFUAAECBAhcFlDAlwkdQCBbQHoCBM4JKOBzbt4iQIAAAQKXBBTwJT4vEyCQLSA9gfMCCvi8nTcJECBAgMBpAQV8ms6LBAgQyBaQ/pqAAr7m520CBAgQIHBKQAGfYvMSAQIECGQLXE+vgK8bOoEAAQIECBwWUMCHybxAgAABAgSuC1Qu4OvpnUCAAAECBBYJKOBF8K4lQIAAgWwBBVx1/+YmQIAAgdICCrj0+gxPgAABAlUFFHDVzWXPLT0BAgTKCyjg8isUgAABAgQqCijgilszc7aA9AQItBBQwC3WKAQBAgQIVBNQwNU2Zl4C2QLSE2gjoIDbrFIQAgQIEKgkoIArbcusBAhkC0jfSkABt1qnMAQIECBQRUABV9mUOQkQIJAt0C69Am63UoEIECBAoIKAAq6wJTMSIECAQDuBQwXcLr1ABAgQIEBgkYACXgTvWgIECBDIFlDAb+/fgwQIECBAYJyAAh5n6SQCBAgQIPC2gAJ+myr7QekJECBAYKyAAh7r6TQCBAgQIPCWgAJ+i8lD2QLSEyBAYLyAAh5v6kQCBAgQIPBSQAG/JPIAgWwB6QkQmCOggOe4OpUAAQIECDwVUMBPeXxJgEC2gPQE5gko4Hm2TiZAgAABAg8FFPBDGl8QIEAgW0D6uQIKeK6v0wkQIECAwI8CCvhHFh8SIECAQLbA/PQKeL6xGwgQIECAwDcBBfyNxAcECBAgQGC+wM4FPD+9GwgQIECAwCIBBbwI3rUECBAgkC2ggHfdv7kIECBAoLWAAm69XuEIECBAYFeB/wEAAP//Ce6X+AAAAAZJREFUAwBF9+EA7UZkmQAAAABJRU5ErkJggg==" mediaID="DRAWSCAN_Stage_cst_Untitled"/></media></snapdata>