|> List.filter_map
        (Result.catch (Gtree.get_name gt)
         |- Result.to_option
         |- Option.map (Tax_seqinfo.tax_id_by_name seqinfom))