import Control.Applicative
import Debug.Trace

quiz [] xs=xs
quiz (a:as) xs=quiz as $take (a-1) xs'++[xs!!(a-1)]++drop a xs'
  where
    xs'=map (subtract 1) xs

printAns []=return ()
printAns (x:xs)
  |x<=0=do
    putStrLn "No"
    printAns xs
  |otherwise=do
    putStrLn "Yes"
    printAns xs 

main=do
  inp<-fmap (fmap (read :: String -> Int) . words) . lines <$> getContents
  let
    n=(inp!!0)!!0
    k=(inp!!0)!!1
    q=(inp!!0)!!2
    a=concat $drop 1 inp
    a'=quiz a $replicate n k
  printAns a'