Imports System

Module Main
    Sub Main(args As String())
        Dim xyabc As String() = Split(Console.ReadLine, " ")
        Dim plss As String() = Split(Console.ReadLine, " ")
        Dim qlss As String() = Split(Console.ReadLine, " ")
        Dim rlss As String() = Split(Console.ReadLine, " ")
        Dim pls As List(Of Integer) = New List(Of Integer)
        Dim qls As List(Of Integer) = New List(Of Integer)
        Dim rls As List(Of Integer) = New List(Of Integer)
        Dim x As Integer = Integer.Parse(xyabc(0))
        Dim y As Integer = Integer.Parse(xyabc(1))
        Dim a As Integer = Integer.Parse(xyabc(2))
        Dim b As Integer = Integer.Parse(xyabc(3))
        Dim c As Integer = Integer.Parse(xyabc(4))
        Dim ans As Integer = 0
        For index = 0 To a - 1
            pls.Add(Integer.Parse(plss(index)))
        Next
        For index = 0 To b - 1
            qls.Add(Integer.Parse(qlss(index)))
        Next
        For index = 0 To c - 1
            pls.Add(Integer.Parse(rlss(index)))
            qls.Add(Integer.Parse(rlss(index)))
        Next
        pls.Sort()
        pls.Reverse()
        qls.Sort()
        qls.Reverse()
        'rls.Sort()
        'rls.Reverse()
        For index = 0 To x - 1
            ans += pls(index)
        Next
        For index = 0 To y - 1
            ans += qls(index)
        Next
        Console.WriteLine(ans.ToString)
    End Sub
End Module
