804_unique_morse_code_words.rb

# frozen_string_literal: true

$alphabet = %w[
  .-
  -...
  -.-.
  -..
  .
  ..-.
  --.
  ....
  ..
  .---
  -.-
  .-..
  --
  -.
  ---
  .--.
  --.-
  .-.
  ...
  -
  ..-
  ...-
  .--
  -..-
  -.--
  --..
]

# https://leetcode.com/problems/unique-morse-code-words/
# @param {String[]} words
# @return {Integer}
def unique_morse_representations(words)
  uniq = ::Set.new
  words.each do |word|
    str = word.each_byte.map { |b| $alphabet[b - 97] }
    uniq << str.join
  end

  uniq.length
end