program main

  implicit none
  
  character(10) ::  s

  read(*,*) s
  
  if ( s == "hi" .or. s == "hihi" .or. s == "hihihi" &
     & .or. s == "hihihihi" .or. s == "hihihihihi" ) then
    print*, "Yes"
  else
    print*, "No"
  end if

end program main
