CONTAINS block for text strings

[ego-lay_atman-bay]

I've made it even smaller

xml

<blocks app="Snap! 6, https://snap.berkeley.edu" version="1"><block-definition s="%&apos;txt&apos; contains %&apos;value&apos;" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportGreaterThan"><block s="reportListLength"><block s="reportTextSplit"><custom-block s="to lowercase %s"><block var="txt"/></custom-block><custom-block s="to lowercase %s"><block var="value"/></custom-block></block></block><l>1</l></block></block></script></block-definition><block-definition s="to lowercase %&apos;value&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs><script><block s="doReport"><block s="evaluate"><block s="reportJSFunction"><list><l>value</l></list><l>return value.toLowerCase()</l></block><list><block var="value"/></list></block></block></script></block-definition></blocks>