:let line = getline(1)
:let num = str2nr(line, 10)
:let lowest = num % 10
" :if lowest == 3
"   :call setline(1, 'bon')
" :elseif lowest == 2 || lowest == 4 || lowest == 5 || lowest == 7 || lowest == 9
"   :call setline(1, 'hon')
" :else
"   :call setline(1, 'pon')
" :endif
:let bon_list = [3]
:let hon_list = [2, 4, 5, 7, 9]
:if match(bon_list, num) >= 0
  :call setline(1, 'bon')
:elseif match(hon_list, num) >= 0
  :call setline(1, 'hon')
:else
:wq
