turtlestitch/libraries/list_comprehension_module.xml

<blocks app="Snap! 7, https://snap.berkeley.edu" version="2"><block-definition s="zip %&apos;fun&apos; inputs: $nl %&apos;a&apos; leaf-rank %&apos;a-rank&apos; $nl %&apos;b&apos; leaf-rank %&apos;b-rank&apos;" type="reporter" category="control"><header></header><code></code><translations></translations><inputs><input type="%repRing"></input><input type="%s"></input><input type="%n">0</input><input type="%s"></input><input type="%n">0</input></inputs><script><block s="doReport"><block s="reportIfElse"><block s="reportGreaterThan"><block s="reportListAttribute"><l><option>rank</option></l><block var="a"/></block><block var="a-rank"/></block><block s="reportIfElse"><block s="reportGreaterThan"><block s="reportListAttribute"><l><option>rank</option></l><block var="b"/></block><block var="b-rank"/></block><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="zip %repRing inputs: %br %s leaf-rank %n %br %s leaf-rank %n"><block var="fun"/><block s="reportListItem"><l></l><block var="a"/></block><block var="a-rank"/><block s="reportListItem"><l></l><block var="b"/></block><block var="b-rank"/></custom-block></autolambda><list></list></block><block s="reportNumbers"><l>1</l><block s="reportMin"><block s="reportListAttribute"><l><option>length</option></l><block var="a"/></block><block s="reportListAttribute"><l><option>length</option></l><block var="b"/></block></block></block></block><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="zip %repRing inputs: %br %s leaf-rank %n %br %s leaf-rank %n"><block var="fun"/><l></l><block var="a-rank"/><block var="b"/><block var="b-rank"/></custom-block></autolambda><list></list></block><block var="a"/></block></block><block s="reportIfElse"><block s="reportGreaterThan"><block s="reportListAttribute"><l><option>rank</option></l><block var="b"/></block><block var="b-rank"/></block><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="zip %repRing inputs: %br %s leaf-rank %n %br %s leaf-rank %n"><block var="fun"/><block var="a"/><block var="a-rank"/><l></l><block var="b-rank"/></custom-block></autolambda><list></list></block><block var="b"/></block><block s="evaluate"><block var="fun"/><list><block var="a"/><block var="b"/></list></block></block></block></block></script></block-definition></blocks>