Count occurrences of a substring: Difference between revisions

<code>⍷/𝕨⍷𝕩</code> finds locations of substrings, rest of the function removessuppresses theoverlapping substring for the next iterationsubstrings.

<lang bqn>Find←{b←𝕨⍷𝕩i←/𝕨⍷𝕩, (0≠+´b)◶⟨0i/˜i≥»0≤◶⟨⊣,1+𝕨𝕊·↓⟜𝕩(≠𝕨)⊸+⟩⊑1↑/b⊢⟩`i}