use bam_dup1()