!> This file was processed by `fypp`.
!> Today's fortune: "Bad WA", really OK?
!> ランダムウォーク猿「'風呂ー' で はっぴー.」
program yukicoder_2997
  use, intrinsic :: iso_fortran_env
  !> auto use module
  implicit none
  integer(int32), parameter :: na = iachar("a"), nz = iachar("z")
  integer(int32), parameter :: maxi = 10 ** 6
  character(len=maxi) :: s
  integer(int32) :: n
  integer(int32) :: cnts(na:nz)
  integer(int32) :: i
  read(input_unit, *) s
  n = len_trim(s)
  cnts(:) = 0
  do i = 1, n
     cnts(iachar(s(i:i))) = cnts(iachar(s(i:i))) + 1
  end do
  block
    integer(int32) :: y, a, x
    y = minval(cnts(iachar(["y", "u", "k", "a", "r", "i"])))
    a = minval([cnts(iachar("a")) / 2, cnts(iachar(["k", "r", "i"]))])
    x = minval([cnts(iachar("u")) / 3, cnts(iachar("z")) / 2, cnts(iachar(["y", "k", "i"]))])
    write(output_unit, '(*(i0, 1x))') y, a, x
  end block
end program yukicoder_2997