def four_gametes_test(bases1 :list, bases2 :list):
    """
    Whether 2 loci are incompatible by computing a 4-gametes
    test on 2 informative polymorphisms.

        Parameters:
            bases1 (list)
            bases2 (list)
        
        Output:
            boolean: the 2 loci are incompatible
    """
    assert len(bases1) == len(bases2), "Not the same number of elements."

    c = []
    for i in range(len(bases1)):
        c.append((bases1[i], bases2[i]))

    return(len(set(c)) > 3)