from sys import stdin, stdout

def main():
    # beolvasás, - unatkozaá
    T = int(stdin.readline())
    
    #a Te intervallumaid
    tied=[]
    for _ in range(int(stdin.readline())):
        tol,ig=map(int, stdin.readline().split())
        tied.append(tol) #>=0
        tied.append(-ig-1) #<0
    VEGE = -2**64
    tied.append(VEGE)
    
    # Hano intervallumai
    hanoe=[]
    for _ in range(int(stdin.readline())):
        tol,ig=map(int, stdin.readline().split())
        hanoe.append(tol) #>=0
        hanoe.append(-ig-1) #<0
    hanoe.append(VEGE) 
    
    teHely=0
    teJatszol=False
    
    hanoHely=0
    hanoJatszik=False
    
    egyuttKezdet=0
    unatkozasKezdet=0
    
    perc=0
    
    while not(tied[teHely]==VEGE and hanoe[hanoHely]==VEGE):
        if abs(tied[teHely])<abs(hanoe[hanoHely]):
            if tied[teHely]>=0: # start
                if hanoJatszik:
                    egyuttKezdet=tied[teHely]
                else:
                    unatkozasKezdet=tied[teHely]
                teJatszol=True                
            else: #end
                if teJatszol and hanoJatszik:
                    perc+=-tied[teHely]-egyuttKezdet
                teJatszol = False
            teHely+=1
        else:
            if teJatszol and not hanoJatszik and unatkozasKezdet+T < abs(hanoe[hanoHely]):
                teJatszol= False
            if hanoe[hanoHely]>=0: #start
                if teJatszol:
                    egyuttKezdet = hanoe[hanoHely]
                hanoJatszik=True
            else: # end
                if teJatszol and hanoJatszik:
                    perc+= -hanoe[hanoHely] - egyuttKezdet
                if teJatszol:
                    unatkozasKezdet = -hanoe[hanoHely]
                hanoJatszik = False
            hanoHely+=1
    stdout.write(str(perc) + '\n')
main()