let read_1_file_node (fq : fastq_reads workflow_node) =
let product = fq#product#r1 in
workflow_node product
~name:(sprintf "READ1 of %s-%s"
fq#product#sample_name
fq#product#fragment_id_forced)
~equivalence:`None
~edges:[depends_on fq]