<snapdata remixID="13138956"><project name="Simulation " app="Snap! 9.0, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAFDZJREFUeF7tnQd4FUXXx/+zuxcICT0g+MIr5UUiRRCliYJIEFAjxYISFfw0KkgRA0gVBWkhEClKCRAI0gwSekcTmkiRrhhKABEQlGIwIbm7M98ze4MGDbL3Zvfevcns8/iAOnPOmf/87paZMzOEMcZg1+tGBtivv4BUrGzXCN2Li1LAmQUULuJevXxcmtgZQG1EH9DEeCjrDoOUq+D33aBN/hh0xXwoCdtBSpb2+/aY0QDbAsiuXob2bjjYnq2QYldCbtLCjPb6zobqhLPPq0DSasir90P6b1XfxWIjz7YFUJszCfTj3i6pyt0NR1IqUKiQjaRzLxTt86mgH74DgAGVqsGx4QfA4XDPSD4sbVsA1dkxYKPec0keXB7KllMghQr7bReoM8eDjen71w8qORVw+O8PyqyOsC2A7NwZqJFdgYO7QEbNgPLMSwAhf7abpaYAigOkUhWztLDUDj30HbQBbwAnfwDpNQzKW/0BSbLUpz8Yty2AXDy1V2ewbzZD+WIrSJV7/9JT06CG3gcEBkFZscdvOlLt0Ul/p1UWbQGp/D9/4MPyGO0NYO9wsG++grI4+RYA6d7t0Lp1BEoGQ46eA+n+BpYLZYYDF4DboCxKFgBmC2prANmPh8G/hqUHGgE53v+cbz4DfLVSbwJp2wnK5EVm8GG5Dbp5FdiFnyG16wwSVMxyf/7gwNYA3k7AnABKbTtB9hMA/QEIb8folwDSUyegPdcECCgKeUESpEr5ZKbE271vA39+CSBzOqE2/S9QrAQcG44AsmwDKUUInijglwBCVeHkABYvCce6QwJAT3reJnX8E0A+n3DiRx08MZxhE5I8DMNvAfSwvaKazRQQANqsQwpaOALAgtbjNmuvANBmHVLQwhEAFrQet1l7BYA265CCFo4AMLvHWdo1sL07IDVr7TfZNfkBVmsA1DRXJ+bI37O7WPp6jcnDoSxKAqn/sN3D9Xp8dOsGaJOGQ5m8GKT8f0zzbz6AWVlwRoRBqv0Q5H4jTQvUSkPst4vQ3n8dbMs6kPdGQHkjUk92FddfCmiTR4BOGg45YRukeo1Mk8Z0ANm1K1BbVAcebArH9KWAZP95Wm19Iug7HV2iFi4CJfk0SHA500T2d0N09zZoXZ8AMm8Ad98DZeU+kBIlTWmW6QA6u7YBtm3QH8FS96GQ3x1mSqBWGtE2LAN951mAUSAgEEpSKkiZsla69Cvbuj7dO7hiLlQEjuRTQNm7TGmD+QB2aAgc2q0HJ3XpDXnoJ6YEaqURduMGtJGRYAungUTPhdIu3K/eX63UhtumPxyAGtkFJOUg0KwtlCmLQYoGmeLWdADVGdFgE4YApYIhjZgKOTTMlECtNqJFDQKdMRbynHWQHmlltTu/s6+NGww6fQzk2WtcIwUmXaYDiN+v6qlS5N5aUJbs8Js7iRY9FDQ2CnLcGkgPtzRJ3vxjRh03GMwfAGS/X9WTRf0NQKT9Dh47KVderNfN5XdDN64A27QS0puRINVCTPtlmX8HzMqENmUkUKYc5C49TAtUGMqfCpgPYP7USbTKIgUEgBYJK8waU0AAaEwnUcoiBQSAFgkrzBpTQABoTCdR6k4KXL3MN55ze+NNAeCdhBX//84KUAq1Q2N9v0Pliy1uzf8LAO8sryhxBwXYmRNQX2oBVqwklNjlkNzYMk8AKPDKswLOHs8D65bodsgTz0L5zPV3I5cA0IhKosy/KuDs/iywYakLwNAOUKa5/m7kEgAaUUmU+VcF6P5vob0RpifxStOXQa5rfL9GAaCAK88KMFWF2qwqEFQMjjX73comFwDmWf58ZEBVAUVxu0E6gM05gMXhWL1PAOi2gqIC2L6dUHu+BDlmHqQGj7inCGOg2zcBsgKp8WNupeAVuDsgO3saNHkt5BcjxLZuOTDTlsaD9n8dZDzPCO/sHoB5KF3gANRG9gWd8wmU5XtAatbLg3T5pyo9fRzak/cDmRl6LqSSuBsk5H6vNLBAAchO/gi1X1fg8B6QiH5Q3h3u0TuPV3rGi07osSPQnqoLUE1/fCoJO0HqNfRKBAUKQC1xHmi/V13CFg2CY8c5/cutoF/s8q9QB0To59jh4VAo0XEgweaseruTtgULwFWLQft2AdQssNJ3oVDyCX2jc3EB9IvZ0KIGQO45FFKXnl6TpEAByKgG7cPeYAumQlqYBLnBo14T2u6OOIBq1EAoPYcIAK3sLPWj3mDzpkBO2A7pgcZWuvIr2+z7A+ALj8hjbSC5MZOR10YWqDsgF0sdMwBs8QzI8zZBql0/r/qJ+nlUoMABCNUJ8N27+NFffrR7Vx772bbVCx6Atu2KghmYALBg9rttWm0pgOxGOoijsJjysk132y8QywDU9wls3wBS+1cg97b/Fm3265qCEZF1AKYcgdruISCsMxwjp4r9VozwRCm0eVNAQupCatTcSA2/L2MJgHp+WOuawOljPEkb0uAYyK/19nuxrG4Au/Ib1EcrgzRpCSV2mdXubGHfGgD5caqPVwPO/6Q3Uuo7BvLb79uiwbYNgjGo44eAzYoGq1gFyuAYSI+1tW24uQbGh7h4UmuRAMNxWwIg+DrRWTFg4wYC1WtBjp4D6b66hoMqiAWZpkHlGSnHj7h+tG8PhNx3VK5S0M2rXGVaPm0Lqdj1NJCAotAGRoAePQhlyXYQPs5q4LIGQH6c6k+pUNvUBmn+JJTPEgyEUsCLUApnlyeAnV8DjsIgkSOhvN7nn6JwUFvVBGMUysbvQXy8mz/75RzU9g1BXowA27oR7GwqlBV7IJWrYKhDLQawDkjztgJAQ10BsEsX9LUVpH5TKPHrcz0wh65YCG14L7DCAZAjP4bcMTu9zKAPs4vRPduhhT8OFlQM5NpvunlStxGUJd8YmmmyDsD0P0CXfQ5SoRKkFk+a3e58aY/9ehFqs8ogD3IAN+Tagc6eLwBrXU8U0iIMSuwKn2nBbmRAbXkv8MtZ174wNyO5rx4cK77zLYA+U8WPHetjp52agdR8AMqE+Fxb4hwYAXw5B2AMpN3LUKLn+KzFLCMdavMqwOWLYBw/RxGQgECQYRMNryux7A7oM1X83TFPlOBJEvyos1wulpUJtWWInkyhrNoHEmD8i9N0afj76PQosMkjAL6+5toVsJJlUChuDVCsuCF3AkBDMtmnkD7Gyk+iCgyCY+Venw/w869etUsb/egGduIomOJAoVmrBID2QcbcSPhwjda+EVjRQDjmb3JrEbi5kbissaOHoHZtA/LoE5BahoHHJ7fuYHixl7gDWtErFtrkByvSGdGQuvYCqVDRQk/GTPNjbummlSB3V/Jo+lAAaExn25SiiZ9D6/capJHTIHd63TZxeRqIANBT5XxQT18+yYdhvk0GaxoKR1QcyF13+yAS81wKAM3T0nJLf19ALid8Y+rZvZY3IBcHAkBfqO6hT3rmBLRnHwauXAKKl4a8eAuk6jU9tGaPagJAe/SD4Si0xbNAR/eD1PtDyK/1MlzPrgUFgHbtmdvE5VpAPgCKlTsY8JPRCxfxijICQK/IbJ4Tum4ptIkfQX6rP6T24eYZzrbEB5PVl0MhD4mB9NTzptv/u0EBoOUSm+yAMfB8S32qzoJ1zTRpLbSIZ0AiR0B5s/9tpwTNapUA0Cwl84Eddu0y1GZVgD9+B4gEeeYqSM2tzcoWAOYAh4/o68fST13qte3J7MQt/e0StEcrAVmZeljyp19Cat3R0hAFgDnk1cYNBo0dB3n5Hkj3eWeHUEt7103jLPMGtA97ga1YCNRtCDlqFqSKld204l5xAWC2XnyTbS0izPXr54uCVh8ACQxyT818UJq/A6rjP4D8WGs949rqSwCYrbC2chFon5dc/xZQFI5tZ4ESpazW31b22alj0J8CP52C3PwJAaA3e4ce2gut/2vAscNAq45wxHwOFPHOWJg32/lvvrTJI0AnfgTSbaCe3+f2cQ0eNETcAXO+A37Md9CPgbzga0gNm3kgp/9WYakprkSHlMNgbZ9HodEzgaKBljdIACgA1BXQktaAvvGUSw2e7v91KshdxpZW5oVSAWAO9fgsA1/2iBsZkIdPBqlYJS/aGqrLLl8CW7kI5MU3QQobW8xtyLCbheiuLdDebAdcvwZUqARl5T63Tz9306VeXAD4N9Xo8gXQIrtAHhML6bmunmjqVh0tdjzo2AGQp30JKfQZt+qaWphvDTLhA7CpoyDPWA7pce/suiAAzNGL+sLwV1sBx46AhdSFY1oiiIXjYOziedfBOTs2A50ioAyKBvHCe9ftwOXDL2zqSMixKyC1yH4cm0r5P40JAHM+gnOeGAQCPeHzgUaWdYH2bRJo+ON8aY9+0J+yKQXEjePuzQ5Mi5sEOncS5HFxkLx0hIUAMCeA585ADW8J8tNJ/T1Ijt8Aqcq9Zvfzn/boXr6tRSigZgIBQa69Xsr7cKHRzUQHWbaszX83bD8AM9LBhwR8dZCg9sVs0DHvQ+o1FHJXixM++S5in44CmzgMUnQ8ZAvSq7xGkoeObAegPhI/ewKUNQdALLz73E4vDqAWNRByjyGQu1p/ZJX22RjQCYMhT1wI6akXPOxG31djKUegfToK8pDxIGXLGw7IVgDyHUK1vl3Atm0AiY6H8nQnS3Le/k0dmrwedOYESC+/DYkvsLb40mZ9AhozFHLM55BatbPYm3XmadwkaCMjIccud2szKt8AyN81+G6ajkK3KKItiQMd8H+u/xZYHMrO8/rGh16/eHwWJHvm2g6+o2hWlmva7zb7wXi9/W465HPI+ujBuTNgterDEbcOpHSwISs+AZAmxEGbPBzK4q23rO7XEmaDDsxebB1YDMo3F0CKeh9Ap9OJI0eO4MqVK4ZE5IWKFy+OGjVqICio4GXQaLu3gr7EN1XnX/MylA0/gtxTzZB23geQv3iP7gcWPwXSst2Qc+Td6Zt0D3oL2JgIEs2Pjg/33p0oWy7GGHbt2oXy5cvjnnvuMSQiL3Tp0iWkpKSgYcOGcDgchuvlh4KUn4jwxtMg504DVUOgLEgCCS5nqGleB1Bbnwja4zmAUaBUMJSk1Fvy7tSh74AtnAY5cRekOg8aaoSZhX7++Wf9zle7dm23zR4/fhyKoqByZWuTON0OzAsVtGlRoNGDIE+YB+mZ7LQ2A369D+Cy+aB9X3aFVjQQyrafQYqX+DNUbeg7oAunQ172LaTa3gcwNTVVj6VKFffngS9cuIDLly+jZk3/XixugJt/FPEbAOmx76ENfAvYvwN4pQccg6Nv2WKMnfsJfKdQqVoN14mWXr5uArh69WqcOXMGnTt3Rr169dC/f38cOnQI8+bNw8mTJzF37lz9nW/jxo0YNGgQmjRpgosXL+r/eHL39HIzTXdHVyeAzpkEqe/Hbu2S5fU7IG+5OrwPWPwk19YSDzb9SwzGoI0fCpZ2FcqwST75KrwJYGxsLNasWQP+Z4MGDRAeHo6OHTuCUoqDBw/qd7qAgABkZWWhTJkyGDZsWIEG0FOi7QWgpsHZviGQfh2OtYeAQrcO03jaSHfq3QTw2LFjSE5ORtmyZVGrVi39zpeRkYGwsDCcOHECa9euxejRo/U/q1atiu7duwsA3RE6u6w1APJdPJfGQ2rSItdsErptE9jB3Xq6E8lxnoR+UtD00YAkuzbgHjvbgyblrcpNACtUqICEhAS88sorWL9+PRo3bowtW7boAPKL3x1btWqFxMREvPCCawaDP3751zAHVlzGFLAEQJZyGGrYg5A6RUAePsVYJACcPDUpca5eXj8vLX6j14dhTp06BT4OWL16dcNx3yzI3xl53WrVjI2B3dYBH5xWFLf9+2MF8wHkO6fHfAAWGwU89AiUDyaD1DA2pKHOn+Y63suZBdJtEJQeg72uKX+n27Fjh/7hUbJkScP+09LSsH//ftSvXx+BgZ6vpdD4KAEfpJ//FUj5/xj2768FTQeQpf8BtXll4MqvuibyR59BCu9mTB/+Dti6jj4t5Viy3a1D74w5MFbq6tWr+odGcHCwDhMfkOYfH6dPn87VgKqqOHv2LOrWrYvSpUsbc5JbKZ6VPHYAWFwM5OV7IYXU8dyWn9Q0H0B+eEloiH56DiQF8qgZhlPb9QP7OIABAXAkbPMZgDf77rvvvkOpUqVQokQJfWqOA1kkl6WasiyjYsWKkPI4l6ttXgnarQNANaBMOSibj4MEFfMTlDwL03QAeRjagd2gr7UFaRkGeewsEKMdw4dhogaBORxQen3g0/egzMxM7Ny5U38Mp6enIyQkRIfRyktbsQD0vewt1wIC4dh+Fihu/DXAytissm0JgPT7/VBffxpSszZQxs60KnbT7R6/CGRkUtSpJOHo0aM4f/48+Ncwh88bF/3xsH7kKQ7u0jOk5SXbIRl8f/ZGfFb4sAZA/hXc7TnITUPd+gq2ooHu2IycT3E9g+KTlzUc2L9PB8+dDxF3fN2urDbiPdA5n/DTgCENGgc5tyNbzXBkExuWAMgP0mOZmfpMBvHBYLIn2u49RTF13XVkZqp4+8kSaFrde+sicsarjugDOneifvIkq1EHjokLQf6Xf+eWrQHQEwJ8XGfmFg3rDhBoKtCyDkWPUN+Mw6mrFoPx90D+IcJHEWathdS8jY/Vsc69ADBb24TdTiTukZGVydChoYrwh72fCMFD4YfROJ9vCnL6OBBcDnLsKp+kpVmH3K2WBYDZelDG0GNWOtKu38DsnqXhkP88ftlbffGnH7o+Eero/pCf66IvjsrPlwAwu3f5id/dZ15FWloG5vYuD1nyMYDjBkNu31kAmJ9/fX9v29Av0nD9ejrGdy0HyZcA7tkGvmeM3Kqd4UF8f+0ncQfM0XOqxu+DgOLDx6+/guRp3AJAT5UT9UxRQABoiozCiKcKCAA9VU7UM0UBAaApMgojniogAPRUOVHPFAX+H6liiBFBWGt/AAAAAElFTkSuQmCC</thumbnail><scenes select="1"><scene name="Simulation "><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="simulate disease, population: %&apos;population input&apos; percent infected: %&apos;percent initially infected input&apos; speed: %&apos;speed input&apos;" type="reporter" category="other"><header></header><code></code><translations></translations><inputs><input type="%n"></input><input type="%n"></input><input type="%n"></input></inputs><script><block s="doDeclareVariables"><list><l>elapsed time</l><l>start time</l></list></block><block s="doSetVar"><l>clones ready?</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><custom-block s="initialize simulation %n %n %n"><block var="population input"/><block var="percent initially infected input"/><block var="speed input"/></custom-block><block s="show"></block><block s="doRepeat"><block var="population input"/><script><block s="createClone"><l><option>myself</option></l></block></script><comment w="136.66666666666666" collapsed="true">Create the clones.</comment></block><block s="hide"></block><block s="doSetVar"><l>start time</l><block s="reportDate"><l><option>time in milliseconds</option></l></block></block><block s="doSetVar"><l>clones ready?</l><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doWaitUntil"><block s="reportVariadicEquals"><list><block var="number infected"/><block var="population input"/></list></block><comment w="135.33333333333334" collapsed="false">Wait until everyone is&#xD;infected.</comment></block><block s="doSetVar"><l>elapsed time</l><block s="reportQuotient"><block s="reportDifference"><block s="reportDate"><l><option>time in milliseconds</option></l></block><block var="start time"/></block><l>1000</l></block></block><block s="doBroadcast"><l>vanish</l><list></list></block><block s="doReport"><block var="elapsed time"/></block></script></block-definition><block-definition s="average time for disease spread with population size: %&apos;size&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n"></input></inputs><script><block s="bubble"><l></l></block><block s="doReport"><block s="reportQuotient"><block s="reportCombine"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="simulate disease, population: %n percent infected: %n speed: %n"><block var="size"/><l>10</l><l>2</l></custom-block></autolambda><list></list></block><block s="reportNumbers"><l>1</l><l>10</l></block></block><block s="reifyReporter"><autolambda><block s="reportVariadicSum"><list><l></l><l></l></list></block></autolambda><list></list></block></block><l>10</l></block></block></script></block-definition><block-definition s="initialize clone" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doIf"><block s="reportVariadicLessThan"><list><block var="number infected"/><block s="reportVariadicProduct"><list><block var="population"/><block s="reportQuotient"><block var="percent initially infected"/><l>100</l></block></list></block></list></block><script><block s="doChangeVar"><l>number infected</l><l>1</l></block><block s="doSetVar"><l>infected?</l><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doSwitchToCostume"><l>sick</l></block></script><list></list></block><block s="doGotoObject"><l><option>random position</option></l></block><block s="doFaceTowards"><l><option>random position</option></l></block></script></block-definition><block-definition s="touching infected person?" type="predicate" category="sensing"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doForEach"><l>neighbor</l><block s="reportGet"><l><option>neighbors</option></l></block><script><block s="doIf"><block s="reportVariadicAnd"><list><block s="reportNot"><block var="infected?"/></block><block s="reportVariadicAnd"><list><block s="reportTouchingObject"><block var="neighbor"/></block><block s="reportAskFor"><block var="neighbor"/><block s="reifyReporter"><autolambda><block var="infected?"/></autolambda><list></list></block><list></list></block></list></block></list></block><script><block s="doReport"><block s="reportBoolean"><l><bool>true</bool></l></block></block></script><list></list></block></script><comment w="174.66666666666666" collapsed="false">Fill in the blank to check whether&#xD;this clone is touching an infected one.</comment></block><block s="doReport"><block s="reportBoolean"><l><bool>false</bool></l></block></block></script></block-definition><block-definition s="initialize simulation %&apos;pop&apos; %&apos;inf&apos; %&apos;sp&apos;" type="command" category="variables"><header></header><code></code><translations></translations><inputs><input type="%n"></input><input type="%n"></input><input type="%n"></input></inputs><script><block s="doSetVar"><l>population</l><block var="pop"/><comment w="216.66666666666666" collapsed="true">Make global so &quot;when I start&quot; can use it.</comment></block><block s="doSetVar"><l>percent initially infected</l><block var="inf"/></block><block s="doSetVar"><l>speed</l><block var="sp"/></block><block s="doSetVar"><l>clones ready?</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><block s="doSetVar"><l>number infected</l><l>0</l></block><block s="doSetVar"><l>infected?</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><block s="doSwitchToCostume"><l>well</l></block><block s="setScale"><l>50</l></block></script></block-definition></blocks><stage name="Stage" width="480" height="360" costume="0" color="255,255,255,1" tempo="60" threadsafe="false" penlog="false" volume="100" pan="0" lines="round" ternary="false" hyperops="true" codify="false" inheritance="true" sublistIDs="false" id="210"><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="211"></list></costumes><sounds><list struct="atomic" id="212"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="-36.27102912223643" y="-151.31238527491166" heading="103.37" scale="0.5" volume="100" pan="0" rotation="0" draggable="true" costume="1" color="80,80,80,1" pen="tip" id="217"><costumes><list id="218"><item><ref mediaID="Sprite_cst_well"></ref></item><item><ref mediaID="Sprite_cst_sick"></ref></item></list></costumes><sounds><list struct="atomic" id="219"></list></sounds><blocks></blocks><variables><variable name="infected?"><bool>false</bool></variable></variables><scripts><comment x="296.0696614583335" y="140.55555555555583" w="295.3333333333333" collapsed="true">This will be true when all the clones have been created.</comment><comment x="28" y="10" w="331.3333333333333" collapsed="true">There are things to write inside these blocks:</comment><script x="39" y="46.33333333333343"><block s="receiveGo"></block><block s="bubble"><l></l></block><block s="bubble"><custom-block s="simulate disease, population: %n percent infected: %n speed: %n"><l>14</l><l>5</l><l>2</l></custom-block></block><block s="show"></block></script><script x="35.333333333333314" y="177.88888888888926"><block s="receiveOnClone"></block><custom-block s="initialize clone"></custom-block><block s="doWaitUntil"><block var="clones ready?"/></block><block s="doUntil"><block s="reportVariadicEquals"><list><block var="number infected"/><block var="population"/></list></block><script><block s="forward"><block var="speed"/></block><block s="bounceOffEdge"></block><block s="doWarp"><script><block s="doIf"><custom-block s="touching infected person?"></custom-block><script><block s="doIf"><block s="reportNot"><block var="infected?"/></block><script><block s="doChangeVar"><l>number infected</l><l>1</l></block></script><list></list></block><block s="doSetVar"><l>infected?</l><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doSwitchToCostume"><l>sick</l></block></script><list></list></block></script></block></script><comment w="220" collapsed="false">Move the clone and&#xD;make it infected if it&apos;s touching an infected one.</comment></block></script><script x="68" y="507.5555555555575"><custom-block s="average time for disease spread with population size: %n"><l>100</l></custom-block></script></scripts></sprite><watcher scope="Sprite" var="infected?" style="normal" x="9.999999999999545" y="10.000000000000007" color="243,118,29" hidden="true"/><watcher var="number infected" style="normal" x="9.999999999999545" y="40.000001999999995" color="243,118,29" hidden="true"/></sprites></stage><variables><variable name="number infected"><l>14</l></variable><variable name="population"><l>14</l></variable><variable name="percent initially infected"><l>5</l></variable><variable name="speed"><l>2</l></variable><variable name="clones ready?"><bool>true</bool></variable></variables></scene></scenes></project><media name="Simulation " app="Snap! 9.0, https://snap.berkeley.edu" version="2"><costume name="well" center-x="12" center-y="26" image="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABkAAAAxCAYAAAAvFgI4AAAAAXNSR0IArs4c6QAACiNJREFUWEetmNuPXVUdx39rrb3X2tdz9jnTdjotWiltgVKEQEvAC1QjNMUHfOkYE0NiTCAxgchf4PhqeCCQkMiTD8bEkminCI1lYiGoCQpShBZEoNMznd7n3PZe+7YuP90z3K+jZSf77ez1Ob/v9/v7rbU3gVVeiEh+/gywpQLYRAZ4DMA8vg8sEIKftwT5vB8AILnnl+BsWAeh4tAuFYRYVtqnmdQwkT1/HOQzM0R/1jqfDUEkM38AfwTQIQQ25anZZixbA1pVHPU5xuAUaflvFWeh/9i9RH0a6DMgSB7YDx5x4EuVgW1FCTulhOuqGtY5YEpGzRnPsW/4AfyZeub483OvL7342M5PBH0qZN9+5FMerK8k3CRruElK2CkzvEIrElOCyiFmKITutUM4EnvOESvl65Pn26OZGWI/WtGnQJDc92uI0YdrByl8N8vhZilhW1Vgx2rCCaAhzNbcsf12hC+0Y/uk79bPXRCt3uPTpF4VZGYG6fntsK5S8M3+CPbJHG4oS5i0GnmzPBA0BAApgyIK9RtJbJ7q+vZJD4LXHrwbcoAPJ+4TK9m3H9mXOGy4OILb+yOYzjL4qlHQQQRqNbiEQpMmpMQqz7fz7bA6vDayv3dc9fIjP+ymq4Mgsqknyo1LS2zPcECnZU52aE06CEDREgdhBcKIVYLrXic2f4yj6oCr+kcfu3fzeHWQ/cjWmv6GcRZ/ZzAm01kB1+madBEIRaAMsZELm0oqz6veToL6UCfEWd7uvvroNMhVQRpPBtvOr03r+Bv9IXx/nNMbq5KuN5Y5BCmzYCwFtJTVMuDlq22/fKIT00PKLd/61Y8uL1dnPCItfzNq54DXXxzA94YZuSXNyeV1zUIw6CCxljGsuav6kSie78Tq4Bq3/otRJ848cv/e+jMqQTIzA+z0jWe424/8AIeJBueKcYlfH2X2hsFYX5kX2K3KkhNE6weu9Dw83wn137oBPBf6cAxV67ykYbZQLZWH+lsUvNMz76QLyb794E0K6IBSG0qpNqqynDS6ntKVubyszWVZXm+QsurkUvLGlCAOpe+xfitgbwvhzLuuOE25d44x57Tg9JTbMucXVZI+Pk2auAM03b2OwZRVZrsscGdZ2u1lqaZUbVrGYmQU+lopv6oqXpc1I4jAA0+5nFXcpZnjMMkozV3XWRKcve378BIXcBTy6q3HzjycNiEhPz0A7byAHWVlb80k3poX9iqlMNEGHGuR/XfKE7RIjNbNzQhSS10HHUYsccAS0iSNWIdBwTlZjDx8wXPNEZexvxw1x06TpvE6DNbZ0tySZrBnnOHXqxIuQyCuBSDWALWWErBILAKgMS4A1YQSpBSQOk3nWyQEkABYRmHsu+a479nDgWMPAQ//TfYhsvWHYCrtw61Zau7MMrhZKVzTPMwYtVVNuFLgogXS3GDBBSCqmRzNwswFLTyrmAPGKGBoUXFHvxlyOBz49qCwo9fI7iPobB/BVJHDbenY3ikzuMkYk3gCS+Y6uqhIKHMIrAan2QcBiQuAqtkRG62FwCqMbea4qKqaCl0hcaieD4SdCwXMGi89/h6kkrA7lXavzGAXWhMHAY5dTtW4YO0shZauQXwY0siD6HuYdxLTdwRURUmCsrCcEewFrp0LPH3QeMX7kKaSLLV7c2luQrRhHJKBy516JGEiTUmiPgYhjQ828Izsds2S55EizSEqChTU2gVP2Dk/gIO+Hn0AkpnbMkn25rndBdaEcQgDl7N6KNlEmkLnwxBQy8JRsKFnZbej+4KTUpYQ5gXhxOoFz7VzvoCDPgk+BWJMGEek73KihhmbSDPyORCz1HgjCxLmOQqKdkE4ds6P3Vno9z9g/AcrWYZAf7mSjK75PEino5flkjlEeY7eMoTDnPDswXAqOPaRdJk7i9zuQjRhK2wqYVUDyTLSqRUIMO+ki6zIRQlaX5hGriXPbyAkKgomwJpF34W5sEVm+Rp3BbIthQ11Crdl0u4tpNlFrA2idz3J2EQmoaMUiOU+MU2EQQFtuhysz7XsJmaJh7SQOYvKHDwKdtFzzJ8iDw9o33/1YxHOc7sTrAnCAPquWJEry6CrNRGAQFATlyz3CSynq4FMTJgL3MMiL2hU5OBTaxd9F+daPsySRq59+/eztbB7bVW2dpWF/Xae6xubZ6OADKkr6NLY+XKW07W1At8aILq2hDUjpZlgFG3g4WgiqU8FvlkqCi3KAgWgXXQdeJY79dzChX+daA4d5Cf7IXT1YHOeq+tUra5ixPpCCFVANHkx864fZ/BlXZNQq2ZIIlAKwBhFRtAEvr64JqmPd8P6ddBlUVSaoNXnXTCvVES9Itceu7A86nfPoHPV5Ftdj9kNxNr1zLU+9ZLgYt269tzQ2y1zskVVJFK1paYZxwTAoQwcBjrw9JmJVvn3yVb1V5+ki7qsa03syLH2NPqnzz549578vSNRM42vGbwoRMQFc2PRp8nU6VH0rYtjdpfM8WpV2FZVVwRV3hxawOEhcRymA98uTITls5NR+VS3W73CzVJKB7Yuz6TVzM92Vysz7mMXkvsefpM7m7dsPHfe7hkOyT6Z4zV1XrVLOQBT9jUSh4loPXW5p8MAeklcPz0h1KzjXzh67MRvR8/MzJjmyPTu0p94uGtifdVZuGxcwR2jIUxLaXaUmUyK0WnU2ZkSmO+K9iaXe20VhrSXRPXhjlcfiMrs6EMPfGW0qiNRs8es+x1cNhjBntEQp7PC7ijSNKmG80ZliwXQUIhkC+d+W0Wxe7LTQIL6QChPvfzQA9f//5A8HSfV6KTWaa9EFnPR3iK4n6g45vMrEDkbyrOXBpFNJaOeNul8aVnERXsrF0Gi48id70TqcIfL2bC6REi2LFfP2OxkYWjIRbKVe0FbxxGfTyJ1uPuFQMZpUo172o57lWaB47W3Ci98H9LicrZ9yZWMxw1E2XFPaRayj0K6l+pJWtgdchlysrbjBf0OxPPCRC17EqvDHf8SjV+BpEk9nldmvKAMCxzRvpKvyPUFQZo+ycZpokY9o9OTlaFNM25zvTDRTYQb478YT9IsqQcn0WS93FCPf2GQ4RjuGA5hOsvNtTKT7WowT0zWSw31RGO8CDoqjsV8O6qenvh/On7qCdg4GMLtgwFOyxx35GmaFMNT1qQnMnQ87sVbAxF2ddRAYvX0RKwOYNV/+X96Z5wUMFlkcGt/BHfJ3F5TyLRVD07V5biXMjfwRHJFJLy2DSK3l3j6SBRWhxLE47/48ZpsVQOyeZ24Zw5abgrbhwP4WlXBpkrKoBgt5sVoIaU09P3uphb3W8QL2Nk40C95wvxjfunC4qH7t1aremdc3i2PoHPdGZjICGyoNLRtKp1ifK4sLpyomNdy/e5mP4g9wl2eQWjOcUgvPHr80RxmZlb72WPlv+zejU78A+CtEBzo92GR/dNWzwgTbwqpZZFz9cbNOEzAlG+DenwG1Edlerei/wBfGAqI24GV4gAAAABJRU5ErkJggg==" mediaID="Sprite_cst_well"/><costume name="sick" center-x="12" center-y="26" image="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABoAAAAyCAYAAABCtcuVAAAAAXNSR0IArs4c6QAABklJREFUWEftmE1sVNcVx3/n3vdmPDO2MQYTPsaAKYYqCQQ1/YiEohCpaSRwQJUSNl32a9FVd1122U3XVbvsIqniRqlaKW0CbaFF0KqQD1HSpCnBBONiDDYzY3s+3rv3tPfNOAViG7stWbS5o9HMSE/vN/ecc//n/J+wsiUKdhzi8gMYLMoEDkiF7POeS+51RQBMDVAYiFmbxAykEYXI4dRTSww33xnj5mchudd9lgUFyGw36/LrKGN4SOHTYs0aUp+o4Vpq7DsN1py79rfp6w9BaznYkiAFQy99jX72KnzeGh5DGUboEU8TYcobe95F9leN1L5+7WJ9cjnYoiAFYYDSfIHdkeEpFfaL8rAo67DkcaQIcyqMOxudUKPHii33BmPcEEgX29lSIDuzmS3dEU+I5Yj37BPYCOSwRBkIPDDrLX8ROOY8r87N8vbADWqrAeXnyuyOLUfEcBjPp4ASIZwREWkGUsCpMInhNI6XkjqnSteZkvafuGMttaNCvcye2PIswogqWxFyKJKBHA7NfnmEiipnPYzOtzjeP8HEYiW/KGgCiuvL7CHmKMohlDKQRxAsNgO1lxehgnJWldE44RirAV2BwgODPKyG50QYQRkEuu4AhR21QTc9nAFeTOY4WZri+opDdwFyWzeyM9fFERG+jGe4k6M7QwepGq444Zhz/DSp8nr/DNVO/laUo7gxxGYxPI1y1Hj2oPR9WAyeNORIlQZGLiS54suz+e5Xkun4Ynl8vCHtQlkclJ0diKZ3UoBCbxwxaJzfb33zoDgeNGSgKMtRGxQKYTaN47fqPWtfaZT6T0vavFqq3Kz1Vqp1xmndXhRZMXwXzLfWU+pZ2zWQCkMiOqzqh43qLvFut/U60AmdxWCyYhC8CvU0isda+dJ5b+wl8X4yTpIJQ/OyNpKrpTGmpSNNGWhiM8WeItsjm/uMeLdfPHtRXxY07CIPmV6brBjCy3fOiWTnqK5iaoqZV3zNIFcUeUNS/pDOpW/9aYobTwaVfxHswSHWx9Y+puiXxPvHBbYBxQzw0WBLdob+tRa+h8/QNm4pvK3K8bTJLysTvLsZ5kOfiZtbGXQ583SkOiKqjwL9WT7CCjtYyWrDw7ulMC7Kb7xjtF7lbN8tKhJKeXAH2yMTHzKkh43XfUBvB7EyyMIfaauFU+WaKCd8i580a5zprTKTgTYMMVSIo5HI62Hj3SNAD4JZyUYWuSZVmMRxUhNeaFU501Nj+n8HlK9xmvsdOpvwvK1x5r6DPrYcfWw7ssrzduZ+h045qSkvtGbud3nfDVKIKtsYzEfxF8X7Q+LdPtFMGYKQ2mxKaB/etqDe3soXZEczNXAimao3VRhz8FuUn83Oc37DFLNB60y1TJ8pde8z2npcnAujVZ9C3ni33ng2QOhRHfUOoDAFBWgbFL5XvGFKRWqIraXGvpcQn2qk6elfvN/4+zchybTswoPkNmvfJonsMC7doUZ6rHf9cbP+iLh0nwmDYxDZhR2lNBDiziRUVyOX0ih+kyh3KTVmpin5iVaU++u1yvzYo+/PVEPH/VA0z0K85gs7C7a7q2ASU+ypjO8qzFWesc49JZ4tt09B6rgsUO6Aqt7wpo/zP2+V+k9N9Q5MTuVL881mfv7AiRPNhba+mDrL9QFKXUX25oTnBA6K3gnyCb82hgMdUEWFc2IZnUs5fnGMq4u5i6UGyGKyhb1hrlM4dDfItfixtXzldlAYILuavMYEV1c8QCoU61vYa2KOyiKgZsKP8oav/segMKn2LQ/6Yd7wtU9AH+nGn4QunKN/q7z/D0OX8oO88I3/yjla0loaTEv5fk75dseZV0OOUhg1TV7rWqUEtc1yzLP/NMJtaymZqwiOQuue7xXgOxkomGU4KzCatjheWI2HfQ/ym8rsinOM4BkBtkvb/osappuOl7qErxM6q8k87B/V87Jfrf0PVubJbWzoMXwOeEI8QxLmcTDNXP7PPm3eKHgOiJJ4CZ2Vc87z+2Kdd5libllrebc8hFbe2MTGKMcOnzIgrt3O6/29F7RZ7S7OZc8enEZUU8MH6QyXX61SObrEY7VlbUlwGpugEHeH+QEbnBkbmLl1i66+FoWQr9oc6TzUfweNpSBtm7WC1THS2fULzxCyp18d971YqO6+7T8Ahl3uYA44uh4AAAAASUVORK5CYII=" mediaID="Sprite_cst_sick"/></media></snapdata>