main = do
    [x, y, a, b, c] <- getIntList
    ps <- take x . reverse . sort <$> getIntList
    qs <- take y . reverse . sort <$> getIntList
    rs <- reverse . sort <$> getIntList
    let xs = sort (ps ++ qs)
    let s = sum $ zipWith max xs rs
    let t = sum $ drop (min c (a + b)) xs
    print $ s + t