let fasta: t -> KEDSL.file_workflow = fun t -> t.location