main = do
    [sx, sy, tx, ty] <- map read . words <$> getLine
    let dx = tx - sx
        dy = ty - sy
    putStr $ replicate dx 'R'
    putStr $ replicate dy 'U'
    putStr $ replicate dx 'L'
    putStr $ replicate dy 'D'
    putStr $ "D"
    putStr $ replicate (dx + 1) 'R'
    putStr $ replicate (dy + 1) 'U'
    putStr $ "LU"
    putStr $ replicate (dx + 1) 'L'
    putStr $ replicate (dy + 1) 'D'
    putStr $ "R"
    putStrLn ""