Substitute '-' for J in fasta_file_to_phylip also.