Contents

module Isogram

open System

let normalize str = str |> Seq.filter Char.IsLetter |> Seq.map Char.ToLower |> Seq.toList

let isogram str = 
    let normalized = normalize str
    Seq.length normalized = (normalized |> Seq.distinct |> Seq.length) 

Version data entries

262 entries across 262 versions & 1 rubygems

Version	Path
trackler-1.0.0.1	tracks/fsharp/exercises/isogram/Example.fs
trackler-1.0.0	tracks/fsharp/exercises/isogram/Example.fs