ch-2.bqn « bqn « aecepoglu « challenge-053 - github/perlweeklychallenge-club.git - Unnamed repository; edit this file 'description' to name the repository.

about summary refs log tree commit diff

path: root/challenge-053/aecepoglu/bqn/ch-2.bqn

blob: 8e6f1da57d36bba3cbf7998ef7d26564c118510d (plain)

# 2
u←⟨"aa","ao","au",
   "ea","ee","eo","eu",
   "ii",
   "oe","oi","ou",
   "ua","ui","uu"⟩
n←2⋄(∧˝u(∧´∘¬∘⍷)⌜⊢)⊸/<˘⊏⟜"aeiou">⥊↕5⥊˜n