<snapdata remixID="15001800"><project name="U5L2-Simulation" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAPQElEQVR4AexbCXBV1Rn+XvawJiCBhLAkgRBWDUuAKZuRLbIJOIhSEHFcOiMMCFSw0OKMKKNTilQsq4jQohQDVCtisUAoEAfZt2BYQxIChCUsCSHL6/0OvNd3gcRsr9z77s/w3+Xcc879/+//8p9z/nuel13+CQKPEAEvyD9B4BEiIAR8hODLq4GHEnDnzp3Yt28fDhw44BbZunUrdu/ejVOnTlWpHD9+HCkpKeJXEyHwAAG/+eYbhISEoGbNmqhevXqZxFfrJX3NOzi16PVS5fTi3yDYfgPh4eEoLCzEhQsXUFxcjMtHd+DI/JdxZN5LFRbbmWR4e3vDy8tLkdtEPrC0ql6u1jMyRUZG4s6dO2USRkjW/SnpX+hWsBt9amY45ekBA53XjvLeNdLhn/q96rt27dq4ePEiCgoKcH7TIjT1uw7v/m+h9cTlQO/J+PZvR3Dkz0mlSuBXyejldwpPBp5Gw6Is1VdRURFu376tCO5qm1wbEwEdARlB8vPzQUlMTASHtEWLFuHjjz/Gli1bsGLFCnz55ZcgUZcvX66GT9Yt0qKZq3m2gJqw5+XAr/dE12J1zYjHNhQ/Pz9FGtjtyI6fhRYtWmiXdrRq3Ro95sxBi4AAvPLttwjRWraqVw9DJk5EpHbdSZNWmtTMvIMzqy/CXmTX7qD6IqFJ7uzsbFVW4kEeGAIBHQFv3bqlohOjWv369TFs2DCQJPv37wefNWvWTEUWDqFXr17FyZMnVf1CLeq4WmO/fQPeEXG4s3mea7G6Li4qVm34juvXr6trwI46oY3Vc8ch12ZDNX9/XE5OxkBtTho2fTrqxsdjwNGjiNT+ILonJamquReKkG2LVdfs0yGMhKpQDoZGQEfAvLw8UOjEmJgYnD59Gm3btsXq1avRtWtX9OnTB/3790fLli3x6quvYtq0aYpAd+OP3s78NW/qC+7dMUKxfwrfxXs+yt73PU9OydEiboAWjfM0AmYsWAD7pk3I274dB6ZMQbG2gEn58ENokz4E/f5l1PPar9qxL4cEaNFTFcrB0Ah4uWrXpEkTnDhxAllZWYpYjHANGzZUZSQM73lOS0vDjRs3nBGwXdd4ZMZNQnrUEJyLHFLyucUIXG4zUvXN9wQHB6trbx9fxKYsxqUflmLD+vXYuXMHutapgxpjx6JQm5MWawsir4gIZGvv9G/cGNcCA+Gn6RU0fQwa3tp4zwSbGoKpX2pqKurWrXuvXE5GRkBHwPbt24OEoxMvXbqEy5cvl0nSzp3DoeJwHAzqjkPB3Us+14hTpOUKOEaLsFxtc4hvPPoDXOoyHsEhoegTmo8mZ/+JoNZ2VHvCp1QpDq+uCE/SHw7+lSIz/0gYrY0Muuj2PwR0BGSxr68vOnfujI4dO4KErKx06NABtS4egO+2efDd+icluRtmIWvlm045sWwijn6/GnmFQGDcCISNnI1/F8bgRFjfMkvG+Qvg4mPcuHFo3rw5TRExAQI6AjIBHRYWpiIJo2BpwoQv0x2ss2PHDm065g2Sl/euwjlZ0Y4l6KOlYJiO6f94IwwY/AwSurQBr1nmkKjjq5zv7tGjhyLSoEGDUFbp1InrYxOg/mhVNNTbdQRk4pnpEcr8+fMxd+5crFmzBkzFTJ48GUuWLMHMmTORmZmJTz/9FIcOHcJzzz2HH3/8EW+88YZarLz33nv4UFsgTJo0SZGSZHR9iXfL3ii+mg6vph3h23mUHgw7VAqI7+cwfeTIETVkc1h1FaaH+EzfWO7MiIArN5zRh6RhGoMrSS5MbDYbGmuTf6ZhunXrhu3btytycSHBiBkVFaUWAK1atQIXFqGhoWrF7IiIrsAUHdusUjS2wCDYb+pzdRr/dDpkbv87Dv7x1zrJP7ZFvdvHx0flJl37lmvzIaAjIPNyTI2QgEy/TJ06FSTd8OHDwfuBAwequWHv3r0xYcIE9OrVCzNmzEBcXJyKjCTfiBEjkJCQoOaRGRkZyNe+Snj5+DmRKTqVjPx1v0P+2qnI//odZzkv7NXrOgnItkNjw+AYnh3nJva7K3T+gVSrVk2t2NlWxJwI6Aj42GOPgY5nGqa19jWCEY5kpDD353rPsrLIbS2XF/HKArVaTf+FNM2FzhMUAc9pq+r20U1Q93b6g6hqX004RFO4gj527NiDdaTENAjoCEhCMeLZNSeXJw3zS+ma/Vn5padn7qVv9qffQO6VLHQIzEZ+6g5kdJqAjC5TdJIe/IT6GsM5IoXTBNf54cOumRfkPNU0XrGQojoCcl7FBQZTL1WVhmFf5ZGWsZ3h3fZpJajVQJ0d9+oc2lLNMwvS9iN9xUSVyrl/nuh6f2X9u2qHDBPTGzdutJBrzWGqjoCc/3FDACNheWTXrl1q6GQ6xtGO1w5xlO3Zs0ftL3Tc88w6PFO48ubZVc6ePav6ZtnNmzdx8OBBdZ+1aSH6VD/nnCP2bx+F/q3rP5DaaXnxB9hsNtWGCyq+zxyusYaWOgLen4b56KOP1Epz8eLFWLhwIbhDZvbs2Sr94ih7++23QadycymJyPTM9OnTFVG4Wl63bh04p1u5ciUOHz6M8+fPY9myZSplw3kcCTV+/HgsXboUJBj73bZtm3MHzoYNG/DJJ5+odzBPye/TbMcNDA4X+bQfDp/HB8FHS+v4tB/mKHaemYtkGwqT1c4HcvHIEdARkFHGIVxlUjh/4uqWwzNXwvXq1VNEcpS1adMGDRo0UJsYWL9GjRpqxcwNrUzHcD5JYiYlJamdNbxnH927d1dRKTAwEEwgc0XLHTjcY8jh8qwW+ViX35xr1aql2jL5ze1c1NEVucK9XwHFRUBBrmux85r1HZKb+/A6zspy8X9FQEdAkozDMJ1FsjGh/MILL2DUqFHguVGjRuCnrqFDh6qykSNHgika3rdr1w5jxozB888/r8qYoOazOXPmgM8ZGfksPj4ezB02bdpUEZB9v/jii6o/tp83bx74nfj9998Hv4YwwvI9XJW/9tprKsVD/by8fXRA5SdOQ/76mVp657e6ct4w8rENt5CRzCwTMQYCOgLGxsaCn9e4VZ4O37t3r9r1wmiUk5MDOpCrY55Zxuh05coVcPNnenq6IhTPLONihqtjnh3P2YYpHm544LBMUvC5q7Au3+GQtLQ08JrvZ1vqxnaRo+eUvOvGJd1zPmEu2JbpJU4xSG5jQC9aEAEdAVnA/X4hISEgiUggo0pKerbadbO3RheszqijNi2kht7dvOB6TrnhT7NU5OSwr27kYBgEHiDg5s2b1RDJaFie9El568aE1kbArsUI/M+CCktM4Un1xWX06NEICAhASZsWnnrqKbVT5tGhLm8uCQEdAblY4PDIVaO7xZ72E+L9fkZs/Xz8wTsLg8OSSpVpdbLh+/R09aOl6gPeQoPii4g88BeVlKau4eHhKsVTkqFSbkwEdATkHInOdAhTKMzN8RsxyUlhGdMpvHYI6y9YsADJyclwlDHnx+u1a9eq3TL8nfHnn3+Ozz77TG1c8LYB12qF4ZmbOdjX62eMTRgL1NdAaq1JW034q6MO2vnJuzLjiRlqexZXxk2atUBOt4naA6h5J99PoZ6qUA6mQUBHQEeKg5N8EoqbSTm0bdaGZW5/4jYo/jjp2rVrarMqUxp8zvr8jsz23MzKRQO/G3PRwR0xrM/FBeslJCQo0hCheT63sOeZFCAAaFqrKT7o9wFWNV+FWWGzkBidiL0d97KakjZRbdTZcUi9WqwuSTz2S7HZNFarUjmYBQEdAZmuoEMpTJcwd8edLhEREWpeyGvODZmn4yYApmy4YGF9lnMFffToUbVq7dmzp/rROeeGjJhMxURHR6vfarA+AZp1JQf9sjT2VQO2Xt+K73K+Q+KdRJzxPoNVRavw7pl3WU3JF6lfqLPjEJx9QF2yL4eQhKpQDqZBQEdARiuSiA5toCWX+/Xrp4jH+RW/DTOBTGG0Yy6P0Y5tWD8oKEgloEnIwYMHq++v/BWdv78/+KWD6RnuqOHqmvVzrl5RIK3dWQ9TcjojpjAG0bnRCCkIQUBBAEJuhyCkOASv+7yupCC8AIyoX/9jA47/dRYSbn6ntbepaMr+GGGjoqK0MvlvJgR0BGS0IgGZa6NTGVGq4swhmUO3a39+cSORHj1CbdMal9EJE37yKVVe2peH0NR16FftNCLqByEzchAyhyxUBGSOj/k9fus1E/hW0PWXbPS6v0KCNkfr27ev+oDPIdZdwqRyakhPlb87UY4fH7nWPX65UOn57LPPqgXK/bbIvfEReICAVJkf7Jk7KymvZqRy6slpAPUWMR8CDyWg+cwQjc2KgBDQrJ7zEL2FgB7iSLOaIQQ0q+c8RG/PJaCHOMjTzRACerqHDW6fENDgDvJ09YSAnu5hg9snBDS4gzxdPSGgp3vY4PYJAQ3uoAqoZ6omQkBTucvzlBUCep5PTWWRENBU7vI8ZYWAnudTU1kkBDSVuzxPWSGg5/nUVBZVKQFNZbkoawgEhICGcIN1lRACWtf3hrBcCGgIN1hXCSGgdX1vCMuFgIZwg3WVEAJWie+lk4oiIASsKHLSrkoQEAJWCYzSSUUREAJWFDlpVyUICAGrBEbppKIICAEripy0qxIEhIBVAqN1O6ms5ULAyiIo7SuFgBCwUvBJ48oiIASsLILSvlIICAErBZ80riwCQsDKIijtK4WAELBS8EnjyiJgXgJW1nJpbwgEhICGcIN1lRACWtf3hrBcCGgIN1hXCSGgdX1vCMuFgIZwg3WVEAKaz/cepbEQ0KPcaT5jhIDm85lHaSwE9Ch3ms8YIaD5fOZRGgsBPcqd5jNGCGg+n3mUxuUioEdZLsYYAgEhoCHcYF0lhIDW9b0hLBcCGsIN1lVCCGhd3xvCciGgIdxgXSWEgGXyvVRyFwJCQHchK/2WCQEhYJlgkkruQkAI6C5kpd8yISAELBNMUsldCAgB3YWs9FsmBISAZYLJupXcbbkQ0N0IS/+lIiAELBUeeehuBISA7kZY+i8VASFgqfDIQ3cjIAR0N8LSf6kICAFLhUceuhsB4xLQ3ZZL/4ZAQAhoCDdYVwkhoHV9bwjLhYCGcIN1lRACWtf3hrBcCGgIN1hXCSGg8XxvKY2EgJZyt/GMFQIazyeW0kgIaCl3G89YIaDxfGIpjYSAlnK38YwVAhrPJ5bSSEdAS1kuxhoCASGgIdxgXSWEgNb1vSEsFwIawg3WVUIIaF3fG8Ly/wIAAP//4ivTuQAAAAZJREFUAwCXD8ElBEzHBgAAAABJRU5ErkJggg==</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"/><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"/></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 var="infected?"/><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><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="187"><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="188"></list></costumes><sounds><list struct="atomic" id="189"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="223.23139777941424" y="-61.84778831597902" heading="195.76" scale="0.5" volume="100" pan="0" rotation="0" draggable="true" hidden="true" costume="1" color="80,80,80,1" pen="tip" id="194"><costumes><list id="195"><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="196"></list></sounds><blocks></blocks><variables><variable name="infected?"><bool>false</bool></variable></variables><scripts><comment x="16" y="10" w="331.3333333333333" collapsed="true">There are things to write inside these blocks:</comment><script x="17.333333333333314" y="32.888888888889085"><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="doIf"><block s="reportVariadicAnd"><list><block s="reportNot"><block var="infected?"/></block><custom-block s="touching infected person?"></custom-block></list></block><script><block s="doSetVar"><l>infected?</l><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doChangeVar"><l>number infected</l><l>1</l></block><block s="doSwitchToCostume"><l>sick</l></block></script><list></list></block></script><comment w="220" collapsed="true">Move the clone and&#xD;make it infected if it&apos;s touching an infected one.</comment></block></script><script x="10" y="281.2222222222223"><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="28" y="326"><custom-block s="average time for disease spread with population size: %n"><l>150</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="speed" style="normal" x="10" y="10" color="243,118,29"/><watcher var="population" style="normal" x="10" y="31.000001999999995" color="243,118,29"/><watcher var="percent initially infected" style="normal" x="10" y="52.00000399999999" color="243,118,29"/><watcher var="clones ready?" style="normal" x="10" y="73.00000599999998" color="243,118,29"/></sprites></stage><variables><variable name="number infected"><l>5</l></variable><variable name="population"><l>50</l></variable><variable name="percent initially infected"><l>10</l></variable><variable name="speed"><l>2</l></variable><variable name="clones ready?"><bool>true</bool></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>