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