<snapdata remixID="10154284"><project name="Roman numerals" app="Snap! 6, https://snap.berkeley.edu" version="1"><notes>My implementation of Roman numerals.</notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAADnElEQVR4Xu3Xv6vNcRzH8fe9V9zBjY0YXKXurohFGbDZZFUGWZTF3+DGxEhSFoNSVqvhDrosKFFX3W65fkfOlasjd5LB8jr1rtPjrrfX512P77Nud2I4HA7LD4EmgQkBNsk7uyEgQCG0Cgiwld9xAWqgVUCArfyOC1ADrQICbOV3XIAaaBUQYCu/4wLUQKuAAFv5HRegBloFBNjK77gANdAqIMBWfscFqIFWAQG28jsuQA20Cgiwld9xAWqgVUCArfyOC1ADrQICbOV3XIAaaBUQYCu/4wLUQKuAAFv5HRegBloFBNjK77gANdAqIMBWfscFqIFWAQG28jsuQA20Cgiwld9xAWqgVUCArfyOC1ADrQICbOV3XIAaaBUQYCu/4wLUQKuAAFv5HRegBloFBNjK77gANdAqIMBWfscFqIFWAQG28jsuQA20Cgiwld9xAWqgVUCArfyOCzBs4NNgvd58Xtt4Zdv0ppreNFkzW6Zq6+apGlZt/G52+3R4ZXznAgy/7Yv3g7rzdLUWlr/WxcO76svar/o4+FkXDu2q5+++163F1bp6Yja8Mr5zAY7g2776MKgbi29r/thsffmxXucevK67p+Zq/tFyHdw9U0f3bhvBlfF8QoAj+K5/B/jnuTP3X9aV43vr0sOlunlyX01NTozgyng+IcARfNd/A7z9ZLWWPq/V2vqwLh/bM4IL4/uEAMNv+3jlW11fWKln7wZ1/sDOOrt/R/35x2Tu2mLdOz1XR2b9+f0fsQDDAM0zAQFmftahgABDQPNMQICZn3UoIMAQ0DwTEGDmZx0KCDAENM8EBJj5WYcCAgwBzTMBAWZ+1qGAAENA80xAgJmfdSggwBDQPBMQYOZnHQoIMAQ0zwQEmPlZhwICDAHNMwEBZn7WoYAAQ0DzTECAmZ91KCDAENA8ExBg5mcdCggwBDTPBASY+VmHAgIMAc0zAQFmftahgABDQPNMQICZn3UoIMAQ0DwTEGDmZx0KCDAENM8EBJj5WYcCAgwBzTMBAWZ+1qGAAENA80xAgJmfdSggwBDQPBMQYOZnHQoIMAQ0zwQEmPlZhwICDAHNMwEBZn7WoYAAQ0DzTECAmZ91KCDAENA8ExBg5mcdCggwBDTPBASY+VmHAgIMAc0zAQFmftahgABDQPNMQICZn3UoIMAQ0DwTEGDmZx0KCDAENM8EBJj5WYcCAgwBzTMBAWZ+1qGAAENA80xAgJmfdSjwG2ypNreNOdrcAAAAAElFTkSuQmCC</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="false" hyperops="true" codify="false" inheritance="true" sublistIDs="false" scheduled="false" id="1"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAARwElEQVR4Xu3dS2ilBx3G4fc7xynW1gq1iteFpa0UBcGFhSbVtlC8bFTUSi2C3YgXUBRBRBMOiUNFXakbN7qwVB0Ux42gFAcnM3bhSrxgaQWhS28gtNTOJJ8knYrjpEPSCfOeHJ5ZFdLk/53nvPCDTMgM8YcAAQIECBC47ALDZb/oIAECBAgQIBABNgICBAgQIFAQEOACupMECBAgQECAbYAAAQIECBQEBLiA7iQBAgQIEBBgGyBAgAABAgUBAS6gO0mAAAECBATYBggQIECAQEFAgAvoThIgQIAAAQG2AQIECBAgUBAQ4AK6kwQIECBAQIBtgAABAgQIFAQEuIDuJAECBAgQEGAbIECAAAECBQEBLqA7SYAAAQIEBNgGCBAgQIBAQUCAC+hOEiBAgAABAbYBAgQIECBQEBDgArqTBAgQIEBAgG2AAAECBAgUBAS4gO4kAQIECBAQYBsgQIAAAQIFAQEuoDtJgAABAgQE2AYIECBAgEBBQIAL6E4SIECAAAEBtgECBAgQIFAQEOACupMECBAgQECAbYAAAQIECBQEBLiA7iQBAgQIEBBgGyBAgAABAgUBAS6gO0mAAAECBATYBggQIECAQEFAgAvoThIgQIAAAQG2AQIECBAgUBAQ4AK6kwQIECBAQIBtgAABAgQIFAQEuIDuJAECBAgQEGAbIECAAAECBQEBLqA7SYAAAQIEBNgGCBAgQIBAQUCAC+hOEiBAgAABAbYBAgQIECBQEBDgArqTBAgQIEBAgG2AAAECBAgUBAS4gO4kAQIECBAQYBsgQIAAAQIFAQEuoDtJgAABAgQE2AYIECBAgEBBQIAL6E4SIECAAAEBtgECBAgQIFAQEOACupMECBAgQECAbYAAAQIECBQEBLiA7iQBAgQIEBBgGyBAgAABAgUBAS6gO0mAAAECBATYBggQIECAQEFAgAvoThIgQIAAAQG2AQIECBAgUBAQ4AK6kwQIECBAQIBtgAABAgQIFAQEuIDuJAECBAgQEGAbIECAAAECBQEBLqA7SYAAAQIEBNgGCBAgQIBAQUCAC+hOEiBAgAABAbYBAgQIECBQEBDgArqTBAgQIEBAgG2AAAECBAgUBAS4gO4kAQIECBAQYBsgQIAAAQIFAQEuoDtJgAABAgQE2AYIECBAgEBBQIAL6E4SIECAAAEBtgECBAgQIFAQEOACupMECBAgQECAbYAAAQIECBQEBLiA7iQBAgQIEBBgGyBAgAABAgUBAS6gO0mAAAECBATYBggQIECAQEFAgAvoThIgQIAAAQG2AQIECBAgUBAQ4AK6kwQIECBAQIBtgAABAgQIFAQEuIDuJAECBAgQEGAbIECAAAECBQEBLqA7SYAAAQIEBNgGCBAgQIBAQUCAC+hOEiBAgAABAbYBAgQIECBQEBDgArqTBAgQIEBAgG2AAAECBAgUBAS4gO4kAQIECBAQYBsgQIAAAQIFAQEuoDtJgAABAgQE2AYIECBAgEBBQIAL6E4SIECAAAEBtgECBAgQIFAQEOACupMECBAgQECAbYAAAQIECBQEBLiA7iQBAgQIEBBgGyBAgAABAgUBAS6gO0mAAAECBATYBggQIECAQEFAgAvoThIgQIAAAQG2AQIECBAgUBAQ4AK6kwQIECBAQIBtgAABAgQIFAQEuIDuJAECBAgQEGAbIECAAAECBQEBLqA7SYAAAQIEBNgGCBAgQIBAQUCAC+hOEiBAgAABAbYBAgQIECBQEBDgArqTBAgQIEBAgG2AAAECBAgUBAS4gO4kAQIECBAQYBsgQIAAAQIFAQEuoDtJgAABAgQE2AYIECBAgEBBQIAL6E4SIECAAAEBtgECBAgQIFAQEOACupMECBAgQECAbYAAAQIECBQEBLiA7iQBAgQIEBBgGyBAgAABAgUBAS6gO0mAAAECBATYBggQIECAQEFAgAvoThIgQIAAAQG2AQIECBAgUBAQ4AK6kwQIECBAQIBtgAABAgQIFAQEuIDuJAECBAgQEGAbIECAAAECBQEBLqA7SYAAAQIEBNgGCBAgQIBAQUCAC+hOEiBAgAABAbYBAgQIECBQEBDgArqTBAgQIEBAgG2AAAECBAgUBAS4gO4kAQIECBAQYBsgQIAAAQIFAQEuoDtJgAABAgQE2AYIECBAgEBBQIAL6E4SIECAAAEBtgECBAgQIFAQEOACupMECBAgQECAbYAAAQIECBQEBLiA7iQBAgQIEBBgGyBAgAABAgUBAS6gO0mAAAECBATYBggQIECAQEFAgAvoThIgQIAAAQG2AQIECBAgUBAQ4AK6kwQIECBAQIBtgAABAgQIFAQEuIDuJAECBAgQEGAbIECAAAECBQEBLqA7SYAAAQIEBNgGCBAgQIBAQUCAC+hOEiBAgAABAbYBAgQIECBQEBDgArqTBAgQIEBAgG2AwGEXmB27Iluv+nQyXnXRlzKZfiOzW/+R2al3ZWt8SyaTP2W29IPn/JwPHJvm5ld/Itl6abYm38uXl/582Kk8P4F5EhDgeXo3PAuB5yPwud9elRf96y/JcN1FP31ruGEnoiun7s6QHyZ5PE8+cXO+/vYndv282cb12Rr+mAxP5czmjbn/rX99Po/ncwgQ2F1AgC2DwGEXODZO8/uHb8/W5pGdlzLNXRmHz2bMLzOOX/vvy3vqyY2d2M5OXJfNFzyWYXhJkjuztnxiV4LVjU8mw7eS/DRry+857Eyen8C8CQjwvL0jnofApQqsnPxIhsl3M+aBrC9/eNcvt3L6JxnG7ah+M2vLn7rw/xmHrJx+KEPuzDi5N+u3Pnipj+XzCRA4X0CALYLAognsJcCrG/ckw4PJ+Ggm174xszc8fR7D0ZOvzL8nj2Ucz2R69obM7vjbojF5PQTaAgLcfgfcJ3DQAnsJ8BdOvixHpo8m4zUZz96S9dt/c95jrG7clwzfyTgcz/rSew/6EX09AgQSAbYCAosmsJcAb7/m1VPHk7w7GY5mbelL5wf42Y+NH8rabd9fNCKvh8A8CAjwPLwLnoHAQQrsPcD3JnkgY36X6Zk3Z3bH2Z3HePaHtLb/27efD/Kd8bUInCcgwAZBYNEE9hrg2YlX7Pw0dPLCZHhT1pf/sEOxevp9yfgj335etGF4PfMmIMDz9o54HgKXKrDXAD/zbeifJXlnxuHzWV/66rkAb/9w1j2Jbz9f6lvh8wlcTECA7YPAognsK8DnftgqeTiTh5aTd1ydrbOPJLkiZ47clPtv+fui8Xg9BOZFQIDn5Z3wHAQOSmA/AZ6deE22jjyScZxmkpsyDq9P8ouMOZb15Q8e1CP5OgQIXCggwFZBYNEE9hPgjENWT/88yV1JPrbzd8EZP54M78/a0o8XjcbrITBPAgI8T++GZyFwEAL7CnCSlY2PZhi+nWT7V1K+LsmL8/R4Y75y2z8P4nF8DQIEdhcQYMsgcNgFPvPrK3P11vEMuebcS3l5kuuTbP/2qu2fcn7mz+bm3Tn6tscveLlf/NVrM51u/73vlTsf8+3nw74Iz39IBAT4kLxRHpPAcwrs919DuuAL/c/vfd75mG8/WxuByyEgwJdD2Q0CBAgQIPB/AgJsEgQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCAhwAd1JAgQIECAgwDZAgAABAgQKAgJcQHeSAAECBAgIsA0QIECAAIGCgAAX0J0kQIAAAQICbAMECBAgQKAgIMAFdCcJECBAgIAA2wABAgQIECgICHAB3UkCBAgQICDANkCAAAECBAoCAlxAd5IAAQIECAiwDRAgQIAAgYKAABfQnSRAgAABAgJsAwQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCAhwAd1JAgQIECAgwDZAgAABAgQKAgJcQHeSAAECBAgIsA0QIECAAIGCgAAX0J0kQIAAAQICbAMECBAgQKAgIMAFdCcJECBAgIAA2wABAgQIECgICHAB3UkCBAgQICDANkCAAAECBAoCAlxAd5IAAQIECAiwDRAgQIAAgYKAABfQnSRAgAABAgJsAwQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCAhwAd1JAgQIECAgwDZAgAABAgQKAgJcQHeSAAECBAgIsA0QIECAAIGCgAAX0J0kQIAAAQICbAMECBAgQKAgIMAFdCcJECBAgIAA2wABAgQIECgICHAB3UkCBAgQICDANkCAAAECBAoCAlxAd5IAAQIECAiwDRAgQIAAgYKAABfQnSRAgAABAgJsAwQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCAhwAd1JAgQIECAgwDZAgAABAgQKAgJcQHeSAAECBAgIsA0QIECAAIGCgAAX0J0kQIAAAQICbAMECBAgQKAgIMAFdCcJECBAgIAA2wABAgQIECgICHAB3UkCBAgQICDANkCAAAECBAoCAlxAd5IAAQIECAiwDRAgQIAAgYKAABfQnSRAgAABAgJsAwQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCAhwAd1JAgQIECAgwDZAgAABAgQKAgJcQHeSAAECBAgIsA0QIECAAIGCgAAX0J0kQIAAAQICbAMECBAgQKAgIMAFdCcJECBAgIAA2wABAgQIECgICHAB3UkCBAgQICDANkCAAAECBAoCAlxAd5IAAQIECAiwDRAgQIAAgYKAABfQnSRAgAABAgJsAwQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCAhwAd1JAgQIECAgwDZAgAABAgQKAgJcQHeSAAECBAgIsA0QIECAAIGCgAAX0J0kQIAAAQICbAMECBAgQKAgIMAFdCcJECBAgIAA2wABAgQIECgICHAB3UkCBAgQICDANkCAAAECBAoCAlxAd5IAAQIECAiwDRAgQIAAgYKAABfQnSRAgAABAgJsAwQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCAhwAd1JAgQIECAgwDZAgAABAgQKAgJcQHeSAAECBAgIsA0QIECAAIGCgAAX0J0kQIAAAQICbAMECBAgQKAgIMAFdCcJECBAgIAA2wABAgQIECgICHAB3UkCBAgQICDANkCAAAECBAoCAlxAd5IAAQIECAiwDRAgQIAAgYKAABfQnSRAgAABAgJsAwQIECBAoCAgwAV0JwkQIECAgADbAAECBAgQKAgIcAHdSQIECBAgIMA2QIAAAQIECgICXEB3kgABAgQICLANECBAgACBgoAAF9CdJECAAAECAmwDBAgQIECgICDABXQnCRAgQICAANsAAQIECBAoCPwH6XAFeNK+MdgAAAAASUVORK5CYII=</pentrails><costumes><list struct="atomic" id="2"></list></costumes><sounds><list struct="atomic" id="3"></list></sounds><variables></variables><blocks></blocks><scripts><script x="165" y="188.33333333333334"><block s="receiveGo"></block><block s="doForever"><script><block s="doAsk"><l>Enter a Roman numeral or an Arabic numeral (the normal numeral)</l></block><block s="clear"></block><block s="doIfElse"><block s="reportIsA"><block s="getLastAnswer"></block><l><option>number</option></l></block><script><block s="doTellTo"><l>draw</l><block s="reifyScript"><script><block s="gotoXY"><l>0</l><l>0</l></block><block s="write"><l></l><l>24</l></block></script><list></list></block><list><custom-block s="%n as Roman numeral"><block s="getLastAnswer"></block></custom-block></list></block></script><script><block s="doTellTo"><l>draw</l><block s="reifyScript"><script><block s="gotoXY"><l>0</l><l>0</l></block><block s="write"><l></l><l>24</l></block></script><list></list></block><list><custom-block s="Roman numeral %txt"><block s="getLastAnswer"></block></custom-block></list></block></script></block></script></block></script></scripts><sprites><sprite name="draw" idx="1" x="26.390625" y="0" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" hidden="true" costume="0" color="0,125.66399999999993,196.35,1" pen="tip" id="65"><costumes><list struct="atomic" id="66"></list></costumes><sounds><list struct="atomic" id="67"></list></sounds><blocks></blocks><variables></variables><scripts><script x="268" y="206.00000000000003"><block s="gotoXY"><l>0</l><l>0</l></block><block s="write"><l></l><l>24</l></block></script></scripts></sprite></sprites></stage><hidden></hidden><headers></headers><code></code><blocks><block-definition s="Roman numeral %&apos;romanNum&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%txt"></input></inputs><script><block s="doWarp"><script><block s="doDeclareVariables"><list><l>symbols</l><l>return</l></list></block><block s="doSetVar"><l>symbols</l><block s="reportNewList"><list><block s="reportNewList"><list><l>I</l><l>1</l></list></block><block s="reportNewList"><list><l>V</l><l>5</l></list></block><block s="reportNewList"><list><l>X</l><l>10</l></list></block><block s="reportNewList"><list><l>L</l><l>50</l></list></block><block s="reportNewList"><list><l>C</l><l>100</l></list></block><block s="reportNewList"><list><l>D</l><l>500</l></list></block><block s="reportNewList"><list><l>M</l><l>1000</l></list></block></list></block></block><block s="doSetVar"><l>return</l><l>0</l></block><block s="doFor"><l>i</l><l>1</l><block s="reportStringSize"><block var="romanNum"/></block><script><block s="doDeclareVariables"><list><l>curr</l><l>next</l></list></block><block s="doSetVar"><l>curr</l><block s="reportListItem"><l>2</l><block s="reportFindFirst"><block s="reifyPredicate"><autolambda><block s="reportEquals"><block s="reportListItem"><l>1</l><l/></block><block s="reportLetter"><block var="i"/><block var="romanNum"/></block></block></autolambda><list></list></block><block var="symbols"/></block></block></block><block s="doSetVar"><l>next</l><block s="reportFindFirst"><block s="reifyPredicate"><autolambda><block s="reportEquals"><block s="reportListItem"><l>1</l><l/></block><block s="reportLetter"><block s="reportSum"><block var="i"/><l>1</l></block><block var="romanNum"/></block></block></autolambda><list></list></block><block var="symbols"/></block></block><block s="doIfElse"><block s="reportAnd"><block s="reportNotEquals"><block var="next"/><l></l></block><block s="reportLessThan"><block var="curr"/><block s="reportListItem"><l>2</l><block var="next"/></block></block></block><script><block s="doChangeVar"><l>return</l><block s="reportDifference"><block s="reportListItem"><l>2</l><block var="next"/></block><block var="curr"/></block></block><block s="doChangeVar"><l>i</l><l>1</l></block></script><script><block s="doChangeVar"><l>return</l><block var="curr"/></block></script></block></script></block><block s="doReport"><block var="return"/></block></script></block></script></block-definition><block-definition s="%&apos;number&apos; as Roman numeral" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%n"></input></inputs><script><block s="doWarp"><script><block s="doIf"><block s="reportLessThan"><block var="number"/><l>0</l></block><script><block s="doReport"><l>Negative numbers weren&apos;t invented until later.</l></block></script></block><block s="doDeclareVariables"><list><l>symbols</l><l>output</l></list></block><block s="doSetVar"><l>symbols</l><block s="reportNewList"><list><block s="reportNewList"><list><l>I</l><l>1</l></list></block><block s="reportNewList"><list><l>V</l><l>5</l></list></block><block s="reportNewList"><list><l>X</l><l>10</l></list></block><block s="reportNewList"><list><l>L</l><l>50</l></list></block><block s="reportNewList"><list><l>C</l><l>100</l></list></block><block s="reportNewList"><list><l>D</l><l>500</l></list></block><block s="reportNewList"><list><l>M</l><l>1000</l></list></block></list></block></block><block s="doSetVar"><l>output</l><l></l></block><block s="doUntil"><block s="reportEquals"><block var="number"/><l>0</l></block><script><block s="doDeclareVariables"><list><l>symbol</l><l>higher</l></list></block><block s="doSetVar"><l>symbol</l><block s="reportFindFirst"><block s="reifyPredicate"><autolambda><block s="reportOr"><block s="reportEquals"><block var="index"/><block s="reportListLength"><block var="symbols"/></block></block><block s="reportAnd"><block s="reportLessThanOrEquals"><block s="reportListItem"><l>2</l><block var="value"/></block><block var="number"/></block><block s="reportGreaterThan"><block s="reportListItem"><l>2</l><block s="reportListItem"><block s="reportSum"><block var="index"/><l>1</l></block><block var="symbols"/></block></block><block var="number"/></block></block></block></autolambda><list><l>value</l><l>index</l></list></block><block var="symbols"/></block></block><block s="doSetVar"><l>higher</l><block s="reportListItem"><block s="reportSum"><block s="reportListIndex"><block var="symbol"/><block var="symbols"/></block><l>1</l></block><block var="symbols"/></block></block><block s="doIf"><block var="higher"/><script><block s="doFor"><l>i</l><l>1</l><block s="reportListIndex"><block var="symbol"/><block var="symbols"/></block><script><block s="doIf"><block var="higher"/><script><block s="doDeclareVariables"><list><l>sn</l><l>hn</l></list></block><block s="doSetVar"><l>sn</l><block s="reportListItem"><l>2</l><block s="reportListItem"><block var="i"/><block var="symbols"/></block></block></block><block s="doSetVar"><l>hn</l><block s="reportListItem"><l>2</l><block var="higher"/></block></block><block s="doIf"><block s="reportAnd"><block s="reportNotEquals"><block s="reportDifference"><block var="hn"/><block var="sn"/></block><block var="sn"/></block><block s="reportEquals"><block s="reportDifference"><block var="hn"/><block var="sn"/></block><block s="reportProduct"><block s="reportMonadic"><l><option>floor</option></l><block s="reportQuotient"><block var="number"/><block var="sn"/></block></block><block var="sn"/></block></block></block><script><block s="doSetVar"><l>output</l><block s="reportJoinWords"><list><block var="output"/><block s="reportListItem"><l>1</l><block s="reportListItem"><block var="i"/><block var="symbols"/></block></block><block s="reportListItem"><l>1</l><block var="higher"/></block></list></block></block><block s="doChangeVar"><l>number</l><block s="reportDifference"><l></l><block s="reportProduct"><block s="reportMonadic"><l><option>floor</option></l><block s="reportQuotient"><block var="number"/><block var="sn"/></block></block><block var="sn"/></block></block></block><block s="doSetVar"><l>higher</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><block s="doSetVar"><l>i</l><block s="reportSum"><block s="reportListLength"><block var="symbols"/></block><l>1</l></block></block></script></block></script></block></script></block></script></block><block s="doIf"><block s="reportNotEquals"><block var="higher"/><block s="reportBoolean"><l><bool>false</bool></l></block></block><script><block s="doSetVar"><l>output</l><block s="reportJoinWords"><list><block var="output"/><block s="reportListItem"><l>1</l><block var="symbol"/></block></list></block></block><block s="doChangeVar"><l>number</l><block s="reportDifference"><l></l><block s="reportListItem"><l>2</l><block var="symbol"/></block></block></block></script></block></script></block><block s="doReport"><block var="output"/></block></script></block></script></block-definition></blocks><variables></variables></project><media name="Roman numerals" app="Snap! 6, https://snap.berkeley.edu" version="1"></media></snapdata>