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
            rls.Add(Integer.Parse(rlss(index)))
        Next
        pls.Sort()
        pls.Reverse()
        qls.Sort()
        qls.Reverse()
        rls.Sort()
        rls.Reverse()
        For index = 0 To x + y - 1
            If x = 0 Or y = 0 Then
                If x = 0 Then
                    If pls(0) > rls(0) Then
                        ans += pls(0)
                        pls.Remove(0)
                    Else
                        ans += rls(0)
                        rls.Remove(0)
                    End If
                Else
                    If qls(0) > rls(0) Then
                        ans += pls(0)
                        qls.Remove(0)
                    Else
                        ans += rls(0)
                        rls.Remove(0)
                    End If
                End If
            Else
                If pls(0) = qls(0) Then
                    If pls(1) > qls(1) Then
                        If pls(0) > rls(0) Then
                            ans += pls(0)
                            pls.Remove(0)
                        Else
                            ans += rls(0)
                            rls.Remove(0)
                        End If
                    Else
                        If qls(1) > rls(1) Then
                            ans += qls(0)
                            qls.Remove(0)
                        Else
                            ans += rls(0)
                            rls.Remove(0)
                        End If
                    End If
                Else
                    If pls(0) > qls(0) Then
                        If pls(0) > rls(0) Then
                            ans += pls(0)
                            pls.Remove(0)
                        Else
                            ans += rls(0)
                            rls.Remove(0)
                        End If
                    Else
                        If qls(0) > rls(0) Then
                            ans += qls(0)
                            qls.Remove(0)
                        Else
                            ans += rls(0)
                            rls.Remove(0)
                        End If
                    End If

                End If

            End If
        Next
        Console.WriteLine(ans.ToString)
    End Sub
End Module
