<snapdata remixID="13487671"><project name="U8L3-Subsets" app="Snap! 9.0, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAADiRJREFUeF7tnXlwTVkex38veUnIIkJiTUIWEdrSiaUsscQSW2YGPYimGXp66DH0TKEbpayFP6huhTbFxDSGaRRjbUVPI/YYY2nT1mwIsYXIIoslb+p71H0vNy/b496cJO93ql6Rl3vP75zv/eTe8/ud3znXYDKZTMSFFZCkgIEBlKQ8mxUKMIAMglQFSgTw4sWL1KxZM3J0dHynxr169Yru3LlDHTt2fKfz+ST7UcAKwCNHjgj4ipfkwxvpxdUjZKKyh4xBkTHkFhYtTk9JSaH+/fvbj5rcU5sVUAF47tw58vDwsKrEaDRSwrwI6tWsluV3Lu5kcKtHpmd3VcebPBpS6vBN4jv4NwaDgVq3bm1zw/gE+1BABeC9e/foyZMnouebNm2iBw8e0OLFi+nly5d0d0kf6ulvAdB16n4qzLhP+VsmWwGYOGS9+buMjAzq06ePfajJvbRZARWASUlJlJ6eLiqJjY0lX19fGjt2LGVlZtKD5QNVANb6ZD05eAdQ7jfqR2yhewO6HvWtuSFZWVn8GLb5stjPCSoA4Xzk5OSIxyZKnTp1xP9zsrMp668jKaJpEafEwUgG59pkys9W3wEbhNDlzvPFd4C5a9eu1KhRI/tRlHtqkwJWTsiuXbsEdJ6enqqKfJ1zyXT9R0LYGnyW9q9j2yF0N9eJHj9+TB06dKCQkBCbGsQH25cCJYZhjh07RmlpaVRYWFiqGspdUnE0lAkVnPP06VOaMmUKubi42Jea3FubFahQGCY/7RYl7VxGb16/KtOAt09DCvrDWsrLy6P79+9Tp06dyNXV1eZG8Qn2o0CFwjCvT6ynwJR/qVRxaBBMhY8TrZTKm3HB7EkjIN2+fXv7UZN7arMCpYZhNm7cSNHR0eTt7U2O8d9R4O095sodA7uQ86BZlPftUCuD2X8+Rw8fPhTfI6YYHBxsc6P4BPtRoMwwzPz588WjtPbFrcUA7ErG8OFUsHOmlVLPp54R56AA3qCgIPtRk3tqswLlhmEQxzPGb6C26UdVlRu8fMmUcc/K4NM/nqS7d9/OjsBRiYiIsLlRfIL9KFChMIynZx1yu/gPMmAmuIwwjDG4G92lBvTixQvKzs6mMWPG2I+S3NN3UqDEMExcXJxNYZiiljFvjCwYHx8fmxsE7zkzM5Natmxp87l8QvVUwArAEydOlJgNU1ndQzwRMchu3bpVlkm2I1EBqzFgvXr1RHPi4+Pp9evXIicQSQp+fn50/vx5MbMBDzkqKkqM8dq2bUu3b9+mvXv30ubNmzXpyvPnz4X37O7urkl9XEnVVUAFIOZu4XSgrFmzhs6ePUvDhw8XY7rLly+LRyOgA5TOzs7iOEzZIYMGP3/66acic0aLgrZ07txZi6q4jiqsgApApE49e/ZMNBcgXb9+XQCHsRkSExBYBmhIWu3Ro4c4DlNv+ODR2aVLF3GMFgWxxO7du2tRFddRhRVQAQj4MI8L6GrVqiWm0YrO9eJ7vX5+9CCNnFxqmet/9OgRA1iFwdGqaSoAAR8+KInn48j7yHzycDFQYu3WlOWozo7RqgHhOfHInaZG0dPpSYtfmatFNg3HELVSuerWYzUGVAC8tPdvNOTpDjoX8jm16Pex6IGzkxP99/RxepmfX3aPDAYK6xpBjkancnuelnqHGhyaSX69YijFf7AKQOUxX24lfEC1VcAKQCUl//K+WPLLT6am4742d+72wS1U7+DXZHybr1pm8Y6ZSamhUWLsiJKbm2uVY6hU8Ojcfgqv/4aSfAea64QTwgCWp3L1/70KQMCnAPjz/g0U0dRIpxw/FHO7w4YNo6yftpLbDysr1Ov6o7+i5OA+pIR14F0rMBavAM5OlEsCJTYdoAKwZ8+eFbLFB1VfBVQAYtxVFMDIADfKCR9Hu3fvFgDmHP3eJgCTgiLp0qVLYk0IYnsAsCQnBgAOrJ1ECU2iVAD26tWr+irLLa+QAlYAwvtEuXLg7wQAs8M+EckF/v7+lBu33SYAEwN7i4wYFIR4ygJwsFsK3WzUz9xoeOQMYIWuYbU+SAUg4FMA/N8P31Hv5q4CQKXk3bxA7lu+ItPLvDI7bTA6U92ZGynFwcu8uwKC1wjtlFSuXbtG0R536EbDvioAe/fuXa3F5caXr4AKQAR/lWTSXw5uFABmfTi2/Fre8wgA+GvPVLrmE2muCXfMyEjLz+9pgk+vogpYAYjF6CgKgJnt9U+pwhjwN3Xv0VVvyx0PY0YGsIpSo2GzVAACvuIAPm/3NgaoZwGAw+ql0S/1LU4HAOQdFfRUvWrUrQIQaVD4oFw7tJl6NXeljDYxurcUAH7k/ZCueL2dX0ZBXmDfvpYxoe6NYANSFFABiHhfcQCffTBK94YBwBENHtPPdS3p+wCwXz+LV6x7I9iAFAWsAETuH5IOlDtgZQAIJ2RUo3S67NndHCcEgLy1mxQmKtWo1bJMAIhy48ct1LNZbXraeqTuDQKAo5s8o4seXc22sKaEAdRdeukGVACmpqaK7OeiAKa3GqF7I/EI/rhpBl1w76ICEFnXXGq2AlYAKksqb/57q7gDPgn9re4KAMCxfpl03tWSAY1dugYMsMwN694INiBFARWAgE8B8NZP/xT7AT5q+ZEuDSv6dogbN27QuGbZ9J/ancy2sAyAAdRF+ipVqQpAbCyOD0rCke8FgA9DhuvS4GnTpol1JqtWrRK7aP0u4AXFu3Qw20L61sCBlvQsXRrBlUpXwApArHArDiBWyGG3VHy0LMiUwXwvFj9NDMqjs87hKgAHDRqkpTmuqwoqoAIQ8CkAJh7dRj38XOgEtREzEti+F4uTlI0r3dzcxGq54gV3NYRxwsLCzPsLYqES8gHr16+vOrxu3bp069YtsZPq71sU0BmnMBWAgwdbMqSroHbcJA0UUAGI1yrgg5J0bDtF+DpTWvBQWrZsGX3xxRciSN2iRQvxe7zKAcswsYAcqVPJycliN3yETwAmsmqwvzTWDWOFHc5VUrNwvpeXl4AP639xh/0s5CWdNn4o4oAo+fn5VN0AhOOEIQyWNbx580aDy2OpAtlE+AOG7jVpvbQVgAAJJTluBwUU3qeCbp/TyZMnacaMGXTgwAHzY7h58+a0dOlSGjdunNiOd/ny5SJpFSvp8EgFYHAiIBoAxF1OARC/S0hIEPAlJiZSdnoajW9poJMO7cyKA8AhQ4ZoehH1rAx/eBcuXBB9aty48Tu/5Ke0NgJozNNDL2x9UlMgVAGIgLAyFQcAowuO0Rafz8ydLb7XHx61WCdcUFAgxMFFQAYL/l/a9r5I0YeIgYGB4q6Jfw07/kTtB4ymE4a2Zv3hmFSnNSFXrlwR++EAPj0LtEXWert2lj9WPe3pXbcKQGy9gccpwLpzZh/F5O2jtDd16LZXR0pwa0OvTO/26q7SOhFqfEI+KYco1CmdnPv9heJMH4hDMSc9YcIEvfuuaf3YV7uy0scq05amIpVQmdXmRDt27Hg7xvP3pzoJB8mUm6F3G0T9Be1H0uPMXAEf1gNXt931FSjQ/kOHDomNOY8fPy76AScMT5clS5bQnDlzRHgJf+SHDx+mWbNmEeKgcNLwNFi3bp0Y+2JWCt/PnTuXFi5cKM5RMsRrNICAAbl4eG2XVvu8VJRgeNjVdSWcAgXimwgvYdy8fft2MXxZsWKFgGfPnj0UExNDCxYsEGPFefPmCTAxdsQrLVAwdMEWJxs2bBAO3NWrV8WcOHarVYZHNR7AigLDx1kUABS4640fP16MbeENYwwLEFeuXEk7d+4UdzUA+uWXX4rxInYTg8PWpEkTM1xDhw6lbdu2iaEQvj916hRNnDhRRBwQnEdhAJk8KwWKQoHHKiIEuAOOHj1aRArwyAWIkyZNEtEBRAK2bt1KixYtEsMOhG7gwKxevZomT54slsIiEoC7JCIQI0aMoFGj3uZmMoAMYIkAYhmpg4ODrurgEY2xZWU5PLp2ht+Yrp28iGsiHNWmTRvtKi2hJowJEfpSJgR0NVYJlZe4R3Ql2K1xJjCDg5c9Ag5MMeKD96TAA1Z2m3ifTiMQDecQjmF4eLj5hZLvU2dVOJcB1PgqwFO9efOm8GpxR0SuIxyO9300YyoOs0xwTGpSYQA1vprKykLcCeFEhIaGlropk8amq2V1DKDGl+306dPiMYm9dPgtUeWLywCWotHatWsJKWcIClf0vSXKslYcX9pWdOVfEvs6ggEs5XpjagwxOzxGcUfDIvmGDRuKaTLE8LhoowADWIaOmFKbPn26amdXxOEwvkO2NhwCXjbwfiAygGXohxSr2bNnm9+JgkMRDnFychIv6gkICBDZ4ng9GZd3U4ABLEU3ZDdPnTpVxN7wGMb0GRJq8Q5lxPi4aKMAA1iKjrGxsSLYiyUHrVq10kZtrsVKAQaQoZCqAAMoVX42zgAyA1IVYAClys/GGUBmQKoCDKBU+dk4A8gMSFWAAZQqPxtnAJkBqQowgFLlZ+MMIDMgVQEGUKr8bJwBZAakKsAASpWfjTOAzIBUBRhAqfKzcQaQGZCqAAMoVX42zgAyA1IVYAClys/GGUBmQKoCDKBU+dk4A8gMSFWAAZQqPxtnAJkBqQowgFLlZ+MMIDMgVQEGUKr8bJwBZAakKsAASpWfjTOAzIBUBRhAqfKzcQaQGZCqAAMoVX42zgAyA1IVYAClys/GGUBmQKoCDKBU+dk4A8gMSFWAAZQqPxtnAJkBqQowgFLlZ+MMIDMgVQEGUKr8bJwBZAakKsAASpWfjTOAzIBUBRhAqfKzcQaQGZCqAAMoVX42zgAyA1IVYAClys/GGUBmQKoCDKBU+dk4A8gMSFWAAZQqPxtnAJkBqQr8HxBpiALUbpwoAAAAAElFTkSuQmCC</thumbnail><scenes select="1"><scene name="U8L3-Subsets"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="nCr %&apos;n&apos; %&apos;r&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doIfElse"><block s="reportVariadicLessThan"><list><block var="n"/><block var="r"/></list></block><script><block s="doReport"><l>0</l></block></script><script><block s="doReport"><block s="reportMonadic"><l><option>floor</option></l><block s="reportQuotient"><custom-block s="%s !"><block var="n"/></custom-block><block s="reportVariadicProduct"><list><custom-block s="%s !"><block var="r"/></custom-block><custom-block s="%s !"><block s="reportDifference"><block var="n"/><block var="r"/></block></custom-block></list></block></block></block></block></script></block></script></block-definition><block-definition s="nCr %&apos;n&apos; %&apos;r&apos; recursive" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doIfElse"><block s="reportVariadicOr"><list><block s="reportVariadicEquals"><list><block var="r"/><l>0</l></list></block><block s="reportVariadicEquals"><list><block var="r"/><block var="n"/></list></block></list></block><script><block s="doReport"><l>1</l></block></script><script><block s="doReport"><block s="reportVariadicSum"><list><custom-block s="nCr %s %s recursive"><block s="reportDifference"><block var="n"/><l>1</l></block><block s="reportDifference"><block var="r"/><l>1</l></block></custom-block><custom-block s="nCr %s %s recursive"><block s="reportDifference"><block var="n"/><l>1</l></block><block var="r"/></custom-block></list></block></block></script></block></script></block-definition><block-definition s="%&apos;n&apos; !" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doReport"><block s="reportCombine"><block s="reportNumbers"><l>1</l><block var="n"/></block><block s="reifyReporter"><autolambda><block s="reportVariadicProduct"><list><l></l><l></l></list></block></autolambda><list></list></block></block></block></script></block-definition><block-definition s="subsets %&apos;set&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="set"/></block><script><block s="doReport"><block s="reportNewList"><list><block s="reportNewList"><list></list></block></list></block></block></script><script><block s="doReport"><block s="reportConcatenatedLists"><list><custom-block s="subsets %l"><block s="reportCDR"><block var="set"/></block></custom-block><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportCONS"><block s="reportListItem"><l>1</l><block var="set"/></block><l/></block></autolambda><list></list></block><custom-block s="subsets %l"><block s="reportCDR"><block var="set"/></block></custom-block></block></list></block></block></script></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="157"><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="158"></list></costumes><sounds><list struct="atomic" id="159"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="0" y="0" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="80,80,80,1" pen="tip" id="164"><costumes><list struct="atomic" id="165"></list></costumes><sounds><list struct="atomic" id="166"></list></sounds><blocks></blocks><variables></variables><scripts><script x="566" y="149.33333333333334"><block s="receiveGo"></block><block s="doSetVar"><l>wordlist</l><block s="reportNewList"><list><l></l></list></block></block><block s="doAsk"><l>What service would you like: combinations, subsets, or factorial?</l></block><block s="doIf"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><l>combinations</l></list></block><script><block s="doAsk"><l>Enter n</l></block><block s="doSetVar"><l>n</l><block s="getLastAnswer"></block></block><block s="doAsk"><l>Enter r</l></block><block s="doSetVar"><l>r</l><block s="getLastAnswer"></block></block><block s="bubble"><custom-block s="nCr %s %s recursive"><block var="n"/><block var="r"/></custom-block></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><l>subsets</l></list></block><script><block s="doUntil"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><l>STOP</l></list></block><script><block s="doAsk"><l>Enter an element</l></block><block s="doAddToList"><block s="getLastAnswer"></block><block var="wordlist"/></block></script></block><block s="bubble"><custom-block s="subsets %l"><block var="wordlist"/></custom-block></block></script><list></list></block><block s="doIf"><block s="reportVariadicEquals"><list><block s="getLastAnswer"></block><l>factorial</l></list></block><script><block s="doAsk"><l>Enter a number</l></block><block s="bubble"><custom-block s="%s !"><block s="getLastAnswer"></block></custom-block></block></script><list></list></block></script></scripts></sprite><watcher var="n" style="normal" x="10" y="10" color="243,118,29"/><watcher var="r" style="normal" x="10" y="31.000001999999995" color="243,118,29"/><watcher var="wordlist" style="normal" x="10" y="52.00000399999999" color="243,118,29" extX="80" extY="70"/></sprites></stage><variables><variable name="n"><l>6</l></variable><variable name="r"><l>3</l></variable><variable name="wordlist"><list struct="atomic" id="264"></list></variable></variables></scene></scenes></project><media name="U8L3-Subsets" app="Snap! 9.0, https://snap.berkeley.edu" version="2"></media></snapdata>