import Control.Applicative
import Control.Monad
import Data.List

main :: IO ()
main = do
    [sx, sy, tx, ty] <- fmap read . words <$> getLine :: IO [Int]
    let w = tx - sx
    let h = ty - sy
    let r1 = replicate w 'R' ++ replicate h 'U'
    let r2 = replicate w 'L' ++ replicate h 'D'
    let r3 = 'D' : replicate (w + 1) 'R' ++ replicate (h + 1) 'U' ++ ['L']
    let r4 = 'U' : replicate (w + 1) 'L' ++ replicate (h + 1) 'D' ++ ['R']
    let ans = concat [r1, r2, r3, r4]
    putStrLn ans