Add spaces before uppercase letters
String.collect is equivalent to Select+Concat.

let padWithSpace = 
    String.collect (fun c -&gt; (if Char.IsUpper c then " " else "") + string c) 
    &gt;&gt; fun s -&gt; s.TrimStart()