def allelesAtSite(record):
    """
    Obtain the alleles at a given site from a variant record at that site

    :param record: VariantRecord
        The variant record at the site

    :return: list
        List of alleles at the site
    """
    allAlleles = [record.ref] + record.alt;
    genotypes = list(set(record.gt));
    actuals = [str(allAlleles[g]) for g in genotypes];
    return actuals;