let
flagstat bam = fwd (
Input
.flagstat (bwd bam))