<snapdata remixID="15000629"><project name="U5L2-Simulation" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAIvUlEQVR4AeydeWwUVRzHv29mt6WFIuJFAihCYogRNd4JakwMUSMmRhRQE6NVPKNGRWI0SqIi/mG8YtSIdzSIJo1o4onxvqWeBfHEMwYPsCBXd97zNxtKW7rbnWlnZt/MfCfT3Zk3b37v9/u8T2e72+yuY7iQQB0JOOBCAnUkQAHrCJ9DAxSQFtSVAAWsK34OTgHpQF0J5FfAumLn4N0EKGA3Cd7XhQAFrAt2DtpNgAJ2k+D90Ah0bQX8n5BRKGBIYOxegYDWKLVOR+nCGYBsV+hRtYkCVkXDA0EJmM51MD9/B73md5gN64OeVu5HAcsYcnUTbbHGoDT/EuC3H6FWtsO74aJQ8SlgKFzsXJHA1i09zVt6bfe0Vt2igFXR8EAgAkrBOe1coGU0MGp3qNlzEGahgGFosW9FAu7RxwFNzcDoXeFOPbZin2qNFLAaGbYHJmAC9+zfkQL2Z8KWkASU68K94ia4F18LuIVQZzuherMzCVQiUP478Gw4J58JyDZCLIkKGCIvds0AAbP6O3iP3g2USlWrCS6gV4J++mGYP36rGowHSKA3Af3EfdALroT+dkXv5j7bgQU0HZ/Bu+5C6Ifu7BMg8h35V47Z0An9chv8MSOPz4CJEDDfdkB/9AbgKOi2x1DtKhhMQLn6eS8sAZSBXvUZzA+rENfiPXk/SkdPhHfVWfBunQfIK+1xjcW48RHQXy4HVrQD4o5Z8gCweXPFwQIJaDZvglnyIKDlsfy9ZTDt71cMNuTGri7ob76C6VwLI4nrtX/Kb9FbQw7LAHUgMExeF2xokoEVzMidAXmmLDv91kACQkm34jA5WQFOEWj0t2U34tV77Xlg8f0S1UB1bYH6Wq62y56Tfa5pI+AefwrUqa2StkLhrqeAJl9G2d1hFbN2aKmwq5qHw7lHHoJ3GQM181yoE2dW6NW3yXR8CvPr6r6NtfZKXdLDALJCy6ZygWGVE5ejKVpzmKojavkXLr/0Klc//5D08u9q/6hCEaZ5hFwMXfkZ+DSzaRNKrSfCmye/ASH+hnMOOBw4YhpkAPgvaKoDj4Bz+XxwSSmBES3ALntgoEfMgU3qXXdRHnr9y2iAh1/zoTz72bIR/rNZs/Lz3lEG3FbjJ0BNnoLyE4/yb5CCcgsDnsOD9hIoXHkjiu/8BGfy/lWTDCygs9/BKLZ9AHfewqrBygfkZRTvvgXAhn/lWdBy6MXyDKh8INiN6u7mP/Q2NnXv8T6NBFwX8C9cavus9qvC6ddSrUGCKF8KP2C1Pn679AO6B5T78j4CL+qkWXAXLkLh5Q4UHpQnJSHPDzwQO1pBILiAQdMVYdwFi4CmkcCkfaEuvT7omeV+zgGHwZ3ZCjVmLNDYWG7jTXYJRC+gsCrLI6+Ao6ERzq7yR6i0cc0ngVpVxyIg5CoIx4Xyn0jUyoDHc00gFgH91w0LSz+Ge28byjKCCwlUJhCLgL50as+JUGPHVx6VrSSwjUA8Am4LzjsSqEWAAtYixOOxEqCAseJl8FoEsitgrcp53AoCFNCKachvEhQwv3NvReUU0IppyG8SFDC/c29F5RTQimnIbxIUMHtzH19Fxn+fRLThKWC0PDMbzfy1BqUzjoX23zgWYZUUMEKYmQ71xy8wy9+F/uITKdN/15jcRbBSwAggZj2E/77w0uWnw39fuHn4NujXX4ysZAoYGcoMB/I/XOjvNVKgXPk2bQT++VO2o1kpYDQcsx2loQGYOg1wisDek2EmTY6sXgoYGcrsBlINjXBbrwDG7Q3nyGlwDzw8smIjFTCyrBjISgJGqcjzooCRI81mQLXHWDgnnAp10NRIC6SAkeLMbjA1bi8U5t4M56RZkRZJASPFyWBhCVDAsMTYP1ICFDBSnAwWlgAFDEusYn82DpYABRwsOZ4XCQEKGAlGBhksAQo4WHI8LxICFDASjAwyWAIUcLDksnae58G74wboN19KtDIKmChuewcz6/6BXnQb9DOPhEpyqJ0p4FAJpv18/1sM/M/1vv06wOuC/uJD6FeXJlYVBUwMtYUDiXzeNXNQunQWzAevi4AlqN9/guloTyxZCpgYavsGMiW54n21HPqbFTDjJgJKdGhugRkzHkktMmJSQ3Ec2wh4t8wFVn0OtXollFwN4RahDjkKhdnnJZYqBUwMtWUDiXBm/TpJysD/YiC1oVO2ZZVduU1spYCJobZsIKXgHDMd2Gk3YPgoYPrpwJRDgQmTkOSSXgGTpJTRsdwTZgCjRgPjJqBwxgUoPvM2CvPvTrRaCpgobrsG2/5oK1fDemVGAetF3oJx/e9xcWbPgTPjbKDWV7DFlK8TU1yGTQMBufK5c66Ce85lgP/FgnXImQLWATqH7CFAAXtYcKsOBChgHaAPcchMnU4BMzWd6SuGAqZvzjKVMQXM1HSmrxgKmL45y1TGFDBT05m+Yihg+uYsUxmHEjBTlbMYKwhQQCumIb9JUMD8zr0VlVNAK6Yhv0lQwPzOvRWVU0ArpiG/SVDAQHPPTnERoIBxkWXcQAQoYCBM7BQXAQoYF1nGDUSAAgbCxE5xEaCAcZFl3EAEKGAgTPntFHflFDBuwow/IIFMCKhfaoNuf3/AQnnQTgKpF9Bs/A/etedDL7y6/ClPdmJmVtUIpF5AvfRJoLQVunMt9FvJfsB2NahsD04g3QJqDf3s48DG9VDfr4BZ9lzwytnTCgLpFlApoGmEgJQynALQ3CLbXNNEQGbO0nSDpCUCunctBoaPBPaZAmfugiBnsY9FBNItoIBUhaLcyioyqoJcBWWTa3oIpF5A+J/s3rITMJwPv+nRrifT1AuomptRfG0Vio+/Aij5mxBc0kQg9QKWYTc2Ag0N5U3epItANgRMF3Nm24sABewFw5LNXKVBAXM13fYVSwHtm5NcZUQBczXd9hVLAe2bk1xlRAFzNd32FUsB7ZuTXGXUR8BcVc5irSBAAa2YhvwmQQHzO/dWVE4BrZiG/CZBAfM791ZU/j8AAAD//5xs/4cAAAAGSURBVAMAGYkKrScfZKsAAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="U5L2-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="# 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="# infected"/><block s="reportVariadicProduct"><list><block var="population"/><block s="reportQuotient"><block var="% initially infected"/><l>100</l></block></list></block></list></block><script><block s="doChangeVar"><l># 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="doIf"><block s="reportTouchingColor"><color>250,35,0,1</color></block><script><block s="doReport"><block s="reportBoolean"><l><bool>true</bool></l></block></block></script><list></list></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>% 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># 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="182"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAQAElEQVR4AezVC27kNhAEUCP3P3SC/NZeez6SSDWb9YJg1zsjkV2vDdQfH/4jQIAAAQIEbhdQwLeTu5AAAQIECHx8ZBew3wACBAgQIFAkoICL4F1LgAABAtkCCjh3/5ITIECAQKGAAi7EdzUBAgQI5Aoo4NzdZyeXngABAsUCCrh4Aa4nQIAAgUwBBZy5d6mzBaQnQGABAQW8wBKMQIAAAQJ5Ago4b+cSE8gWkJ7AIgIKeJFFGIMAAQIEsgQUcNa+pSVAIFtA+oUEFPBCyzAKAQIECOQIKOCcXUtKgACBbIHF0ivgxRZiHAIECBDIEFDAGXuWkgABAgQWE7i5gBdLbxwCBAgQIFAkoICL4F1LgAABAtkCCvjG/buKAAECBAj8J6CA/5PwNwECBAgQuFFAAd+InX2V9AQIECDwWUABf9bwMwECBAgQuElAAd8E7ZpsAekJECDwu4AC/l3EvwkQIECAwA0CCvgGZFcQyBaQngCBnwQU8E8qPiNAgAABApMFFPBkYMcTIJAtID2BRwIK+JGMzwkQIECAwEQBBTwR19EECBDIFpD+mYACfqbjOwIECBAgMElAAU+CdSwBAgQIZAu8Sq+AXwn5ngABAgQITBBQwBNQHUmAAAECBF4J7F3Ar9L7ngABAgQIFAko4CJ41xIgQIBAtoAC3nf/khEgQIDAwgIKeOHlGI0AAQIE9hVQwPvuNjuZ9AQIEFhcQAEvviDjESBAgMCeAgp4z71KlS0gPQECDQQUcIMlGZEAAQIE9hNQwPvtVCIC2QLSE2gioICbLMqYBAgQILCXgALea5/SECCQLSB9IwEF3GhZRiVAgACBfQQU8D67lIQAAQLZAs3SK+BmCzMuAQIECOwhoID32KMUBAgQINBMYHABN0tvXAIECBAgUCSggIvgXUuAAAEC2QIKeOD+HUWAAAECBN4VUMDvSnmOAAECBAgMFFDAAzGzj5KeAAECBI4IKOAjWp4lQIAAAQKDBBTwIEjHZAtIT4AAgaMCCviomOcJECBAgMAAAQU8ANERBLIFpCdA4IyAAj6j5h0CBAgQIHBRQAFfBPQ6AQLZAtITOCuggM/KeY8AAQIECFwQUMAX8LxKgACBbAHprwgo4Ct63iVAgAABAicFFPBJOK8RIECAQLbA1fQK+Kqg9wkQIECAwAkBBXwCzSsECBAgQOCqQO8Cvpre+wQIECBAoEhAARfBu5YAAQIEsgUUcN/9m5wAAQIEGgso4MbLMzoBAgQI9BVQwH13lz259AQIEGguoICbL9D4BAgQINBTQAH33JupswWkJ0BgAwEFvMESRSBAgACBfgIKuN/OTEwgW0B6ApsIKOBNFikGAQIECPQSUMC99mVaAgSyBaTfSEABb7RMUQgQIECgj4AC7rMrkxIgQCBbYLP0CnizhYpDgAABAj0EFHCPPZmSAAECBDYTOFjAm6UXhwABAgQIFAko4CJ41xIgQIBAtoACPrB/jxIgQIAAgVECCniUpHMIECBAgMABAQV8ACv7UekJECBAYKSAAh6p6SwCBAgQIPCmgAJ+E8pj2QLSEyBAYLSAAh4t6jwCBAgQIPCGgAJ+A8kjBLIFpCdAYIaAAp6h6kwCBAgQIPBCQAG/API1AQLZAtITmCWggGfJOpcAAQIECDwRUMBPcHxFgACBbAHpZwoo4Jm6ziZAgAABAg8EFPADGB8TIECAQLbA7PQKeLaw8wkQIECAwA8CCvgHFB8RIECAAIHZAmsX8Oz0zidAgAABAkUCCrgI3rUECBAgkC2ggNfdv8kIECBAYGMBBbzxckUjQIAAgXUFFPC6u8meTHoCBAhsLqCAN1+weAQIECCwpoACXnMvpsoWkJ4AgQABBRywZBEJECBAYD0BBbzeTkxEIFtAegIhAgo4ZNFiEiBAgMBaAgp4rX2YhgCBbAHpgwQUcNCyRSVAgACBdQQU8Dq7MAkBAgSyBcLSK+CwhYtLgAABAmsIKOA19mAKAgQIEAgT+K2Aw9KLS4AAAQIEigQUcBG8awkQIEAgW0ABf9q/HwkQIECAwF0CCvguafcQIECAAIFPAgr4E0b2j9ITIECAwJ0CCvhObXcRIECAAIF/BRTwvxD+yhaQngABAncLKOC7xd1HgAABAgT+ElDAfyH4n0C2gPQECFQIKOAKdXcSIECAQLyAAo7/FQBAIFtAegJVAgq4St69BAgQIBAtoICj1y88AQLZAtJXCijgSn13EyBAgECsgAKOXb3gBAgQyBaoTq+AqzfgfgIECBCIFFDAkWsXmgABAgSqBWoLuDq9+wkQIECAQJGAAi6Cdy0BAgQIZAso4Lr9u5kAAQIEggUUcPDyRSdAgACBOgEFXGeffbP0BAgQCBdQwOG/AOITIECAQI2AAq5xd2u2gPQECBD4UMB+CQgQIECAQIGAAi5AdyWBaAHhCRD4W0AB/83gDwIECBAgcK+AAr7X220ECGQLSE/gfwEF/D+FHwgQIECAwH0CCvg+azcRIEAgW0D6LwIK+AuHfxAgQIAAgXsEFPA9zm4hQIAAgWyBb+kV8DcSHxAgQIAAgfkCCni+sRsIECBAgMA3gagC/pbeBwQIECBAoEhAARfBu5YAAQIEsgUUcMz+BSVAgACBlQQU8ErbMAsBAgQIxAgo4JhVZweVngABAqsJKODVNmIeAgQIEIgQUMARaxYyW0B6AgRWFFDAK27FTAQIECCwvYAC3n7FAhLIFpCewKoCCnjVzZiLAAECBLYWUMBbr1c4AgSyBaRfWUABr7wdsxEgQIDAtgIKeNvVCkaAAIFsgdXTK+DVN2Q+AgQIENhSQAFvuVahCBAgQGB1gbkFvHp68xEgQIAAgSIBBVwE71oCBAgQyBZQwPP272QCBAgQIPBQQAE/pPEFAQIECBCYJ6CA59lmnyw9AQIECDwVUMBPeXxJgAABAgTmCCjgOa5OzRaQngABAi8FFPBLIg8QIECAAIHxAgp4vKkTCWQLSE+AwFsCCvgtJg8RIECAAIGxAgp4rKfTCBDIFpCewNsCCvhtKg8SIECAAIFxAgp4nKWTCBAgkC0g/SEBBXyIy8MECBAgQGCMgAIe4+gUAgQIEMgWOJxeAR8m8wIBAgQIELguoICvGzqBAAECBAgcFtiqgA+n9wIBAgQIECgSUMBF8K4lQIAAgWwBBbzN/gUhQIAAgU4CCrjTtsxKgAABAtsIKOBtVpkdRHoCBAh0E1DA3TZmXgIECBDYQkABb7FGIbIFpCdAoKOAAu64NTMTIECAQHsBBdx+hQIQyBaQnkBXAQXcdXPmJkCAAIHWAgq49foMT4BAtoD0nQUUcOftmZ0AAQIE2goo4LarMzgBAgSyBbqnV8DdN2h+AgQIEGgpoIBbrs3QBAgQINBd4FoBd09vfgIECBAgUCSggIvgXUuAAAEC2QIK+Pz+vUmAAAECBE4LKODTdF4kQIAAAQLnBRTwebvsN6UnQIAAgUsCCvgSn5cJECBAgMA5AQV8zs1b2QLSEyBA4LKAAr5M6AACBAgQIHBcQAEfN/MGgWwB6QkQGCKggIcwOoQAAQIECBwTUMDHvDxNgEC2gPQEhgko4GGUDiJAgAABAu8LKOD3rTxJgACBbAHphwoo4KGcDiNAgAABAu8JKOD3nDxFgAABAtkCw9Mr4OGkDiRAgAABAq8FFPBrI08QIECAAIHhAq0KeHh6BxIgQIAAgSIBBVwE71oCBAgQyBZQwG32b1ACBAgQ2ElAAe+0TVkIECBAoI2AAm6zquxBpSdAgMBuAgp4t43KQ4AAAQItBBRwizUZMltAegIEdhRQwDtuVSYCBAgQWF5AAS+/IgMSyBaQnsCuAgp4183KRYAAAQJLCyjgpddjOAIEsgWk31lAAe+8XdkIECBAYFkBBbzsagxGgACBbIHd0yvg3TcsHwECBAgsKaCAl1yLoQgQIEBgd4HnBbx7evkIECBAgECRgAIugnctAQIECGQLKODH+/cNAQIECBCYJqCAp9E6mAABAgQIPBZQwI9tsr+RngABAgSmCijgqbwOJ0CAAAECPwso4J9dfJotID0BAgSmCyjg6cQuIECAAAEC3wUU8HcTnxDIFpCeAIFbBBTwLcwuIUCAAAECXwUU8FcP/yJAIFtAegK3CSjg26hdRIAAAQIEfgko4F8WfiJAgEC2gPS3CijgW7ldRoAAAQIE/hFQwP84+JMAAQIEsgVuT6+Abyd3IQECBAgQ+PhQwH4LCBAgQIBAgcBSBVyQ35UECBAgQKBEQAGXsLuUAAECBNIFFPAyvwEGIUCAAIEkAQWctG1ZCRAgQGAZAQW8zCqyB5GeAAECaQIKOG3j8hIgQIDAEgIKeIk1GCJbQHoCBBIFFHDi1mUmQIAAgXIBBVy+AgMQyBaQnkCqgAJO3bzcBAgQIFAqoIBL+V1OgEC2gPTJAgo4efuyEyBAgECZgAIuo3cxAQIEsgXS0yvg9N8A+QkQIECgREABl7C7lAABAgSyBT4+FHD6b4D8BAgQIFAioIBL2F1KgAABAukCyQWcvnv5CRAgQKBQQAEX4ruaAAECBHIFFHDq7uUmQIAAgVIBBVzK73ICBAgQSBVQwKmbz84tPQECBMoFFHD5CgxAgAABAokCCjhx6zJnC0hPgMASAgp4iTUYggABAgTSBBRw2sblJZAtID2BZQQU8DKrMAgBAgQIJAko4KRty0qAQLaA9EsJKOCl1mEYAgQIEEgRUMApm5aTAAEC2QLLpVfAy63EQAQIECCQIKCAE7YsIwECBAgsJ3BrAS+X3kAECBAgQKBIQAEXwbuWAAECBLIFFPBt+3cRAQIECBD4JaCAf1n4iQABAgQI3CaggG+jzr5IegIECBD4KqCAv3r4FwECBAgQuEVAAd/C7JJsAekJECDwXUABfzfxCQECBAgQmC6ggKcTu4BAtoD0BAj8LKCAf3bxKQECBAgQmCqggKfyOpwAgWwB6Qk8FlDAj218Q4AAAQIEpgko4Gm0DiZAgEC2gPTPBRTwcx/fEiBAgACBKQIKeAqrQwkQIEAgW+B1egX82sgTBAgQIEBguIACHk7qQAIECBAg8Fpg5wJ+nd4TBAgQIECgSEABF8G7lgABAgSyBRTwrvuXiwABAgSWFlDAS6/HcAQIECCwq4AC3nWz2bmkJ0CAwPICCnj5FRmQAAECBHYUUMA7blWmbAHpCRBoIaCAW6zJkAQIECCwm4AC3m2j8hDIFpCeQBsBBdxmVQYlQIAAgZ0EFPBO25SFAIFsAelbCSjgVusyLAECBAjsIqCAd9mkHAQIEMgWaJdeAbdbmYEJECBAYAcBBbzDFmUgQIAAgXYCQwu4XXoDEyBAgACBIgEFXATvWgIECBDIFlDAw/bvIAIECBAg8L6AAn7fypMECBAgQGCYgAIeRpl9kPQECBAgcExAAR/z8jQBAgQIEBgioICHMDokW0B6AgQIHBdQwMfNvEGAAAECBC4LKODLhA4gkC0gPQECv+uE6gAAAkNJREFU5wQU8Dk3bxEgQIAAgUsCCvgSn5cJEMgWkJ7AeQEFfN7OmwQIECBA4LSAAj5N50UCBAhkC0h/TUABX/PzNgECBAgQOCWggE+xeYkAAQIEsgWup1fA1w2dQIAAAQIEDgso4MNkXiBAgAABAtcFOhfw9fROIECAAAECRQIKuAjetQQIECCQLaCAu+7f3AQIECDQWkABt16f4QkQIECgq4AC7rq57LmlJ0CAQHsBBdx+hQIQIECAQEcBBdxxa2bOFpCeAIEtBBTwFmsUggABAgS6CSjgbhszL4FsAekJbCOggLdZpSAECBAg0ElAAXfallkJEMgWkH4rAQW81TqFIUCAAIEuAgq4y6bMSYAAgWyB7dIr4O1WKhABAgQIdBBQwB22ZEYCBAgQ2E7gUAFvl14gAgQIECBQJKCAi+BdS4AAAQLZAgr47f17kAABAgQIjBNQwOMsnUSAAAECBN4WUMBvU2U/KD0BAgQIjBVQwGM9nUaAAAECBN4SUMBvMXkoW0B6AgQIjBdQwONNnUiAAAECBF4KKOCXRB4gkC0gPQECcwQU8BxXpxIgQIAAgacCCvgpjy8JEMgWkJ7APAEFPM/WyQQIECBA4KGAAn5I4wsCBAhkC0g/V0ABz/V1OgECBAgQ+FFAAf/I4kMCBAgQyBaYn14Bzzd2AwECBAgQ+CaggL+R+IAAAQIECMwXWLmA56d3AwECBAgQKBJQwEXwriVAgACBbAEFvOr+zUWAAAECWwso4K3XKxwBAgQIrCrwJwAAAP//lVwoVAAAAAZJREFUAwDU5ALRcl29HAAAAABJRU5ErkJggg==</pentrails><costumes><list struct="atomic" id="183"></list></costumes><sounds><list struct="atomic" id="184"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="226.5" y="-74.5" heading="59.19999999999999" scale="0.5" volume="100" pan="0" rotation="0" draggable="true" hidden="true" costume="1" color="80,80,80,1" pen="tip" id="189"><costumes><list id="190"><item><ref mediaID="U5L2-Simulation_Sprite_cst_well"></ref></item><item><ref mediaID="U5L2-Simulation_Sprite_cst_sick"></ref></item></list></costumes><sounds><list struct="atomic" id="191"></list></sounds><blocks></blocks><variables><variable name="infected?"><bool>false</bool></variable></variables><scripts><comment x="20" y="10.000000000000014" w="331.3333333333333" collapsed="false">There are things to write inside these blocks:</comment><script x="20" y="64"><custom-block s="simulate disease, population: %n percent infected: %n speed: %n"><l>10</l><l>5</l><l>1</l></custom-block></script><script x="20" y="97"><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="# infected"/><block var="population"/></list></block><script><block s="forward"><l>2</l></block><block s="bounceOffEdge"></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="20" y="258.16666666666663"><block s="receiveOnClone"></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="# infected"/><l>100</l></list></block><script><block s="doIf"><block s="reportVariadicAnd"><list><custom-block s="touching infected person?"></custom-block><block s="reportVariadicEquals"><list><block var="infected?"/><block s="reportBoolean"><l><bool>false</bool></l></block></list></block></list></block><script><block s="doSetVar"><l>infected?</l><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doChangeVar"><l># infected</l><l>1</l></block><block s="doSwitchToCostume"><l>sick</l></block></script><list></list></block><block s="doWait"><l>0.1</l></block></script></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="population" style="normal" x="10" y="31.000001999999995" color="243,118,29" hidden="true"/></sprites></stage><variables><variable name="population"><l>10</l></variable><variable name="speed"><l>1</l></variable><variable name="Clones Ready?"><bool>true</bool></variable><variable name="# infected"><l>10</l></variable><variable name="% initially infected"><l>5</l></variable></variables></scene></scenes></project><media name="U5L2-Simulation" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><costume name="well" center-x="12" center-y="26" image="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABkAAAAxCAYAAAAvFgI4AAAJUUlEQVR4AZRXW4xdVRn+/rX23mefc+bay5QCpXIRsbVCKRgRNNQLBmNEHtp4ia/lyUSf1CeO7z75YIKPJgbTMYZIongJ1pRIuAYoFMVIhAK9TGfmXPd9rd9vnxnKWM7Ucc361/X/v2/9/7rsMwZbTKoqnb9o8N3faePh4xodOa4WqrIV8y2QqBx7RMMfP4bZMsE1UYEbBz7/yM1YvuoHi5i5t6PB/yK6MglX2nkczfbVWOiH2Lfcd4f7I3xlkJsvd5PW3Wme7r/1ILbXi7gS0RVIVL6/iLhf4toiw8HuKu5b7dkHlpbx4GrPfP3i0H6tN5Iv5r1sfzA/2n7o2PPhZkSbkhw5jtDF2DnK8clegs+tDih9vb0/wMe7Q/OJ3sDc2U3w2STFpyVtXP+p226a6nTUTCKaOAioXFUg9iX2DHPcPhjhDsrNaYYdeY7pLMPsqJDdw9R+dJiZ2xNX3SLTsv21fZi4PxNJOh2Ii9Ai6NVJgpvSBNcVOWbVE0QhCoozUVkFs1kpe/IS1xkN5vZmYMg+fOImknBFEkcIywrTlJmiQEsdCSBQBW2ERBSv1JF2UbhZ51wzNysWExINJoweASqTivOl1cpZeC/1PVFwlbTwNKlF69p5AzWSqTP5qDvx3tCEmpfnRZKMUpUKFZdeKbyq91CvILAycdvYVw5KWajPMut8Hszf4C6HqvsTSfafhoZaFVFY9UNbDqxxKeAdIRUOWmPDkxFFaXzeE5cuixaDZPTvCtwuXJYmkuBhoKmNYirMV1pBfjY22bJBmmiVOl8MvZYjDz8qAiSDSEbn4jA723bd0fTg9drRD4VsAwnfJj4Rxx5/r7X0i8G8K/vbbJmGzSDptoLB+Qgrq8ZdSMrsTOaSMwzPhUHIMc5125KJCf18EB7YceyR1Zn7f/rPBjp6CXu9ocLLF188iIUo37Evh73nQjb1haWR3DVKdG9V+aagquCT0pWDUssh23kl3sG7YMegiA8uJ7Of70rzsDfm0A2zu/Z+79buzPgRZejGJCQIFywWXOpu7Q/k/n4SfGM1jb61PGw9sJJPfWZQzHys1NkFtbNtG+2IJdrRdHZ+Npf5q3vV3G0r+eyXLiatI6uj6JuDLHxwVNp7kmF0w/zq6hQ6HcPjp3JNiFaZY88olYPDkdzdH9KDNLwtKeKb0yLek/vWzkpmphHMxzbeHtt4IVK7reUxN5vrzO6kat04Kpv7h3l45yAnQWbu4g7e4mxz7tDur1pzZBEm8Wh6dQt5oXvTXK8tCpnzakMYayCBKEJuZihim7BBy5iwBTENqEQCiYzY0HDCOgStorK70lyuzytzrXNu5kB0iCC8eA3aVmpj59FWL7EIEIRaNGNJg9CUQn9hREUExgQUO24DAhG+QJHkcZO6AW8W+LCqttVJW41EUXHWmKUTEFdQ18DUpYjAWq2akR81YwwaDfDo8HYAEAAiQlEKScH7ZKjb0FEr9oOogZTLdkI1iLeiMGnTiMF6MrQz7FE0sKiiCEnc8CMGLeeYW1fbUCnbRBF1ceDTONJRFPjMGOe4DiUBFXg3qUVYlsxeoDp+NYgn3nNFpTWmMFBOUeFDuV6vYdjgjYWLAimNgRMjHsShkTobaDP1eokEnuA1kIjSnKIUz9UIpZ7YKNSou6xEBAJmD3KAvXVID6CkYDf3oa4vF60HanA2lFJ3ryjUZR6r0PExqUIQhkj752Wddjx9WaHsv2/J5hUyowMIw8SDgPcT/fKulOYtuzaEi4HlpgiUeybKxaCWscm4MS7GXYxn2Kcy1RkXpaAWhYhVhRFRIyE9AdPYk8qAHyUI58ASdRdraQxVjzHY4MTaqNbVuODaWXuQQiiWpJA6ccRKwU/fKtbCFfA8WNoZiogopNaFpz8U+gcFxzDWFjbHKriUxIKHyXkjlRepGIpKDU8S3wrfnIeanUuLimKphMu7oebnQ03PRZKdbUh+PlDHD5KWouLriDge+6JwVVUp+AHjSmpywxdZR9Rdou17EZJ3AkneAdLzWdkbvvHCCW8Wjx6hszuHU0HyVssOXpxt9E/Ox/2TU2H2osCdgRF+oUhBPO+UwFDPqDMDjADUFaLuYlOK17dFydPz8eCvc43e3+bsyt8tvzc79y2VjJDo6dPI8t7KubbvnZo3w5Pz0fDkVMO9wsidI3AmSjgCak0CTxKvLOpwKSNZqPOrAdy/psPsuW1B8tRsI3tuJszf3DH97mDx6FFPEuBER6rl7Tcuz2n/jYXp4pmF6ebTptE8XfnGBYXJayeUl9X5TLXoqs/76l0BzzHSVb7Svi/824128NL8XPrMLp++0j578d2ffOe+hCvh/rCs8+JRcZ2H7kh+9O0D3TPnqtU8nutVYlKu1FFU+XOSvxm0Ss5XZbpEkgyq9SvB0kieu2C4NEx6fzz929UfPnRHv9M5nEEYA4KPPWG9IYueOnCTSwcMkTFO+BZRV1VL+LKvLl0qfd51viK/9xwnlwejqi5cid2JzsNj5g2AmEAC7LwXaiOu31PV12HnHis7PvPqE6eOYWOotPaEx11qsdRHF5PSRJJJijUV740CjJ6MHahRqSocq4Xnm71J+f8gEYKuqY8JwS4vZl2NgTfnmByusdFlBZfL4IOwJGOHmRobS3Y3yWtL22Tyv4ZrPOJDeQzq5df9DQpXcGTrntS4FEIrvdmAvt4MgvXGhGpLnhB53XT8mKy310JXd3i66mpT2RLJmrVcQhWoAPWJwpbSlkiIOAYT5eeubilDVt8bXfOxrvhLuZ6ZKFsiGVsyJgSj/tY9GNuxoBHLTXKNi/FhAiuCC+o/z1I5LBintSMXXGHnNyWxIZSffS9GvTHirCjbtiRxZS1KK/DW1AGk8CeniQJNWjNr8RuTf1BMJuH/jHyyqshiFIayEoZYjhpYakY4G4T2vTgKzzWa9kIjwsUw9CsRtH7787lgxn8A/UFrIsniEfiihVHcxFutBp6faZkTc63gz9NT4RNT7eiJdtz4w3TL/mmqbZ5sNfFUo41XbSNYOjXqFphw6iaSgAF/I8AoyPBm3MKT8TR+M93Gr6anguPTER6bmbK/npmKHt02h0fn2vZxOxW8IGFx4fcrvywxIU0moeKJw1K9/HMsX+jjHyp4Uar82dXpt1/qvd16tcwbL3cv9J6fzdrP5jY81XstfvdnR3eO0OlMDNd/AAAA//8F1vDWAAAABklEQVQDAJTu+C2+htf3AAAAAElFTkSuQmCC" mediaID="U5L2-Simulation_Sprite_cst_well"/><costume name="sick" center-x="12" center-y="26" image="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABoAAAAyCAYAAABCtcuVAAAGoElEQVR4AexYa29Uxxl+3jlzds9evDYGx7VlGyc1tAHUpiIoaaoWKvVDW5FKVWmjfmilfsnv6H9pI1W9qm3UllRRSCXUhCBQUAhKAgmIBGKML7t4vbvnzCXPnMWGjY+DE8X5lMM8c33mfeZ955yZNQrbe8QD+jpQ8eOo+UlU2S4T0famA+pBxGDs1hhqmMTE+F482qnjsayEb6QzmGvPYuwsED/IRhhXIdsKQWS1jt0jVezPyjjmFX6mRf2S/GegcVx09MTDc6PjbwAl9n1i2lKIIgoNDOs9OGAEP/CCn9LST7xzx1n+mLF8OvL4YRKtHp74auWBYoVCFBGMobo2godJeFIJvguHb4nDXgEm4DFF7BdnnxDrjiZReujgLEY5T2OLh3YKR9SyxmgMHKDI4xR4lB6MkZkQ7EYMjwb7Z5QzR7SxRzrA3tt7UOF4YdpKSJcijDBcs1xl8GKUs4OAIPwDc+QvUo1i0wC+zjBOVVT+NhbaLOzkRMWBhBiiJzW2SzQtLPtJ2AIhUCKowmHECRo9nb8UgoKHtjb33gREE3zLuFD0OT43fM+IsE2OECQIiRLcxhYPOZtHLLgDAucdWOV6Q/vjNE9OH5kD1hjmdjtDRponNqVCoSZgexnaXPMyscpZhuibZeW+5BiyVavwYepxKzXo0MPtCx2kB7qCto+wSEMtiqU0fs+A0BuCHfRAFl1cu9YeHl9o16aoR2ZB2vCIk7jviBfn0Fiaq4xn5cqkUeUGQ6IYGk+xAC54w4oXhczGutOr15wd2dWIZuKHWgcbu/wUz0Qg2mCykgv9FlD8Buq9/cl0WSVHksgdV86cULBHAZlSgjKFFCEIT19SuAjtgd0qTR9Lmgs/Su6sPK2sO7ZWjw+0eQ5yrBToASpkz04iSUYw7cU9pX12Qhvzq9iYE9qa70Xez1CgTl7Esi8krAGRABVts9lKp3Ws2m4+k3Sav4lN59fK+OMa+pvtMYy+BGjOhfojEDXKGCoh2ifWfFus/Y54e4hbMEnCEFEi7omwQRnJQSPiUVfOTUTOPKKdOxg5+2TkzFERc1hiTHwN+bcF9XNAaYuagZ8U72cFeIi2KkREIDco9+Xgc39b+J0FgCUQe2CYmBYeSZHG7soISmyLughIqqEFUcKYVwHuBxCxRG4e23yEbBCCEKoE4IlhUeabpFjPV4Gehzjl2aEIksNIf2KobR/rc1h6n9sWhlaCgWA4lDuOHRca4lsVvNhRIW6WDyIBOyrEA1Lu+P6e76hQ8OgLCV3+ooe4ETvnES0bhu0LCR0d2UiKd4+LHdLISov36bK3WIFBk3dlCykvvww9tjPCcDzcuMhLy9zkveFe7fo+t8WeZY7csA7vO8FiN0GPX2w4DeDEoml0+YqNo/NWE3H0uomji07jBgRdgBcds43kB9qWZ0DTx3jPxnLRxvp8Wiqf6Zbq51ei5IO/LaAX5vGqgbvewKpR+kpWHjqdluv/7laGnjfl6ktO6be5qnCVu0C+D2ajLsi8knmrS+dcufZCmlT/1Sk3Xl6rDV+6gUrzWdBHkrllwKE3kV65tHJjobrrzNLE9N+bozN/zeL4fxB/lT+n2uT1Q8ZKSDx850N5FxkdvC0i57Jk6J+39sz+5fLk3IvvDO976/C7y60QtsDLhULlcSDb9+rl1iMvvnGreunCQryydEcZmw0EKRAJ73CZxXryPDiNtr22X7q52Dx1Yf6pk/9f+v6pU911kUDcEAqNu/BjC3CJgeOgv9s3UPBk/mCggw1Ln0d6cIeBj4eZo+A25sXmLGxC4QxS+ddFeEFY237iojeT+Ut1c+dgT6Gng5TBVqHQIOXzaX0p9JnjqD7zzE858cs96gdMir/+/mBxvmXo+NOVhzJ4fmLw4+QJKor3VLAn98bCKdIJfVugUGgC8DyCgghPsHz1nveSz214WF5qXUpQkjk4zj7+6LYbnJw4mBUK8Wh2XGGHd9EyrS9TscVpa0Sb9fcFqNDoertJ3hJ/H7Sc4Z2MXJzUwVQodB4wnQi3eUpfpOFXOPVV4jXibBqV/+EVmqHO6+EM/XmF5Vlyr9Z8HlKubVAktAqFfgHYPdew5Lt4PXJ4HgZ/QA+/D3Cl8nMUOs3673yG5yj0Z+vxslnBe39awKf7YzmsgOHpXbmJm3eu4VzaxKmshRfiFv7TaLcu+EWcY/0k8d/edZwm5+2TLTTDAsPcIhR6tE48BKT8T4pmfRUL1TV8iDXMy1V0d61gJdTRxvwQsPgVoP1JIgDwEQAAAP//deBkdwAAAAZJREFUAwBsn4mFRk6ItQAAAABJRU5ErkJggg==" mediaID="U5L2-Simulation_Sprite_cst_sick"/></media></snapdata>