loci2blat: write one seq per locus to a fasta file