<snapdata remixID="9197142"><project name="U3L4.1 Combining List Operations&#xD;" app="Snap! 5.4, http://snap.berkeley.edu" version="1"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAELUlEQVR4Xu3dP2tTURjH8ac1wWpKB8GpDZTQRYSIENA3oAgB0xY7SZxEXFzURZK2FlQEO2iXri4NaTv6DtRF30CEDhHHFhTJoBDTSOIfrHpvyslJf9DzFRy0957n3u/zabtIHWq3223jFwVEBYYAKCrP2G4BAAJBWgCA0vwMByAGpAUAKM3PcABiQFoAgNL8DAcgBqQFACjNz3AAYkBaAIDS/AwHIAakBQAozc9wAGJAWgCA0vwMByAGpAUAKM3PcABiQFoAgNL8DAcgBqQFACjNz3AAYkBaAIDS/AwHIAakBQAozc9wAGJAWgCA0vwMByAGpAUAKM3PcABiQFoAgNL8DAcgBqQFACjNz3AAYkBaAIDS/AwHIAakBQAozc9wAGJAWgCA0vwMB2CEgVwuZ+Vy2aanp1EywAIAjIk7MzPT/Wjn//LZ3t62zc1NGx8fH+A6wjsagDE778CbnZ3dc0Xn7xKJRPd3tVoNT4znNwZgj6C/vgr+fVmz2bRKpWJjY2OeVxLWcQCM2XehULDh4eHuFfV63dbX1y2TyVgymQxLyQDfFoARcbPZrJVKJesgHBkZGeAKwj4agGHvX/72AJSvIOwHAGDY+5e/PQDlKwj7AQAY9v7lbw9A+QrCfgAAhr1/+dsDUL6CsB8AgGHvX/72AJSvIOwHAGDY+5e/PQAjVnAjVbQLzy/b3NycfEmH+QEAGLPdxpEts90fF8ynntid2ryl0+nD7OHA3w2APZI3hrb+ueJbomWL55/ZyqvVA1/YYRsIQAeArcSuLZx7aiuvAdjvJwQA9/kteGF0ufsteGJiot/m3P9HAQBGcLh+/Krl165Y1D/JR5GfAgD005FTHAsA0DEct/kpAEA/HTnFsQAAHcNxm58CAPTTkVMcCwDQMRy3+SkAQD8dOcWxAAAdw3GbnwIA9NORUxwLANAxHLf5KQBAPx05xbEAACPCPVp9bG8vvrMz1UlbKt13zMttvQoAMKbQ6aWcpRdPda/Y/dKy5ouG3U3dtHw+36srH99nAQD2CJX/eM1aJ9p7r+r88WvbPj34YG8evtxnai77XwEAxrjY2dmx4snbe69437KzGxkr3bpno8dSqOqzAABjAl6yolnLzMqfbWNhzUaPpn7/xNQ+u3P7zwIAjKBQ26rZ1OQUP453wJ8qABxwYI6PLwBAhEgLAFCan+EAxIC0AACl+RkOQAxICwBQmp/hAMSAtAAApfkZDkAMSAsAUJqf4QDEgLQAAKX5GQ5ADEgLAFCan+EAxIC0AACl+RkOQAxICwBQmp/hAMSAtAAApfkZDkAMSAsAUJqf4QDEgLQAAKX5GQ5ADEgLAFCan+EAxIC0AACl+RkOQAxICwBQmp/hAMSAtAAApfkZDkAMSAsAUJqf4QDEgLQAAKX5GQ5ADEgLAFCan+EAxIC0wHeiS0y32z7c6AAAAABJRU5ErkJggg==</thumbnail><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="true" codify="false" inheritance="false" sublistIDs="false" scheduled="false" id="1"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAOhUlEQVR4Xu3VwQkAAAjEMN1/abewn7jAQRC64wgQIECAAIF3gX1fNEiAAAECBAiMAHsCAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+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+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQIHLFxAWmhEwHPAAAAAElFTkSuQmCC</pentrails><costumes><list struct="atomic" id="2"></list></costumes><sounds><list struct="atomic" id="3"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites><sprite name="Secret Message" idx="1" x="0" y="50.00000000000006" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="80,80,80,1" pen="tip" id="8"><costumes><list struct="atomic" id="9"></list></costumes><sounds><list struct="atomic" id="10"></list></sounds><blocks></blocks><variables></variables><scripts><script x="30" y="20"><block s="doSetVar"><l>coded message</l><block s="reportNewList"><list><l>75</l><l>110</l><l>111</l><l>119</l><l>105</l><l>110</l><l>103</l><l>32</l><l>117</l><l>110</l><l>105</l><l>99</l><l>111</l><l>100</l><l>101</l><l>32</l><l>119</l><l>105</l><l>108</l><l>108</l><l>32</l><l>104</l><l>101</l><l>108</l><l>112</l><l>32</l><l>121</l><l>111</l><l>117</l><l>32</l><l>115</l><l>111</l><l>111</l><l>110</l><l>32</l><l>119</l><l>104</l><l>101</l><l>110</l><l>32</l><l>121</l><l>111</l><l>117</l><l>32</l><l>98</l><l>117</l><l>117</l><l>108</l><l>100</l><l>32</l><l>65</l><l>99</l><l>114</l><l>111</l><l>110</l><l>121</l><l>109</l><l>46</l></list></block></block></script><script x="30" y="127"><custom-block s="encode message %s"><l>hey</l></custom-block></script><script x="30" y="160"><custom-block s="decode message %s"><block s="reportNewList"><list><l>105</l><l>102</l><l>122</l></list></block></custom-block></script><script x="30" y="197"><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><block s="reportUnicodeAsLetter"><l></l></block></autolambda><list></list></block><list><block var="coded message"/></list></custom-block></script></scripts></sprite><sprite name="Acronym" idx="2" x="0" y="0" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="242.25,0,218.0250000000001,1" pen="tip" id="100"><costumes><list struct="atomic" id="101"></list></costumes><sounds><list struct="atomic" id="102"></list></sounds><blocks></blocks><variables></variables><scripts><script x="20" y="20"><custom-block s="acronym %s"><l>hello buddy whats up</l></custom-block></script></scripts></sprite><sprite name="Take It Further" idx="3" x="0" y="-50" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="71,255,92,1" pen="tip" id="108"><costumes><list struct="atomic" id="109"></list></costumes><sounds><list struct="atomic" id="110"></list></sounds><blocks></blocks><variables></variables><scripts><script x="20" y="20"><block s="doSetVar"><l>database</l><block s="reportNewList"><list><block s="reportNewList"><list><l>Ben Bitdiddle</l><l>computer wizard</l><l>60000</l></list></block><block s="reportNewList"><list><l>Alyssa P Hacker</l><l>computer programmer</l><l>40000</l></list></block><block s="reportNewList"><list><l>Cy D Fect</l><l>computer programmer</l><l>35000</l></list></block><block s="reportNewList"><list><l>Lem E Tweakit</l><l>computer technician</l><l>25000</l></list></block><block s="reportNewList"><list><l>Louis Reasoner</l><l>computer programmer trainee</l><l>30000</l></list></block><block s="reportNewList"><list><l>Oliver Warbucks</l><l>big wheel</l><l>650000</l></list></block><block s="reportNewList"><list><l>Eben Scrooge</l><l>chief accountant</l><l>75000</l></list></block><block s="reportNewList"><list><l>Robert Cratchet</l><l>accounting scrivener</l><l>18000</l></list></block><block s="reportNewList"><list><l>Aull DeWitt</l><l>secretary</l><l>25000</l></list></block></list></block></block></script><script x="20" y="211"><custom-block s="total saleries for less than 100000 %l"><block var="database"/></custom-block></script><script x="20" y="245"><custom-block s="total for more than 100000 %l"><block var="database"/></custom-block></script><script x="20" y="279"><custom-block s="average total %l"><custom-block s="total saleries for less than 100000 %l"><block var="database"/></custom-block></custom-block></script><comment x="20" y="317" w="164" collapsed="false">Total made for less than 100k : 308k&#xD;&#xD;Total for more thank 100k: 650k</comment></scripts></sprite><watcher var="coded message" style="normal" x="4.1666666666667425" y="4.166666666666664" color="243,118,29" hidden="true"/><watcher var="database" style="normal" x="10" y="10" color="243,118,29" hidden="true"/></sprites></stage><hidden></hidden><headers></headers><code></code><blocks><block-definition s="map %&apos;function&apos; over %&apos;lists&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%repRing"></input><input type="%mult%l"></input></inputs><script><block s="doWarp"><script><block s="doDeclareVariables"><list><l>mapone</l><l>mapmany</l></list></block><block s="doSetVar"><l>mapone</l><block s="reifyScript"><script><block s="doIf"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doReport"><block s="reportCONS"><block s="evaluate"><block var="function"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><block s="evaluate"><block var="mapone"/><list><block s="reportCDR"><block var="data"/></block></list></block></block></block></script><list><l>data</l></list></block></block><block s="doSetVar"><l>mapmany</l><block s="reifyScript"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportListItem"><l>1</l><block var="data lists"/></block></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doReport"><block s="reportCONS"><block s="evaluate"><block var="function"/><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><block s="reportListItem"><l>1</l><l/></block></autolambda><list></list></block><list><block var="data lists"/></list></custom-block></block><block s="evaluate"><block var="mapmany"/><list><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><block s="reportCDR"><l/></block></autolambda><list></list></block><list><block var="data lists"/></list></custom-block></list></block></block></block></script><list><l>data lists</l></list></block></block><block s="doIfElse"><custom-block s="empty? %l"><block s="reportCDR"><block var="lists"/></block></custom-block><script><block s="doReport"><block s="evaluate"><block var="mapone"/><list><block s="reportListItem"><l>1</l><block var="lists"/></block></list></block></block></script><script><block s="doReport"><block s="evaluate"><block var="mapmany"/><list><block var="lists"/></list></block></block></script></block></script></block></script></block-definition><block-definition s="empty? %&apos;data&apos;" type="predicate" category="lists"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportEquals"><block var="data"/><block s="reportNewList"><list></list></block></block></block></script></block-definition><block-definition s="keep items such that %&apos;pred&apos; from %&apos;data&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%predRing"></input><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doIfElse"><block s="evaluate"><block var="pred"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><script><block s="doReport"><block s="reportCONS"><block s="reportListItem"><l>1</l><block var="data"/></block><custom-block s="keep items such that %predRing from %l"><block var="pred"/><block s="reportCDR"><block var="data"/></block></custom-block></block></block></script><script><block s="doReport"><custom-block s="keep items such that %predRing from %l"><block var="pred"/><block s="reportCDR"><block var="data"/></block></custom-block></block></script></block></script></block></script></block-definition><block-definition s="combine with %&apos;function&apos; items of %&apos;data&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%repRing"></input><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportCDR"><block var="data"/></block></custom-block><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="data"/></block></block></script></block><block s="doReport"><block s="evaluate"><block var="function"/><list><block s="reportListItem"><l>1</l><block var="data"/></block><custom-block s="combine with %repRing items of %l"><block var="function"/><block s="reportCDR"><block var="data"/></block></custom-block></list></block></block></script></block></script></block-definition><block-definition s="if %&apos;test&apos; then %&apos;true&apos; else %&apos;false&apos;" type="reporter" category="control"><header></header><code></code><translations></translations><inputs><input type="%b"></input><input type="%anyUE"></input><input type="%anyUE"></input></inputs><script><block s="doIfElse"><block var="test"/><script><block s="doReport"><block s="evaluate"><block var="true"/><list></list></block></block></script><script><block s="doReport"><block s="evaluate"><block var="false"/><list></list></block></block></script></block></script></block-definition><block-definition s="for %&apos;i&apos; = %&apos;start&apos; to %&apos;end&apos; %&apos;action&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%n">1</input><input type="%n">10</input><input type="%cs"></input></inputs><script><block s="doDeclareVariables"><list><l>step</l><l>tester</l></list></block><block s="doIfElse"><block s="reportGreaterThan"><block var="start"/><block var="end"/></block><script><block s="doSetVar"><l>step</l><l>-1</l></block><block s="doSetVar"><l>tester</l><block s="reifyReporter"><autolambda><block s="reportLessThan"><block var="i"/><block var="end"/></block></autolambda><list></list></block></block></script><script><block s="doSetVar"><l>step</l><l>1</l></block><block s="doSetVar"><l>tester</l><block s="reifyReporter"><autolambda><block s="reportGreaterThan"><block var="i"/><block var="end"/></block></autolambda><list></list></block></block></script></block><block s="doSetVar"><l>i</l><block var="start"/></block><block s="doUntil"><block s="evaluate"><block var="tester"/><list></list></block><script><block s="doRun"><block var="action"/><list></list></block><block s="doChangeVar"><l>i</l><block var="step"/></block></script></block></script></block-definition><block-definition s="join words %&apos;words&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%mult%txt"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportCDR"><block var="words"/></block></custom-block><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="words"/></block></block></script></block><block s="doReport"><block s="reportJoinWords"><list><block s="reportListItem"><l>1</l><block var="words"/></block><block s="reportJoinWords"><list><l> </l><block s="evaluate"><block s="reifyReporter"><autolambda><custom-block s="join words %mult%txt"><block s="reportCDR"><block var="words"/></block></custom-block></autolambda><list></list></block><list></list></block></list></block></list></block></block></script></block></script></block-definition><block-definition s="list $arrowRight sentence %&apos;data&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doReport"><custom-block s="combine with %repRing items of %l"><block s="reifyReporter"><autolambda><custom-block s="join words %mult%txt"><list><l></l><l></l></list></custom-block></autolambda><list></list></block><block var="data"/></custom-block></block></script></block></script></block-definition><block-definition s="sentence $arrowRight list %&apos;text&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%txt"></input></inputs><script><block s="doWarp"><script><block s="doReport"><block s="reportTextSplit"><block var="text"/><l><option>whitespace</option></l></block></block></script></block></script></block-definition><block-definition s="catch %&apos;tag&apos; %&apos;action&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%cs"></input></inputs><script><block s="doCallCC"><block s="reifyScript"><script><block s="doSetVar"><l>tag</l><block var="cont"/></block><block s="doRun"><block var="action"/><list></list></block></script><list><l>cont</l></list></block></block></script></block-definition><block-definition s="throw %&apos;cont&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s">catchtag</input></inputs><script><block s="doRun"><block var="cont"/><list></list></block></script></block-definition><block-definition s="catch %&apos;tag&apos; %&apos;value&apos;" type="reporter" category="control"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%anyUE"></input></inputs><script><block s="doCallCC"><block s="reifyScript"><script><block s="doSetVar"><l>tag</l><block var="cont"/></block><block s="doReport"><block s="evaluate"><block var="value"/><list></list></block></block></script><list><l>cont</l></list></block></block></script></block-definition><block-definition s="throw %&apos;tag&apos; %&apos;value&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s">catchtag</input><input type="%s"></input></inputs><script><block s="doRun"><block var="tag"/><list><block var="value"/></list></block></script></block-definition><block-definition s="for each %&apos;item&apos; of %&apos;data&apos; %&apos;action&apos;" type="command" category="lists"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%l"></input><input type="%cs"></input></inputs><script><block s="doUntil"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doSetVar"><l>item</l><block s="reportListItem"><l>1</l><block var="data"/></block></block><block s="doRun"><block var="action"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><block s="doSetVar"><l>data</l><block s="reportCDR"><block var="data"/></block></block></script></block></script></block-definition><block-definition s="if %&apos;test&apos; do %&apos;action&apos; and pause all $pause-1-255-220-0" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%boolUE"></input><input type="%cs"></input></inputs><script><block s="doDeclareVariables"><list><l>breakpoint</l></list></block><block s="doIf"><block s="evaluate"><block var="test"/><list></list></block><script><block s="doSetVar"><l>breakpoint</l><block var="test"/></block><block s="doShowVar"><l>breakpoint</l></block><block s="doRun"><block var="action"/><list></list></block><block s="doPauseAll"></block><block s="doHideVar"><l></l></block></script></block></script></block-definition><block-definition s="word $arrowRight list %&apos;word&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%txt"></input></inputs><script><block s="doWarp"><script><block s="doReport"><block s="reportTextSplit"><block var="word"/><l><option>letter</option></l></block></block></script></block></script></block-definition><block-definition s="ignore %&apos;x&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs></block-definition><block-definition s="encode message %&apos;message&apos;" type="reporter" category="other"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l><l>b</l></list></block><block s="doSetVar"><l>b</l><custom-block s="word $arrowRight list %txt"><block var="message"/></custom-block></block><block s="doSetVar"><l>a</l><block s="reportListLength"><block var="b"/></block></block><block s="doFor"><l>i</l><l>1</l><block var="a"/><script><block s="doReplaceInList"><block var="i"/><block var="b"/><block s="reportSum"><block s="reportUnicode"><block s="reportLetter"><l>1</l><block s="reportListItem"><block var="i"/><block var="b"/></block></block></block><l>1</l></block></block></script></block><block s="doReport"><block var="b"/></block></script></block-definition><block-definition s="acronym %&apos;words&apos;" type="reporter" category="other"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l><l>b</l></list></block><block s="doSetVar"><l>b</l><custom-block s="sentence $arrowRight list %txt"><block var="words"/></custom-block></block><block s="doSetVar"><l>a</l><block s="reportListLength"><block var="b"/></block></block><block s="doFor"><l>i</l><l>1</l><block var="a"/><script><block s="doReplaceInList"><block var="i"/><block var="b"/><block s="reportLetter"><l>1</l><block s="reportListItem"><block var="i"/><block var="b"/></block></block></block></script></block><block s="doReport"><block var="b"/></block></script></block-definition><block-definition s="decode message %&apos;message&apos;" type="reporter" category="other"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l><l>b</l></list></block><block s="doSetVar"><l>b</l><block var="message"/></block><block s="doSetVar"><l>a</l><block s="reportListLength"><block var="b"/></block></block><block s="doFor"><l>i</l><l>1</l><block var="a"/><script><block s="doReplaceInList"><block var="i"/><block var="b"/><block s="reportUnicodeAsLetter"><block s="reportDifference"><block s="reportListItem"><block var="i"/><block var="b"/></block><l>1</l></block></block></block></script></block><block s="doReport"><block var="b"/></block></script></block-definition><block-definition s="total saleries for less than 100000 %&apos;list&apos;" type="reporter" category="other"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l><l>b</l></list></block><block s="doSetVar"><l>a</l><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportLessThan"><block s="reportListItem"><l>3</l><l/></block><l>100000</l></block></autolambda><list></list></block><block var="list"/></block></block><block s="doSetVar"><l>b</l><block s="reportNewList"><list><custom-block s="combine with %repRing items of %l"><block s="reifyReporter"><autolambda><block s="reportSum"><l></l><l></l></block></autolambda><list></list></block><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportListItem"><l>3</l><l/></block></autolambda><list></list></block><block var="a"/></block></custom-block></list></block></block><block s="doForEach"><l>item</l><block var="a"/><script><block s="doAddToList"><block s="reportListItem"><l>1</l><block var="item"/></block><block var="b"/></block></script></block><block s="doReport"><block var="b"/></block></script></block-definition><block-definition s="total for more than 100000 %&apos;list&apos;" type="reporter" category="other"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doDeclareVariables"><list><l>a</l><l>b</l></list></block><block s="doSetVar"><l>a</l><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportLessThan"><l>100000</l><block s="reportListItem"><l>3</l><l/></block></block></autolambda><list></list></block><block var="list"/></block></block><block s="doSetVar"><l>b</l><block s="reportNewList"><list><custom-block s="combine with %repRing items of %l"><block s="reifyReporter"><autolambda><block s="reportSum"><l></l><l></l></block></autolambda><list></list></block><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportListItem"><l>3</l><l/></block></autolambda><list></list></block><block var="a"/></block></custom-block></list></block></block><block s="doForEach"><l>item</l><block var="a"/><script><block s="doAddToList"><block s="reportListItem"><l>1</l><block var="item"/></block><block var="b"/></block></script></block><block s="doReport"><block var="b"/></block></script></block-definition><block-definition s="average total %&apos;list&apos;" type="reporter" category="other"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportQuotient"><block s="reportListItem"><l>1</l><block var="list"/></block><block s="reportDifference"><block s="reportListLength"><block var="list"/></block><l>1</l></block></block></block></script></block-definition></blocks><variables><variable name="coded message"><list struct="atomic" id="957"> ,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1</list></variable><variable name="database"><list id="958"><item><list struct="atomic" id="959">Ben Bitdiddle,computer wizard,60000</list></item><item><list struct="atomic" id="960">Alyssa P Hacker,computer programmer,40000</list></item><item><list struct="atomic" id="961">Cy D Fect,computer programmer,35000</list></item><item><list struct="atomic" id="962">Lem E Tweakit,computer technician,25000</list></item><item><list struct="atomic" id="963">Louis Reasoner,computer programmer trainee,30000</list></item><item><list struct="atomic" id="964">Oliver Warbucks,big wheel,650000</list></item><item><list struct="atomic" id="965">Eben Scrooge,chief accountant,75000</list></item><item><list struct="atomic" id="966">Robert Cratchet,accounting scrivener,18000</list></item><item><list struct="atomic" id="967">Aull DeWitt,secretary,25000</list></item></list></variable></variables></project><media name="U3L4.1 Combining List Operations
" app="Snap! 5.4, http://snap.berkeley.edu" version="1"></media></snapdata>