import Text.Printf main = getLine >> interact (unlines . map (btree . read) . lines) btree :: Int -> String btree = tail . map (\c -> case c of {'0'->'L'; '1'->'R'}) . printf "%b" . succ