Sha256: c7734b6601dfbf5e9a908b8f678635c0bf04d4842381289a90e4cad9d02f0a99
Contents?: true
Size: 282 Bytes
Versions: 151
Compression:
Stored size: 282 Bytes
Contents
open Core
module CMap = Char.Map
let count s c =
let f n c' = if c = c' then n + 1 else n in
String.fold ~init:0 ~f s
let nucleotide_counts s =
let f m c = CMap.change m c ~f:(function None -> Some 1 | Some n -> Some (n + 1)) in
String.fold ~init:CMap.empty ~f s
Version data entries
151 entries across 151 versions & 1 rubygems