<snapdata remixID="14336550"><project name="Simulations2" app="Snap! 10.7.1, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAADMNJREFUeF7tnAtQlWUax/8HSFQuclERPYB4Tc1UTNNF0tTQXEBNarestWa6Wa23bWbb0nVSxt1yQzOn3FlHsxbHy+jsmLM56XqDUkBFUxcVVBDRTMELKCwiZ+d57Zw4gZw38oWD/N+ZM+fwned7vvf8vj/v5Xmf97PYbDYbWEigkQhYKMBGIs/LKgIUIIXQqARqFWBOTg5OnDjRqBWrz8VbtWqFIUOGoHXr1vU5nec0AoEaAtywYQP69+/foFX5MuXv8M5YAYul/pedtPIIiq9eVw6OHz+OcePG1d8Zz2wwAk4CzMvLQ1lZWYNd3H6hw7MfQd/uEWj5ynpUVVXh/Pnz2J2QgMDLl+usS08vCwbPsiqbqtC+KBzzN4d9586dIS0ii3sTcBLgunXrcP/99ztqHBAQAIvFgsvVhNClSxfExsZi2bJlDru+ffvi8OHD6u9Tp05BbOxFJtmdOnXCuXPnHMcCAwNhtVqxc+dOBAcH4/i7ozA4eR8qKysdNgWnT6NlfDx6b92K7JgY3AwMRPiLL+L8woVORC1eFvSeZcWtDg8gf9RfHd/5+vo61cO9b0PzrZ2TAFevXo0ePXo4aMjnI0eOQAS2dOlSvPHGG+jTpw8iIyOxe/duhIWFYePGjcpeRPbpp5+id+/emDBhAhYsWIDXXnsNPj4+SnwRERH44osv1BjNw8ND+Tlw4AAKCwtx+i+PI+r9vU534dq1a/hfdDSs8+ahqrJStYyoqoJfjx7Iv3oVwVYrvpNu1sMDAf9ahZCcFOQ+Mt9J5F27dm2+d7aJ/HInAX711Vfw9/eHtFrS8kVFReHGjRvqp9gH9vYuurS0VIlu7969ePjhh28L5Ici30n3d+vWLVRUVKBNmzbqc1FREdq3b6+OXbx4EWfOnFHXKVgYj7LH5yH60ViHj5VLliDuk0/gHxsL/4cewrWsLFSVliIgJgb5Cxci4s03UZiUhDZbNsC6bRoqQ/oge+iflT+pv3TBoaGhTeQ2NN9qOglQhCOtUvXu035Dq7/f7e8vfDgJsd1aY0fnV1AR3A0XLlzA8Jwcl3elRcJIWLdOU3aVYYNwqO80JcArV64gISHB5fk0aHwCNWbBmzdvbvDBu3SVnSMifhGNEzk5KCgoUONIGaOKEFncn0CtcUCJAUos0N4V/7TFa2p/y3Cge/fuaszK4l4Eao0D9uvXz71qWUtt1nyUhJCTm13GDtsNn4w+E36vPMiESiZILO5DoEYcUCYd9pbPnd/zk0bikXBvLZL5v/vSMTnp2LEjJAzE4h4EnAS4du1a9OzZU9VMYnQzZ85EWloaHnvsMbz00ksqxidjxOrHlixZgg4dOmDVqlXIzs5WNnJs2rRp6l1eMkOeMWMG5OZLTFF8ff3111i+fDlWrlypPs+dO9cxccjKysKAAQOwePFiFeaRkI8cGzp0qArp5Ofn4/x7YxBTTYDeie/hvqhElL5dM/SS+/QmB+2bN29i0KBB7kGftXBORli/fj3Cw8MVltTUVDWY37RpE2bPno133nkHEydOVN/PmzdPxQXlmCzblZeXY+TIkVizZg2Ki4uVeL799lvV5Y0ePRqff/45vL291bhSBChd/JYtW3Ds2DFs374dzz33nLKRGKIEqAcOHKhCNDt27EB8fDyCgoKQmZmpwjlt27ZVfooXJzgJsPWsbbCVXETZP56ucVuPPrHecUzGgw8++CBvvZsQcGoBU1JSVMBYut5vvvlGjZckXne3u+KYmBi1XivhltrCPDrXK/040UmAdfHMiktxXGfYsGGcIbuJ+KQaTgLcunWr6kK7devmRlWsvSqyGtMlMtJlPS8VFeHQoUPKToLocXFxLs+hQcMRqBGIPnjwoFqxkGCujN1k2czeIpn8268wHZ4WoJWtDJ3Lc9CxouCOFLJ+/U9HiyatqU5hXFCHUsPb1AjDyHrw4MGD72pNFv3heQyoOubS58BXF8Gv51BlJ63x1FdfrXHO6bw81Upfv34d0dHRKpmBpekSaJAwjO+yWAS18tCidGbKFkeLK5k5d2q52KJp4XR7I5dhGFkblqQESVSQWbG8t2vXTnXTMpuVzxKGmTp1qgqj2MMnEnaR0ImUoBVxSoDeie/Dq8cIoKUvABtsV76DpaUfri/4scWtHjKRtC5JjmC5dwnUmITYb7g9DCPLcpJZIqEQybGT9Vbp9jw9PZGRkYEWLVooMdqLpG5JYqvE/CTlSmKDoSmTHC2gz9sZPwgQQHkpbOUluJE8ynF+9ZCJiFn8s9y7BGqdhNQWhhGRSS5fbm7uzw7LhK/7rXYXfDB+tcO/hExY7m0CDZINI2O5Th07uiR5pqBABZmlSOJA9eRYlyfToEkSaJRsGElkrSvhgROMJqmlelX6rmTDhISEIDkuHJ38PV1WYtKqEygqLlZ2kgdIsblEdk8b3JUwTHCAP3w+/JUWKK+39+Pk2e+V8GTfh4wrWZovgTuGYSTQK5MASQzYv3+/Cr9MmTIFTz75pKIlO+hkJizZMR3aBcN3SfRPKFrgFTURlQdub1qyF88/7cPxvB93yMmsWfywNE8CdwzDCA5JFkhKSsJTTz2Fffv2qWwXmRxIKGb48OEqY2bPnj2I6BQK34+cZ6ySnXIjeXQNqh5/zMThnDzHcdnQxNJ8CdwxDGPPUpk1axaSk5PrzFrpGhEGv6V6a7J4cw+yjp1S/qRlnT59evOlz19e8+FE9d2UFBU1AIEBdWcal5SUICMzU2GXXMDXX3+dt6CZE1At4KJFi9R4T/bs6uTi1TeHTzJrJKOmvufbz5OhQa9evbhMdw+I1/LZZ5/ZZCZqegdcYGAArsztD39vD5S3CkS2h+ucQ9nMLjHD709lo58tF7LR0vbWfly9elXVl4Hqpq9Ay9GjRxvkCakh7dvjvvejUOEThCdC/JH6QGqd9IKvBCOzT6bjiQv/3ZeGRw/Mwc23DqmHF0lJT0/HCy+80PTvQjP+BZasrCyHAGXxXzYIybs8ikM+jxo1Ss107d9JDp5kucjGosmTJ6uNS5JD+Mwzz6hNRNu2bVPfy2Mx5FFvH3zwgbIVAeLjWEwK9Udqv1QU9SvCu2ffRVlVGdJL0hHsFYxhwcMw/9zt57ssvbgUY3uNdbo1fivGw2PmTpw9e1Ydv3TpktpzwtJ0CVgyMjIcApTUKkkElZtqz0Lx8/NT67OSkiWbj0Rgkn4lDyqS17PPPqteXl5eaoORLLG9/PLLKg1+7Nix6jxJ6QoPC4Nl8SBExhfihpcNOd1zcK38mhKhtaUViW0TsatqF5ZfXI7CikLMz52Pp4f8uMFIulz/lROA6dvVrjgpsgFqzJgxTZc+aw5LWlraXe+CExMTcfLkSUc+oHDu0iUSPouGoMLThoi42yKsqwRdDsIu6y7HY0J2/nsjfnP2I5TMSFcZ0VLkn0G2c7I0XQKWOXPm2GRLpeni7+eLbmufgIcFKPewobL/8y4vKWEbae08yi5jsOdt0Z1/8T/qkW5SRowY4dIHDdybgArDyP5e2ZNrOgwj3bQ8POiXhmFkDDh+/HjuB3FvbWnVjk/J18JEI1MEKEBTZOlXiwAFqIWJRqYIUICmyNKvFgEKUAsTjUwRoABNkaVfLQIUoBYmGpkiQAGaIku/WgQoQC1MNDJFgAI0RZZ+tQhQgFqYaGSKAAVoiiz9ahGgALUw0cgUAQrQFFn61SJAAWphopEpAhSgKbL0q0WAAtTCRCNTBChAU2TpV4sABaiFiUamCFCApsjSrxYBClALE41MEaAATZGlXy0CFKAWJhqZIkABmiJLv1oEKEAtTDQyRYACNEWWfrUIUIBamGhkigAFaIos/WoRoAC1MNHIFAEK0BRZ+tUiQAFqYaKRKQIUoCmy9KtFgALUwkQjUwQoQFNk6VeLAAWohYlGpghQgKbI0q8WAQpQCxONTBGgAE2RpV8tAhSgFiYamSJAAZoiS79aBChALUw0MkWAAjRFln61CFCAWphoZIoABWiKLP1qEaAAtTDRyBQBCtAUWfrVIkABamGikSkCFKApsvSrRYAC1MJEI1MEKEBTZOlXiwAFqIWJRqYIUICmyNKvFgEKUAsTjUwRoABNkaVfLQIUoBYmGpkiQAGaIku/WgQoQC1MNDJFgAI0RZZ+tQhQgFqYaGSKAAVoiiz9ahGgALUw0cgUAQrQFFn61SJAAWphopEpAhSgKbL0q0WAAtTCRCNTBChAU2TpV4sABaiFiUamCFCApsjSrxYBClALE41MEaAATZGlXy0CFKAWJhqZIkABmiJLv1oEKEAtTDQyRYACNEWWfrUIUIBamGhkigAFaIos/WoRoAC1MNHIFAEK0BRZ+tUiQAFqYaKRKQIUoCmy9KtF4P8JZoMCB0TWJwAAAABJRU5ErkJggg==</thumbnail><scenes select="1"><scene name="Simulations2"><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"><l/><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 var="infected?"/><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></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><primitives></primitives><stage name="Stage" width="480" height="360" costume="0" color="255,255,255,1" tempo="60" threadsafe="false" penlog="false" volume="100" pan="0" lines="round" ternary="false" hyperops="true" codify="false" inheritance="true" sublistIDs="false" id="201"><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="202"></list></costumes><sounds><list struct="atomic" id="203"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="167.5" y="-135.5" heading="295.06999999999994" scale="0.5" volume="100" pan="0" rotation="0" draggable="true" hidden="true" costume="1" color="80,80,80,1" pen="tip" id="208"><costumes><list id="209"><item><ref mediaID="Simulations2_Sprite_cst_well"></ref></item><item><ref mediaID="Simulations2_Sprite_cst_sick"></ref></item></list></costumes><sounds><list struct="atomic" id="210"></list></sounds><blocks></blocks><variables><variable name="infected?"><bool>false</bool></variable></variables><scripts><script x="30" y="34.22222222222223"><custom-block s="simulate disease, population: %n percent infected: %n speed: %n"><l>100</l><l>5</l><l>2</l></custom-block></script><script x="33.333333333333314" y="92.88888888888903"><block s="receiveOnClone"></block><custom-block s="initialize clone"></custom-block><block s="doWaitUntil"><block var="clones ready?"><comment w="295.3333333333333" collapsed="true">This will be true when all the clones have been created.</comment></block></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="doIf"><custom-block s="touching infected person?"></custom-block><script><block s="doSwitchToCostume"><l>sick</l></block><block s="doSetVar"><l>infected?</l><block s="reportBoolean"><l><bool>true</bool></l></block></block></script><list></list></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><comment x="28" y="10" w="331.3333333333333" collapsed="true">There are things to write inside these blocks:</comment><script x="61" y="352.16666666666674"><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"/><watcher var="number infected" style="normal" x="9.999999999999545" y="40.000001999999995" color="243,118,29"/><watcher var="percent initially infected" style="normal" x="10" y="34.000001999999995" color="243,118,29"/><watcher var="population" style="normal" x="10" y="55.00000399999999" color="243,118,29"/><watcher var="speed" style="normal" x="10" y="76.00000599999998" color="243,118,29"/><watcher var="clones ready?" style="normal" x="-1" y="96" color="243,118,29"/></sprites></stage><variables><variable name="number infected"><l>5</l></variable><variable name="population"><l>100</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="Simulations2" app="Snap! 10.7.1, 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+yOYzjL4qlHQQQRqNbiEQpMmpNQqz7Pz7bA6vDayv3dc9fIjP+ymq4Mgsqknyo1LS2zPcECnZU52aE06CEDREgdhBcKoVcLVvU5s/hhH1QFX9Y8+du/m8eog+5GtNf0N4yz+zmBMprMCrtM16SIQikAZYiMXIiW28rzq7SSoD3VCnOXt7quPToNcFaTxZLDt/Nq0jr/RH8L3xzm9sSrpemOZQ5AyC8ZSQEtZLQNevtr2yyc6MT2k3PKtX/3o8nJ1xiPS8jejdg54/cUBfG+YkVvSnFxe1ywEgw4SaxnDmruqH4ni+U6sDq5x678YdeLMI/fvrT+jEiQzM8BO33iGu/3ID3CYaHCuGJf49VFmbxiM9ZV5gd2qLDlBtH7gSs/D851Q/60bwHOhD8dQtc5LGmYL1VJ5qL9FwTs98066kOzbD96kgA4otaGUaqMqy0mj6yldmcvL2lyW5fUGKatOLiVvTAniUPoe67cC9rYQzrzritOUe+cYc04LTk+5LXN+USXp49OkiTtA093rGExZZbbLAneWpd1elmpK1aZlLEZGoa+V8quq4nVZM4IIPPCUy1nFXZo5DpOM0tx1nSXB2du+Dy9xAUchr9567MzDaRMS8tMD0M4L2FFW9tZM4q15Ya9SChNtwLEW2X+nPEGLxGjd3IwgtdR10GHEEgcsIU3SiHUYFJyTxcjDFzzXHHEZ+8tRc+w0aRqvw2CdLc0taQZ7xhl+vSrhMgTiWgBiDVBrKQGLxCIAGuMCUE0oQUoBqdN0vkVCAAmAZRTGvmuO+549HDj2EPDw32QfIlt/CKbSPtyapebOLIOblcI1zcOMUVvVhCsFLlogzQ0WXACimsnRLMxc0MKzijlgjAKGFhV39Jshh8OBbw8KO3qN7D6CzvYRTBU53JaO7Z0yg5uMMYknsGSuo4uKhDKHwGpwmn0QkLgAqJodsdFaCKzC2GaOi6qqqdAVEofq+UDYuVDArPHS4+9BKgm7U2n3ygx2oTVxEODY5VSNC9bOUmjpGsSHIY08iL6HeScxfUdAVZQkKAvLGcFe4Nq5wNMHjVe8D2kqyVK7N5fmJkQbxiEZuNypRxIm0pQk6mMQ0vhgA8/IbtcseR4p0hyiokBBrV3whJ3zAzjo69EHIJm5LZNkb57bXWBNGIcwcDmrh5JNpCl0PgwBtSwcBRt6VnY7ui84KWUJYV4QTqxe8Fw75ws46JPgUyDGhHFE+i4napixiTQjnwMxS403siBhnqOgaBeEY+f82J2Ffv8Dxn+wkmUI9Jcryeiaz4N0OnpZLplDlOfoLUM4zAnPHgyngmMfSZe5s8jtLkQTtsKmElY1kCwjnVqBAPNOusiKXJSg9YVp5Fry/AZCoqJgAqxZ9F2YC1tklq9xVyDbUthQp3BbJu3eQppdxNogeteTjE1kEjpKgVjuE9NEGBTQpsvB+lzLbmKWeEgLmbOozMGjYBc9x/wp8vCA9v1XPxbhPLc7wZogDKDvihW5sgy6WhMBCAQ1cclyn8ByuhrIxIS5wD0s8oJGRQ4+tXbRd3Gu5cMsaeTat38/Wwu711Zla1dZ2G/nub6xeTYKyJC6gi6NnS9nOV1bK/CtAaJrS1gzUpoJRtEGHo4mkvpU4JulotCiLFAA2kXXgWe5U88tXPjXiebQQX6yH0JXDzbnubpO1eoqRqwvhFAFRJMXM+/6cQZf1jUJtWqGJAKlAIxRZARN4OuLa5L6eDesXwddFkWlCVp93gXzSkXUK3LtsQvLo373DDpXTb7V9ZjdQKxdz1zrUy8JLtata88Nvd0yJ1tURSJVW2qacUwAHMrAYaADT5+ZaJV/n2xVf/VJuqjLutbEjhxrT6N/+uyDd+/J3zsSNdP4msGLQkRcMDcWfZpMnR5F37o4ZnfJHK9WhW1VdUVQ5c2hBRweEsdhOvDtwkRYPjsZlU91u9Ur3CyldGDr8kxazfxsd7Uy4z52Ibnv4Te5s3nLxnPn7Z7hkOyTOV5T51W7lAMwZV8jcZiI1lOXezoMoJfE9dMTQs06/oWjx078dvTMzIxpjkzvLv2Jh7sm1ledhcvGFdwxGsK0lGZHmcmkGJ1GnZ0pgfmuaG9yuddWYUh7SVQf7nj1gajMjj70wFdGqzoSNXvMut/BZYMR7BkNcTor7I4iTZNqOG9UtlgADYVItnDut1UUuyc7DSSoD4Ty1MsPPXD9/w/J03FSjU5qnfZKZDEX7S2C+4mKYz6/ApGzoTx7aRDZVDLqaZPOl5ZFXLS3chEkOo7c+U6kDne4nA2rS4Rky3L1jM1OFoaGXCRbuRe0dRzx+SRSh7tfCGScJtW4p+24V2kWOF57q/DC9yEtLmfbl1zJeNxAlB33lGYh+yike6mepIXdIZchJ2s7XtDvQDwvTNSyJ7E63PEv0fgVSJrU43llxgvKsMAR7Sv5ilxfEKTpk2ycJmrUMzo9WRnaNOM21wsT3US4Mf6L8STNknpwEk3Wyw31+BcGGY7hjuEQprPcXCsz2a4G88RkvdRQTzTGi6Cj4ljMt6Pq6Yn/p+OnnoCNgyHcPhjgtMxxR56mSTE8ZU16IkPH4168NRBhV0cNJFZPT8TqAFb9l/+nd8ZJAZNFBrf2R3CXzO01hUxb9eBUXY57KXMDTyRXRMJr2yBye4mnj0RhdShBPP6LH6/JVjUgm9eJe+ag5aawfTiAr1UVbKqkDIrRYl6MFlJKQ9/vbmpxv0W8gJ2NA/2SJ8w/5pcuLB66f2u1qnfG5d3yCDrXnYGJjMCGSkPbptIpxufK4sKJinkt1+9u9oPYI9zlGYTmHIf0wqPHH81hZma1nz1W/svu3ejEPwDeCsGBfh8W2T9t9Yww8aaQWhY5V2/cjMMETPk2qMdnQH1Upncr+g9fIAqIWnwilAAAAABJRU5ErkJggg==" mediaID="Simulations2_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="Simulations2_Sprite_cst_sick"/></media></snapdata>