Sha256: 5f786763069fdeb77c8116f15b52a9fd65d3e94558db68366b80edfd067f6b6d

Contents?: true

Size: 388 Bytes

Versions: 151

Compression:

Stored size: 388 Bytes

Contents

open Core

let to_sorted_list s = String.to_list s |> List.sort ~cmp:Char.compare

let anagrams target candidates =
  let target_lc = String.lowercase target in
  let target_sorted = to_sorted_list target_lc in
  List.map ~f:(fun c -> (c, String.lowercase c)) candidates
  |> List.filter ~f:(fun (_, lc) ->
      to_sorted_list lc = target_sorted && lc <> target_lc)
  |> List.map ~f:fst

Version data entries

151 entries across 151 versions & 1 rubygems

Version Path
trackler-2.2.1.70 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.69 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.68 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.67 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.66 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.65 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.64 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.63 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.62 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.61 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.60 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.59 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.58 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.57 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.56 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.55 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.54 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.53 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.52 tracks/ocaml/exercises/anagram/example.ml
trackler-2.2.1.51 tracks/ocaml/exercises/anagram/example.ml