Sha256: 9fe357db1623f786ee6fd00eed9e8601cb3e1a8dbf10e74da3cb987fae6db681
Contents?: true
Size: 283 Bytes
Versions: 76
Compression:
Stored size: 283 Bytes
Contents
open Core.Std
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 (function None -> Some 1 | Some n -> Some (n + 1)) in
String.fold ~init:CMap.empty ~f s
Version data entries
76 entries across 76 versions & 1 rubygems