✨ lc 437-1

codereport · Feb 19, 2025 · 51c3264 · 51c3264
1 parent d57db99
commit 51c3264
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/leetcode/437-1.bqn b/leetcode/437-1.bqn
@@ -0,0 +1,13 @@
+# Link: https://leetcode.com/problems/find-special-substring-of-length-k
+
+u  ⇐ •Import "/home/cph/bqn-test/test.bqn"
+fn ⇐ •Import "/home/cph/bqn-code/lib/fun.bqn"
+
+HasSpecialSubstring  ← { ∨´𝕨=≠¨fn.Group𝕩 } # Explicit
+HasSpecialSubstring2 ← ∨´=⟜(≠¨fn.Group)    # Tacit
+
+# Tests
+u.UnitTest (3 HasSpecialSubstring  "aaabaaa") ≡ 1
+u.UnitTest (2 HasSpecialSubstring  "abc")     ≡ 0
+u.UnitTest (3 HasSpecialSubstring2 "aaabaaa") ≡ 1
+u.UnitTest (2 HasSpecialSubstring2 "abc")     ≡ 0